Dear Gregory, According to [1]:

For any given event during the years from 1901 to 2099 inclusive, its date according to the Julian calendar is 13 days behind its corresponding Gregorian date.

And 13 days before 2020-01-08 is indeed 2019-12-26, which is the 360th day of the year 2019, so I am not sure about your confusion. If you pick a date in the first 13 days of the year, then the Julian conversion will indeed lead to a date in the year before. Maybe you are thinking about August the 1st? Your date parsing, with month coming first, is odd for most parts of the world; the date you are parsing in the example is the 8th of January in the year 2020. Regards, Jeroen Bransen [1] https://en.wikipedia.org/wiki/Julian_calendar Op 6-8-2020 om 05:23 schreef Gregory Guthrie:

I don’t understand why the Julian conversion are given relative to 2019, instead of 2020, and don’t seem to actually show the date index.

Must be misreading the library specs?

toJulianYearAndDay :: Day https://hackage.haskell.org/package/time-1.6/docs/Data-Time-Calendar.html#t:... -> (Integer https://hackage.haskell.org/package/base-4.8.1.0/docs/Prelude.html#t:Integer, Int https://hackage.haskell.org/package/base-4.8.1.0/docs/Data-Int.html#t:Int)

     convert to proleptic Julian year and day format. First element of result is year (proleptic Julian calendar), second is the day of the year, with 1 for Jan 1, and 365

toJulian :: Day https://hackage.haskell.org/package/time-1.6/docs/Data-Time-Calendar.html#t:... -> (Integer https://hackage.haskell.org/package/base-4.8.1.0/docs/Prelude.html#t:Integer, Int https://hackage.haskell.org/package/base-4.8.1.0/docs/Data-Int.html#t:Int, Int https://hackage.haskell.org/package/base-4.8.1.0/docs/Data-Int.html#t:Int) Source https://hackage.haskell.org/package/time-1.6/docs/src/Data-Time-Calendar-Jul...

    convert to proleptic Julian calendar. First element of result is year, second month number (1-12), third day (1-31).

----------------------------------------------------------------------------------

 

ds = "1/8/2020"

day = parseTimeOrError True defaultTimeLocale "%-m/%-d/%Y"   ds :: UTCTime

 

getDay       = toGregorian       . utctDay

getDayOfYear = toJulian          . utctDay

getDayYear   = toJulianYearAndDay. utctDay

 

main = do

      print day

      print $ getDay       day

      print $ getDayYear   day

      print $ getDayOfYear day

 

2020-01-08 00:00:00 UTC

(2020,1,8)

(2019,360)

(2019,12,26)

And;

2020-02-08 00:00:00 UTC

(2020,2,8)

(2020,26)

(2020,1,26)

 

Dr. Gregory Guthrie

Maharishi International University

----------------------------------------------------------------

 

_______________________________________________ Haskell-Cafe mailing list To (un)subscribe, modify options or view archives go to: http://mail.haskell.org/cgi-bin/mailman/listinfo/haskell-cafe Only members subscribed via the mailman list are allowed to post.

-- Jeroen Bransen Lead Back-end Developer at Chordify -- https://chordify.net