module One (one) where one :: Int one = 1