Visualize a tree: Difference between revisions

→‎{{header|Haskell}}: Tidied to foreground the fmap
m (→‎{{header|Haskell}}: Minor edit to tree, and update to output.)
(→‎{{header|Haskell}}: Tidied to foreground the fmap)
Line 980:
We can ''fmap show'' over our tree of integers to derive a tree of strings, and apply `drawTree` to that.
 
<lang haskell>import Data.Tree (Tree (..), drawTree)
 
tree :: Tree Int
Line 991:
 
main :: IO ()
main = (putStrLn $. drawTree (show. <$>fmap treeshow) tree</lang>
{{Out}}
<pre>1
9,659

edits