module Main where main :: IO () main = putStrLn "I have 23 apples."