02/clj: add another sample tree

clarle · Oct 13, 2011 · b9ea77f · b9ea77f
1 parent e93b92d
commit b9ea77f
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/unit02/clojure/unit02/src/unit02/trees.clj b/unit02/clojure/unit02/src/unit02/trees.clj
@@ -51,3 +51,12 @@
                              (node :c [(node :f [(node :x [])
                                                  (node :y [(node :z [])])])
                                        (node :g [])])]))
+
+(def sample-tree-3 (node :a [(node :b [(node :d [(node :i [])
+                                                 (node :j [])])
+                                       (node :e [])])
+                             (node :q [(node :l [(node :n [(node :o [(node :p [])])])])
+                                       (node :m [(node :q [])])])
+                             (node :c [(node :f [(node :x [])
+                                                 (node :y [(node :z [])])])
+                                       (node :g [])])]))