< 99 Elm Problems < Problem 7
Solution 1: Recursive version
flatten list =
case list of
Elem e -> [ e ]
NestedList [] -> []
NestedList (head :: tail) -> flatten head ++ flatten (NestedList tail)
This article is issued from Wikibooks. The text is licensed under Creative Commons - Attribution - Sharealike. Additional terms may apply for the media files.