Safe Haskell | Trustworthy |
---|---|
Language | Haskell2010 |
Synopsis
- type Year = Integer
- type MonthOfYear = Int
- type DayOfMonth = Int
- type DayOfYear = Int
- toJulianYearAndDay :: Day -> (Integer, Int)
- fromJulianYearAndDay :: Integer -> Int -> Day
- fromJulianYearAndDayValid :: Integer -> Int -> Maybe Day
- showJulianYearAndDay :: Day -> String
- isJulianLeapYear :: Integer -> Bool
- toJulian :: Day -> (Integer, Int, Int)
- fromJulian :: Integer -> Int -> Int -> Day
- pattern JulianYearMonthDay :: Year -> MonthOfYear -> DayOfMonth -> Day
- fromJulianValid :: Integer -> Int -> Int -> Maybe Day
- showJulian :: Day -> String
- julianMonthLength :: Integer -> Int -> Int
- addJulianMonthsClip :: Integer -> Day -> Day
- addJulianMonthsRollOver :: Integer -> Day -> Day
- addJulianYearsClip :: Integer -> Day -> Day
- addJulianYearsRollOver :: Integer -> Day -> Day
- addJulianDurationClip :: CalendarDiffDays -> Day -> Day
- addJulianDurationRollOver :: CalendarDiffDays -> Day -> Day
- diffJulianDurationClip :: Day -> Day -> CalendarDiffDays
- diffJulianDurationRollOver :: Day -> Day -> CalendarDiffDays
Documentation
type MonthOfYear = Int #
Month of year, in range 1 (January) to 12 (December).
type DayOfMonth = Int #
Day of month, in range 1 to 31.
Day of year, in range 1 (January 1st) to 366. December 31st is 365 in a common year, 366 in a leap year.
toJulianYearAndDay :: Day -> (Integer, 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 (or 366 in leap years) for Dec 31.
fromJulianYearAndDay :: Integer -> Int -> Day #
Convert from proleptic Julian year and day format. Invalid day numbers will be clipped to the correct range (1 to 365 or 366).
fromJulianYearAndDayValid :: Integer -> Int -> Maybe Day #
Convert from proleptic Julian year and day format. Invalid day numbers will return Nothing
showJulianYearAndDay :: Day -> String #
Show in proleptic Julian year and day format (yyyy-ddd)
isJulianLeapYear :: Integer -> Bool #
Is this year a leap year according to the proleptic Julian calendar?
toJulian :: Day -> (Integer, Int, Int) #
Convert to proleptic Julian calendar. First element of result is year, second month number (1-12), third day (1-31).
fromJulian :: Integer -> Int -> Int -> Day #
Convert from proleptic Julian calendar. First argument is year, second month number (1-12), third day (1-31). Invalid values will be clipped to the correct range, month first, then day.
pattern JulianYearMonthDay :: Year -> MonthOfYear -> DayOfMonth -> Day #
Bidirectional abstract constructor for the proleptic Julian calendar. Invalid values will be clipped to the correct range, month first, then day.
fromJulianValid :: Integer -> Int -> Int -> Maybe Day #
Convert from proleptic Julian calendar. First argument is year, second month number (1-12), third day (1-31). Invalid values will return Nothing.
showJulian :: Day -> String #
Show in ISO 8601 format (yyyy-mm-dd)
julianMonthLength :: Integer -> Int -> Int #
The number of days in a given month according to the proleptic Julian calendar. First argument is year, second is month.
addJulianMonthsClip :: Integer -> Day -> Day #
Add months, with days past the last day of the month clipped to the last day. For instance, 2005-01-30 + 1 month = 2005-02-28.
addJulianMonthsRollOver :: Integer -> Day -> Day #
Add months, with days past the last day of the month rolling over to the next month. For instance, 2005-01-30 + 1 month = 2005-03-02.
addJulianYearsClip :: Integer -> Day -> Day #
Add years, matching month and day, with Feb 29th clipped to Feb 28th if necessary. For instance, 2004-02-29 + 2 years = 2006-02-28.
addJulianYearsRollOver :: Integer -> Day -> Day #
Add years, matching month and day, with Feb 29th rolled over to Mar 1st if necessary. For instance, 2004-02-29 + 2 years = 2006-03-01.
addJulianDurationClip :: CalendarDiffDays -> Day -> Day #
Add months (clipped to last day), then add days
addJulianDurationRollOver :: CalendarDiffDays -> Day -> Day #
Add months (rolling over to next month), then add days
diffJulianDurationClip :: Day -> Day -> CalendarDiffDays #
Calendrical difference, with as many whole months as possible
diffJulianDurationRollOver :: Day -> Day -> CalendarDiffDays #
Calendrical difference, with as many whole months as possible.
Same as diffJulianDurationClip
for positive durations.