hoi
[fp1415.git] / fp2 / week6 / mart / BinTree.dcl
diff --git a/fp2/week6/mart/BinTree.dcl b/fp2/week6/mart/BinTree.dcl
new file mode 100755 (executable)
index 0000000..93d8ed8
--- /dev/null
@@ -0,0 +1,16 @@
+definition module BinTree\r
+\r
+::  BTree a = BNode a (BTree a) (BTree a) | BLeaf\r
+\r
+t0 :: BTree Int\r
+t1 :: BTree Int\r
+t2 :: BTree Int\r
+t3 :: BTree Int\r
+t4 :: BTree Int\r
+t5 :: BTree Int\r
+t6 :: BTree Int\r
+t7 :: BTree Int\r
+\r
+//nodes  :: // meest algemene type\r
+//leaves :: // meest algemene type\r
+//diepte :: // meest algemene type\r