module Hello where hello n = concat(replicate n "hello ") hello :: Int -> [Char]