diff options
Diffstat (limited to 'H61.hs')
-rw-r--r-- | H61.hs | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -0,0 +1,5 @@ +import Tree + +countLeaves Empty = 0 +countLeaves (Branch _ Empty Empty) = 1 +countLeaves (Branch _ t1 t2) = countLeaves t1 + countLeaves t2 |