Day of the week: Difference between revisions
m
→{{header|Haskell}}
m (→JS ES6) |
|||
Line 1,973:
Using the time library:
<lang haskell>import Data.Time (fromGregorian)
import Data.Time.Calendar.WeekDate (toWeekDate)
--------------------- DAY OF THE WEEK --------------------
isXmasSunday :: Integer -> Bool
isXmasSunday year = 7 == weekDay
where
--------------------------- TEST -------------------------
main :: IO ()
main =
mapM_
putStrLn
[ "25 December "
| year <- [2008 .. 2121]
]</lang>
{{out}}
<pre>
| |||