mirror of
https://github.com/correl/elm.git
synced 2024-11-16 11:09:29 +00:00
7 lines
124 B
Text
7 lines
124 B
Text
|
module Leap (..) where
|
||
|
|
|
||
|
|
|
||
|
|
isLeapYear : Int -> Bool
|
||
|
|
isLeapYear year =
|
||
|
|
year % 4 == 0 && (year % 100 /= 0 || year % 400 == 0)
|