From a39aea354b071612c071d98125e879fe14c76a54 Mon Sep 17 00:00:00 2001 From: Joe Zhao Date: Mon, 13 Apr 2015 15:21:21 +0800 Subject: +61 +62 +63 --- H61.hs | 5 +++++ 1 file changed, 5 insertions(+) create mode 100644 H61.hs (limited to 'H61.hs') diff --git a/H61.hs b/H61.hs new file mode 100644 index 0000000..64dd9e3 --- /dev/null +++ b/H61.hs @@ -0,0 +1,5 @@ +import Tree + +countLeaves Empty = 0 +countLeaves (Branch _ Empty Empty) = 1 +countLeaves (Branch _ t1 t2) = countLeaves t1 + countLeaves t2 -- cgit v1.2.3-70-g09d2