import System.IO isLeapYear :: Int -> Bool isLeapYear year -- implement here main :: IO () main = do content <- readFile "example-input" print $ isLeapYear 2000