-- | Static table containing the number of days within a month.
unadjustedMaxInMonth :: [Int]
unadjustedMaxInMonth = [31,28,31,30,31,30,31,31,30,31,30,31]
unadjustedMaxInMonth :: [Int]
unadjustedMaxInMonth = [31,28,31,30,31,30,31,31,30,31,30,31]
unadjustedMaxInMonth = [31,28,31,30,31,30,31,31,30,31,30,31]