Name: Anonymous 2007-01-31 22:01
Haskell, single greatest language ever created in the history of man. Discuss
items :: IO [String]
items =
readFile "file" >>=
return . (filter (not . ("#" `isPrefixOf`))) . (filter (not . null)) . lines
main :: IO ()
main = items >>= putStr . drawForest . subForest . buildTree >> return ()