Execute HQ9+/Haskell: Difference between revisions
m
Changed spacing.
Underscore (talk | contribs) (Created page with '<lang haskell>import Char (toLower, toUpper) main = interact hq9p hq9p :: String -> String hq9p source = concatMap run $ map toLower source where run 'h' = "Hello, world!\n" …') |
Underscore (talk | contribs) m (Changed spacing.) |
||
Line 22:
up (x : xs) = Char.toUpper x : xs
num (-1) = "99"
num 0 = "no more"
num n = show n
s 1 = ""
s _ = "s"</lang>
| |||