Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Token
--ghc 7.10 import Data.Char data Token = Digit | Alpha deriving (Show, Eq) tokenize :: String -> [Token] tokenize (c : rest) = if isDigit c then Digit : tokenize rest else Alpha : tokenize rest tokenize [] = [] main = print $ tokenize "passwd123" --main = print $ "Hello, world!"
run
|
edit
|
history
|
help
0
Sierpinski Triangle as lazy list
project euler 4, haskell
My "tying the knot"
Cubed
Advansed Hello Word
Factorial in haskell
project euler 6, haskell
NQueens
Invert a monotonic function
Fibonacci proof