You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
7 lines
181 B
7 lines
181 B
7 years ago
|
module Words where
|
||
|
|
||
|
myWords :: String -> [String]
|
||
|
myWords [] = []
|
||
|
myWords (' ' : xs) = myWords xs
|
||
|
myWords xs = [takeWhile b xs] ++ (myWords (dropWhile b xs))
|
||
|
where b = (/=) ' '
|