add :: Int -> Int -> Int add n m = n + m len :: String -> Int len str = Prelude.length str