99 questions/Solutions/70C

From HaskellWiki
< 99 questions‎ | Solutions
Revision as of 03:53, 10 January 2017 by Wizzup (talk | contribs) (categorize)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)

(*) Count the nodes of a multiway tree. 

nnodes :: Tree a -> Int
nnodes (Node _ ts) = 1 + sum (map nnodes ts)
Retrieved from "https://wiki.haskell.org/index.php?title=99_questions/Solutions/70C&oldid=61415"