home_run 0.9.0

data/spec/date/upto_spec.rb

@@ -0,0 +1,17 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Date#upto" do
+  
+  it "should be able to step forward in time" do
+    ds    = Date.civil(2008, 10, 11)
+    de    = Date.civil(2008,  9, 29)
+    count = 0
+    de.upto(ds) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 13
+  end
+
+end

data/spec/datetime/accessor_spec.rb

@@ -0,0 +1,218 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#day_fraction" do
+  it "should be able to determine the fraction of the day" do
+    DateTime.new(2008, 1, 1).day_fraction.should == 0.0
+    DateTime.new(2008, 1, 1, 12).day_fraction.should == 0.5
+    DateTime.new(2008, 1, 1, 6).day_fraction.should == 0.25
+  end 
+end
+
+describe "DateTime#hour" do
+  it "should be able to determine the hour of the day" do
+    DateTime.jd(2007, 1).hour.should == 1
+  end
+end
+
+describe "DateTime#min" do
+  it "should be able to determine the minute of the day" do
+    DateTime.jd(2007, 1, 2).min.should == 2
+  end
+end
+
+describe "DateTime#offset" do
+  it "should be able to determine the offset of the day from UTC" do
+    DateTime.jd(2007, 1, 2, 3, 6/24.0).offset.should == 6/24.0
+    DateTime.parse('2008-01-01 00:00:00+12:00').offset.should == 0.5
+  end
+  
+  ruby_version_is "" ... "1.9" do
+    it "#of should be the offset as a float fraction of the day" do
+      DateTime.parse('2008-01-01 00:00:00+12:00').of.should == 0.5
+    end
+  end
+end
+
+describe "DateTime#sec" do
+  it "should be able to determine the second of the day" do
+    DateTime.jd(2007, 1, 2, 3).sec.should == 3
+  end 
+end
+
+describe "DateTime#sec_fraction" do
+  it "should be the fraction of a second as a fraction of the day" do
+    DateTime.new(2008, 1, 1).sec_fraction.should == 0.0
+    DateTime.parse('12:13:15.678900').sec_fraction.should be_close(7.85763888888889e-06, 0.0000000000001)
+  end 
+end
+
+describe "DateTime#zone" do
+  it "should give the offset as a string" do
+    DateTime.jd(0).zone.should == '+00:00'
+    DateTime.jd(2007, 0, 0, 0, -1/24.0).zone.should == '-01:00'
+  end 
+end
+
+describe "DateTime#cwyear" do
+  it "should be able to determine the commercial year for a date" do
+    DateTime.civil(2007,  1, 17).cwyear.should == 2007
+    DateTime.civil(2008, 10, 28).cwyear.should == 2008
+    DateTime.civil(2007, 12, 31).cwyear.should == 2008
+    DateTime.civil(2010,  1,  1).cwyear.should == 2009
+    DateTime.commercial(2008, 1, 1).cwyear.should == 2008
+    DateTime.commercial(2008, 52, 1).cwyear.should == 2008
+    DateTime.jd(2454782).cwyear.should == 2008
+    DateTime.jd(2454832).cwyear.should == 2009
+    DateTime.ordinal(2008, 1).cwyear.should == 2008
+    DateTime.ordinal(2008, 359).cwyear.should == 2008
+    DateTime.ordinal(2008, 366).cwyear.should == 2009
+  end
+end
+
+describe "DateTime#cweek" do
+  it "should be able to determine the commercial week for a date" do
+    DateTime.civil(2007,  1, 17).cweek.should == 3
+    DateTime.civil(2008, 10, 28).cweek.should == 44
+    DateTime.civil(2007, 12, 31).cweek.should == 1
+    DateTime.civil(2010,  1,  1).cweek.should == 53
+    DateTime.commercial(2008, 1, 1).cweek.should == 1
+    DateTime.commercial(2008, 10, 5).cweek.should == 10
+    DateTime.jd(2454782).cweek.should == 46
+    DateTime.jd(2454789).cweek.should == 47
+    DateTime.ordinal(2008, 1).cweek.should == 1
+    DateTime.ordinal(2008, 359).cweek.should == 52
+    DateTime.ordinal(2008, 366).cweek.should == 1
+  end
+end
+
+describe "DateTime#cwday" do
+  it "should be able to determine the commercial week day for a date" do
+    DateTime.civil(2007,  1, 17).cwday.should == 3
+    DateTime.civil(2008, 10, 26).cwday.should == 7
+    DateTime.commercial(2008, 1, 1).cwday.should == 1
+    DateTime.commercial(2008, 10, 5).cwday.should == 5
+    DateTime.jd(2454782).cwday.should == 2
+    DateTime.jd(2454786).cwday.should == 6
+    DateTime.ordinal(2008, 1).cwday.should == 2
+    DateTime.ordinal(2008, 317).cwday.should == 3
+  end  
+end
+
+describe "DateTime#mday and #day" do
+  it "should be able to determine the day of the month for a date" do
+    DateTime.civil(2007,  1, 17).mday.should == 17
+    DateTime.civil(2008, 10, 28).mday.should == 28
+    DateTime.civil(2007,  1, 17).day.should == 17
+    DateTime.civil(2008, 10, 28).day.should == 28
+    DateTime.commercial(2008, 1, 1).day.should == 31
+    DateTime.commercial(2008, 52, 1).day.should == 22
+    DateTime.jd(2454782).day.should == 11
+    DateTime.jd(2454832).day.should == 31
+    DateTime.ordinal(2008, 1).day.should == 1
+    DateTime.ordinal(2008, 359).day.should == 24
+    DateTime.ordinal(2008, 366).day.should == 31
+  end
+end
+
+describe "DateTime#jd" do
+  it "should be able to determine the julian date for a date" do
+    DateTime.civil(2007,  1, 17).jd.should == 2454118
+    DateTime.civil(2008, 10, 28).jd.should == 2454768
+    DateTime.commercial(2008, 1, 1).jd.should == 2454466
+    DateTime.commercial(2008, 52, 1).jd.should == 2454823
+    DateTime.jd(2454782).jd.should == 2454782
+    DateTime.jd(2454832).jd.should == 2454832
+    DateTime.ordinal(2008, 1).jd.should == 2454467
+    DateTime.ordinal(2008, 359).jd.should == 2454825
+    DateTime.ordinal(2008, 366).jd.should == 2454832
+  end 
+end
+
+describe "DateTime#ajd" do
+  it "should be a float of the astronomical julian day" do
+    DateTime.jd(2008).ajd.should == 2007.5
+    DateTime.jd(2008, 12).ajd.should == 2008
+    DateTime.jd(2008, 0, 0, 0, -0.5).ajd.should == 2008
+    DateTime.jd(2008, 12, 0, 0, -0.5).ajd.should == 2008.5
+  end
+end
+
+describe "DateTime#amjd" do
+  it "#amjd should be a float of the astronomical julian day" do
+    DateTime.jd(2008).amjd.should == -2397993.0
+    DateTime.jd(2008, 12).amjd.should == -2397992.5
+    DateTime.jd(2008, 0, 0, 0, -0.5).amjd.should == -2397992.5
+    DateTime.jd(2008, 12, 0, 0, -0.5).amjd.should == -2397992.0
+  end
+end
+
+describe "DateTime#mjd" do
+  it "should be able to determine the Modified Julian day for a date" do
+    DateTime.civil(2007, 1, 17).mjd.should == 54117
+  end 
+end
+
+describe "DateTime#ld" do
+  it "should be able to determine the Modified Julian day for a date" do
+    DateTime.civil(2007, 1, 17).ld.should == 154958
+  end 
+end
+
+describe "DateTime#wday" do
+  it "should be able to determine the week day for a date" do
+    DateTime.civil(2007,  1, 17).wday.should == 3
+    DateTime.civil(2008, 10, 26).wday.should == 0
+    DateTime.commercial(2008, 1, 1).wday.should == 1
+    DateTime.commercial(2008, 52, 1).wday.should == 1
+    DateTime.jd(2454782).wday.should == 2
+    DateTime.jd(2454832).wday.should == 3
+    DateTime.ordinal(2008, 1).wday.should == 2
+    DateTime.ordinal(2008, 170).wday.should == 3
+    DateTime.ordinal(2008, 366).wday.should == 3
+  end
+end
+
+describe "DateTime#year" do
+  it "should be able to determine the year for a date" do
+    DateTime.civil(2007, 1, 17).year.should == 2007
+    DateTime.civil(2008, 1, 17).year.should == 2008
+    DateTime.commercial(2008, 1, 1).year.should == 2007
+    DateTime.commercial(2008, 52, 1).year.should == 2008
+    DateTime.jd(2454782).year.should == 2008
+    DateTime.jd(2454833).year.should == 2009
+    DateTime.ordinal(2008, 1).year.should == 2008
+    DateTime.ordinal(2008, 170).year.should == 2008
+    DateTime.ordinal(2008, 366).year.should == 2008
+  end 
+end
+
+describe "DateTime#yday" do
+  it "should be able to determine the year for a date" do
+    DateTime.civil(2007,  1, 17).yday.should == 17
+    DateTime.civil(2008, 10, 28).yday.should == 302
+    DateTime.commercial(2008, 1, 1).yday.should == 365
+    DateTime.commercial(2008, 52, 1).yday.should == 357
+    DateTime.jd(2454782).yday.should == 316
+    DateTime.jd(2454832).yday.should == 366
+    DateTime.ordinal(2008, 1).yday.should == 1
+    DateTime.ordinal(2008, 170).yday.should == 170
+    DateTime.ordinal(2008, 366).yday.should == 366
+  end 
+end
+
+describe "DateTime#mon and #month" do
+  it "should be able to determine the month for a date" do
+    DateTime.civil(2007,  1, 17).mon.should == 1
+    DateTime.civil(2008, 10, 28).mon.should == 10
+    DateTime.civil(2007,  1, 17).month.should == 1
+    DateTime.civil(2008, 10, 28).month.should == 10
+    DateTime.commercial(2008, 1, 1).mon.should == 12
+    DateTime.commercial(2008, 52, 1).mon.should == 12
+    DateTime.jd(2454782).mon.should == 11
+    DateTime.jd(2454832).mon.should == 12
+    DateTime.ordinal(2008, 1).mon.should == 1
+    DateTime.ordinal(2008, 170).mon.should == 6
+    DateTime.ordinal(2008, 366).mon.should == 12
+  end 
+end
+

data/spec/datetime/add_month_spec.rb

@@ -0,0 +1,26 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#>>" do
+
+  it "should add a number of months to a DateTime" do
+    (DateTime.civil(2007,2,27) >> 10).should == DateTime.civil(2007, 12, 27)
+    (DateTime.civil(2007,2,27) >> 10).should == DateTime.civil(2007, 12, 27)
+    (DateTime.commercial(2007,2,2) >> 10).should == DateTime.commercial(2007, 45, 5)
+    (DateTime.jd(2454782) >> 10).should == DateTime.jd(2455086)
+    (DateTime.ordinal(2008, 10) >> 10).should == DateTime.ordinal(2008, 315)
+    (DateTime.civil(2007,2,27) >> 22).should == DateTime.civil(2008, 12, 27)
+    (DateTime.civil(2007,2,27) >> -2).should == DateTime.civil(2006, 12, 27)
+  end
+
+  it "should result in the last day of a month if the day doesn't exist" do
+    d = DateTime.civil(2008,3,31) >> 1
+    d.should == DateTime.civil(2008, 4, 30)
+  end
+
+  it "should raise an error on non numeric parameters" do
+    lambda { DateTime.civil(2007,2,27) >> "hello" }.should raise_error(TypeError)
+    lambda { DateTime.civil(2007,2,27) >> DateTime.new }.should raise_error(TypeError)
+    lambda { DateTime.civil(2007,2,27) >> Object.new }.should raise_error(TypeError)
+  end
+  
+end

data/spec/datetime/add_spec.rb

@@ -0,0 +1,36 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#+" do
+
+  it "should add a number of days to a Date" do
+    (DateTime.civil(2007,2,27) + 315).should == DateTime.civil(2008, 1, 8)
+    (DateTime.commercial(2007,2,2) + 315).should == DateTime.commercial(2007, 47, 2)
+    (DateTime.jd(2454782) + 315).should == DateTime.jd(2455097)
+    (DateTime.ordinal(2008, 10) + 315).should == DateTime.ordinal(2008, 325)
+  end
+  
+  it "should add a fractional number of days to a Date" do
+    (DateTime.civil(2007,2,27) + 315.5).should == DateTime.civil(2008, 1, 8, 12)
+    (DateTime.commercial(2007,2,2) + 315.75).should == DateTime.commercial(2007, 47, 2, 18)
+    (DateTime.jd(2454782) + 315.25).should == DateTime.jd(2455097, 6)
+    (DateTime.ordinal(2008, 10) + 315.25).should == DateTime.ordinal(2008, 325, 6)
+  end
+  
+  it "should add a negative number of days to a Date" do
+    d = DateTime.civil(2007,2,27).+(-10)
+    d.should == DateTime.civil(2007, 2, 17)
+  end
+  
+  it "should add a fractional negative number of days to a Date" do
+    d = DateTime.civil(2007,2,27).+(-10.5)
+    d.should == DateTime.civil(2007, 2, 16, 12)
+  end
+
+  it "should raise an error on non numeric parameters" do
+    lambda { DateTime.civil(2007,2,27) + :hello }.should raise_error(TypeError)
+    lambda { DateTime.civil(2007,2,27) + "hello" }.should raise_error(TypeError)
+    lambda { DateTime.civil(2007,2,27) + DateTime.new(2007,2,27) }.should raise_error(TypeError)
+    lambda { DateTime.civil(2007,2,27) + Object.new }.should raise_error(TypeError)
+  end
+  
+end

data/spec/datetime/boat_spec.rb

@@ -0,0 +1,43 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#<=>" do
+
+  it "should be able to compare two same DateTimes" do
+    (DateTime.civil(2000, 04, 06) <=> DateTime.civil(2000, 04, 06)).should == 0
+    (DateTime.civil(2000, 04, 06, 10, 12, 11) <=> DateTime.civil(2000, 04, 06, 10, 12, 11)).should == 0
+  end
+
+  it "should be able to compute the difference between two DateTimes" do
+    (DateTime.civil(2000, 04, 05) <=> DateTime.civil(2000, 04, 06)).should == -1
+    (DateTime.civil(2001, 04, 05) <=> DateTime.civil(2000, 04, 06)).should == 1
+    (DateTime.civil(2000, 04, 05, 10, 12, 13, 1/24.0) <=> DateTime.civil(2000, 04, 05, 10, 12, 13, 2/24.0)).should == 1
+    (DateTime.civil(2001, 04, 05, 10, 12, 13, 1/24.0) <=> DateTime.civil(2001, 04, 05, 10, 12, 13, 0)).should == -1
+  end
+
+  it "should be able to compare to another numeric" do
+    (DateTime.civil(2000, 04, 05) <=> DateTime.civil(2000, 04, 06).jd).should == -1
+    (DateTime.civil(2001, 04, 05) <=> DateTime.civil(2000, 04, 06).jd).should == 1
+    
+    (DateTime.civil(2000, 04, 05).jd <=> 2451640).should == 0
+    (DateTime.civil(2000, 04, 05) <=> 2451640.00000001).should == -1
+    (DateTime.civil(2000, 04, 05) <=> 2451639.99999999).should == 1
+  end
+
+end
+
+describe "DateTime#between?" do
+   it "should be true if the DateTime falls in between the two given DateTimes" do
+    (DateTime.civil(2000, 04, 06).between?(DateTime.civil(2000, 04, 05), DateTime.civil(2000, 04, 07))).should == true
+    (DateTime.civil(2000, 04, 06).between?(DateTime.civil(2000, 04, 06), DateTime.civil(2000, 04, 07))).should == true
+    (DateTime.civil(2000, 04, 06).between?(DateTime.civil(2000, 04, 05), DateTime.civil(2000, 04, 06))).should == true
+    
+    (DateTime.civil(2000, 04, 06, 10, 12, 11, 3/24.0).between?(DateTime.civil(2000, 04, 06, 10, 12, 11, 4/24.0), DateTime.civil(2000, 04, 06, 10, 12, 11, 2/24.0))).should == true
+    (DateTime.civil(2000, 04, 06, 10, 12, 11, 2/24.0).between?(DateTime.civil(2000, 04, 06, 10, 12, 11, 4/24.0), DateTime.civil(2000, 04, 06, 10, 12, 11, 2/24.0))).should == true
+    (DateTime.civil(2000, 04, 06, 10, 12, 11, 4/24.0).between?(DateTime.civil(2000, 04, 06, 10, 12, 11, 4/24.0), DateTime.civil(2000, 04, 06, 10, 12, 11, 2/24.0))).should == true
+  end 
+  
+   it "should be false if the DateTime does not fall in between the two given DateTimes" do
+    (DateTime.civil(2000, 04, 05).between?(DateTime.civil(2000, 04, 06), DateTime.civil(2000, 04, 07))).should == false
+    (DateTime.civil(2000, 04, 06, 10, 12, 11, 5/24.0).between?(DateTime.civil(2000, 04, 06, 10, 12, 11, 4/24.0), DateTime.civil(2000, 04, 06, 10, 12, 11, 2/24.0))).should == false
+  end 
+end

data/spec/datetime/constructor_spec.rb

@@ -0,0 +1,142 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime constructors" do
+  it ".civil creates a datetime with arguments" do
+    d = DateTime.civil(2000, 3, 5, 6, 7, 8, 1/24.0)
+    d.year.should == 2000
+    d.month.should == 3
+    d.day.should == 5
+    d.hour.should == 6
+    d.min.should == 7
+    d.sec.should == 8
+    d.offset.should == 1/24.0
+  end
+  
+  it ".civil should have defaults and an optional sg value" do
+    DateTime.civil.should == DateTime.jd
+    DateTime.civil(2008).should == DateTime.civil(2008, 1, 1, 0, 0, 0, 0.0)
+    DateTime.civil(2008, 1).should == DateTime.civil(2008, 1, 1, 0, 0, 0, 0.0)
+    DateTime.civil(2008, 1, 1).should == DateTime.civil(2008, 1, 1, 0, 0, 0, 0.0)
+    DateTime.civil(2008, 1, 1, 0).should == DateTime.civil(2008, 1, 1, 0, 0, 0, 0.0)
+    DateTime.civil(2008, 1, 1, 0, 0).should == DateTime.civil(2008, 1, 1, 0, 0, 0, 0.0)
+    DateTime.civil(2008, 1, 1, 0, 0, 0).should == DateTime.civil(2008, 1, 1, 0, 0, 0, 0.0)
+    DateTime.civil(2008, 1, 1, 0, 0, 0, 0.0).should == DateTime.civil(2008, 1, 1, 0, 0, 0, 0.0)
+    DateTime.civil(2008, 1, 1, 1, 1, 1, 0.5, 1).should == DateTime.civil(2008, 1, 1, 1, 1, 1, 0.5)
+  end
+
+  it ".commercial creates a datetime with arguments" do
+    d = DateTime.commercial(2000, 3, 5, 6, 7, 8, 1/24.0)
+    d.cwyear.should == 2000
+    d.cweek.should == 3
+    d.cwday.should == 5
+    d.hour.should == 6
+    d.min.should == 7
+    d.sec.should == 8
+    d.offset.should == 1/24.0
+  end
+  
+  ruby_version_is "1.9" do
+    it ".commercial should have defaults and an optional sg value" do
+      DateTime.commercial.should == DateTime.jd
+      DateTime.commercial(2008).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1, 0).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1, 0, 0).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1, 0, 0, 0).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1, 1, 1, 1, 0.5, 1).should == DateTime.commercial(2008, 1, 1, 1, 1, 1, 0.5)
+    end
+  end
+
+  ruby_version_is "" ... "1.9" do
+    it ".commercial should have defaults and an optional sg value" do
+      DateTime.commercial.should == DateTime.commercial(1582, 41, 5)
+      DateTime.commercial(2008).should == DateTime.commercial(2008, 41, 5, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1).should == DateTime.commercial(2008, 1, 5, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1, 0).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1, 0, 0).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1, 0, 0, 0).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0).should == DateTime.commercial(2008, 1, 1, 0, 0, 0, 0.0)
+      DateTime.commercial(2008, 1, 1, 1, 1, 1, 0.5, 1).should == DateTime.commercial(2008, 1, 1, 1, 1, 1, 0.5)
+    end
+  end
+
+  it ".jd creates a datetime with arguments" do
+    d = DateTime.jd(2000, 6, 7, 8, 1/24.0)
+    d.jd.should == 2000
+    d.hour.should == 6
+    d.min.should == 7
+    d.sec.should == 8
+    d.offset.should == 1/24.0
+  end
+  
+  it ".jd should have defaults and an optional sg value" do
+    DateTime.jd.should == DateTime.jd(0, 0, 0, 0, 0)
+    DateTime.jd(0).should == DateTime.jd(0, 0, 0, 0, 0)
+    DateTime.jd(0, 0).should == DateTime.jd(0, 0, 0, 0, 0)
+    DateTime.jd(0, 0, 0).should == DateTime.jd(0, 0, 0, 0, 0)
+    DateTime.jd(0, 0, 0, 0).should == DateTime.jd(0, 0, 0, 0, 0)
+    DateTime.jd(0, 0, 0, 0, 0).should == DateTime.jd(0, 0, 0, 0, 0)
+    DateTime.jd(2008, 1, 1, 1, 0.5, 1).should == DateTime.jd(2008, 1, 1, 1, 0.5)
+  end
+  
+  it ".new! creates a datetime with arguments" do
+    d = DateTime.new!(2422222)
+    d.jd.should == 2422222
+    d.hour.should == 12
+    d.min.should == 0
+    d.sec.should == 0
+    d.offset.should == 0
+
+    d = DateTime.new!(2422222.5)
+    d.jd.should == 2422223
+    d.hour.should == 0
+    d.min.should == 0
+    d.sec.should == 0
+    d.offset.should == 0
+
+    d = DateTime.new!(2422222, 0.5)
+    d.jd.should == 2422223
+    d.hour.should == 0
+    d.min.should == 0
+    d.sec.should == 0
+    d.offset.should == 0.5
+
+    d = DateTime.new!(2422222.5, 0.5)
+    d.jd.should == 2422223
+    d.hour.should == 12
+    d.min.should == 0
+    d.sec.should == 0
+    d.offset.should == 0.5
+  end
+  
+  it ".new! should have defaults and an optional sg value" do
+    DateTime.new!.should == DateTime.jd
+    DateTime.new!(0).should == DateTime.new!(0, 0)
+    DateTime.new!(0, 0).should == DateTime.new!(0, 0)
+    DateTime.new!(2008, 0.5, 1).should == DateTime.new!(2008, 0.5)
+  end
+  
+  it ".ordinal creates a datetime with arguments" do
+    d = DateTime.ordinal(2000, 100, 6, 7, 8, 1/24.0)
+    d.year.should == 2000
+    d.yday.should == 100
+    d.hour.should == 6
+    d.min.should == 7
+    d.sec.should == 8
+    d.offset.should == 1/24.0
+  end
+  
+  it ".ordinal should have defaults and an optional sg value" do
+    DateTime.ordinal.should == DateTime.jd
+    DateTime.ordinal(2008).should == DateTime.ordinal(2008, 1, 0, 0, 0, 0)
+    DateTime.ordinal(2008, 1).should == DateTime.ordinal(2008, 1, 0, 0, 0, 0)
+    DateTime.ordinal(2008, 1, 0).should == DateTime.ordinal(2008, 1, 0, 0, 0, 0)
+    DateTime.ordinal(2008, 1, 0, 0).should == DateTime.ordinal(2008, 1, 0, 0, 0, 0)
+    DateTime.ordinal(2008, 1, 0, 0, 0).should == DateTime.ordinal(2008, 1, 0, 0, 0, 0)
+    DateTime.ordinal(2008, 1, 0, 0, 0, 0).should == DateTime.ordinal(2008, 1, 0, 0, 0, 0)
+    DateTime.ordinal(2008, 1, 1, 1, 1, 0.5, 1).should == DateTime.ordinal(2008, 1, 1, 1, 1, 0.5)
+  end
+end

data/spec/datetime/conversions_spec.rb

@@ -0,0 +1,54 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime conversions" do
+  it "#new_offset should be a separate datetime with a modified offset" do
+    DateTime.new(2008, 1, 1).new_offset(0.5).to_s.should == DateTime.new(2008, 1, 1, 12, 0, 0, 0.5).to_s
+  end
+
+  it "#new_offset result should be equal to the receiver" do
+    DateTime.new(2008, 1, 1).new_offset(0.5).should == DateTime.new(2008, 1, 1)
+  end
+
+  ruby_version_is "" ... "1.9" do
+    it "#newof should be a separate datetime with a modified offset" do
+      DateTime.new(2008, 1, 1).newof(0.5).to_s.should == DateTime.new(2008, 1, 1, 12, 0, 0, 0.5).to_s
+    end
+  end
+end
+
+describe "DateTime marshalling" do
+  it "should marshal and unmarshal correctly" do
+    Marshal.load(Marshal.dump(DateTime.jd)).should == DateTime.civil
+    d = DateTime.now
+    Marshal.load(Marshal.dump(d)).should == d
+    Marshal.load(Marshal.dump(DateTime.civil(2010, 2, 4, 1, 2, 4, 4/24.0))).should == DateTime.civil(2010, 2, 4, 1, 2, 4, 4/24.0)
+  end
+end
+
+ruby_version_is "1.9" do
+  describe "DateTime#to_datetime" do
+    it " should return the receiver" do
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).to_datetime.should == DateTime.new(2009, 1, 2, 3, 4, 5, 0.5)
+    end
+  end
+
+  describe "DateTime#to_date" do
+    it " should return a Date with the same date as receiver" do
+      DateTime.new(2009, 1, 2, 12).to_date.should == Date.new(2009, 1, 2)
+    end
+  end
+
+  describe "DateTime#to_time" do
+    it " should return a Time in local time with the same year, month, day as the receiver" do
+      DateTime.new(2009, 1, 2, 3, 4, 5).to_time.should == Time.utc(2009, 1, 2, 3, 4, 5).getlocal
+    end
+  end
+
+  describe "Time#to_datetime" do
+    it " should return a Date with the same year, month, and day as the receiver" do
+      Time.utc(2009, 1, 2, 3, 4, 5).to_datetime.should == DateTime.new(2009, 1, 2, 3, 4, 5)
+      Time.utc(2009, 1, 2, 3, 4, 5).getlocal.to_datetime.should == DateTime.new(2009, 1, 2, 3, 4, 5)
+    end
+  end
+end
+

data/spec/datetime/day_spec.rb

@@ -0,0 +1,73 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+ruby_version_is "1.9" do
+  describe "DateTime#sunday?" do
+    it "should return true if the day is a Sunday" do
+      DateTime.civil(2009,1,4).sunday?.should == true
+    end
+
+    it "should return false if the day is not a Sunday" do
+      DateTime.civil(2009,1,2).sunday?.should == false
+    end
+  end 
+
+  describe "DateTime#monday?" do
+    it "should return true if the day is a Monday" do
+      DateTime.civil(2009,1,5).monday?.should == true
+    end
+
+    it "should return false if the day is not a Monday" do
+      DateTime.civil(2009,1,2).monday?.should == false
+    end
+  end 
+
+  describe "DateTime#tuesday?" do
+    it "should return true if the day is a Tuesday" do
+      DateTime.civil(2009,1,6).tuesday?.should == true
+    end
+
+    it "should return false if the day is not a Tuesday" do
+      DateTime.civil(2009,1,2).tuesday?.should == false
+    end
+  end 
+
+  describe "DateTime#wednesday?" do
+    it "should return true if the day is a Wednesday" do
+      DateTime.civil(2009,1,7).wednesday?.should == true
+    end
+
+    it "should return false if the day is not a Tuesday" do
+      DateTime.civil(2009,1,2).wednesday?.should == false
+    end
+  end 
+
+  describe "DateTime#thursday?" do
+    it "should return true if the day is a Thursday" do
+      DateTime.civil(2009,1,1).thursday?.should == true
+    end
+
+    it "should return false if the day is not a Thursday" do
+      DateTime.civil(2009,1,2).thursday?.should == false
+    end
+  end 
+
+  describe "DateTime#friday?" do
+    it "should return true if the day is a Friday" do
+      DateTime.civil(2009,1,2).friday?.should == true
+    end
+
+    it "should return false if the day is not a Friday" do
+      DateTime.civil(2009,1,1).friday?.should == false
+    end
+  end 
+
+  describe "DateTime#saturday?" do
+    it "should return true if the day is a Saturday" do
+      DateTime.civil(2009,1,3).saturday?.should == true
+    end
+
+    it "should return false if the day is not a Saturday" do
+      DateTime.civil(2009,1,2).saturday?.should == false
+    end
+  end 
+end

data/spec/datetime/downto_spec.rb

@@ -0,0 +1,39 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#downto" do
+
+  it "should be able to step backward in time" do
+    ds    = DateTime.civil(2000, 4, 14)
+    de    = DateTime.civil(2000, 3, 29)
+    count = 0
+    ds.downto(de) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 17
+  end
+
+  it "should respect fractional days" do
+    ds    = DateTime.civil(2000, 4, 14, 0)
+    de    = DateTime.civil(2000, 3, 29, 12)
+    count = 0
+    ds.downto(de) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 16
+
+    ds    = DateTime.civil(2000, 4, 14, 12)
+    de    = DateTime.civil(2000, 3, 29, 0)
+    count = 0
+    ds.downto(de) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 17
+  end
+
+end

data/spec/datetime/eql_spec.rb

@@ -0,0 +1,17 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#eql?" do
+  it "should be able determine equality between date objects" do
+    DateTime.civil(2007, 10, 11).should eql(DateTime.civil(2007, 10, 11))
+    DateTime.civil(2007, 10, 11, 10, 11, 12, 0.5).should eql(DateTime.civil(2007, 10, 11, 10, 11, 12, 0.5))
+    DateTime.civil(2007, 10, 11, 10, 11, 12, 0.5).should eql(DateTime.civil(2007, 10, 12, 10, 11, 12, 0.5) - 1)
+    DateTime.civil(2007, 10, 11, 10, 11, 12, 0.5).should_not eql(DateTime.civil(2007, 10, 11, 10, 11, 12, 0.4))
+  end
+
+  it "should be able determine equality between a date and a datetime objects" do
+    DateTime.civil(2007, 10, 11).should eql(Date.civil(2007, 10, 11))
+    DateTime.civil(2007, 10, 11).should eql(Date.civil(2007, 10, 12) - 1)
+    DateTime.civil(2007, 10, 11).should_not eql(Date.civil(2007, 10, 12))
+    DateTime.civil(2007, 10, 11, 1).should_not eql(Date.civil(2007, 10, 11))
+  end
+end