summaryrefslogtreecommitdiff
path: root/files/practicum/AVLTreeTest.icl
diff options
context:
space:
mode:
Diffstat (limited to 'files/practicum/AVLTreeTest.icl')
-rw-r--r--files/practicum/AVLTreeTest.icl9
1 files changed, 9 insertions, 0 deletions
diff --git a/files/practicum/AVLTreeTest.icl b/files/practicum/AVLTreeTest.icl
new file mode 100644
index 0000000..8f91031
--- /dev/null
+++ b/files/practicum/AVLTreeTest.icl
@@ -0,0 +1,9 @@
+module AVLTreeTest
+
+import StdEnv, StdAVLTree, Subs
+
+// Test alle mogelijkheden:
+Start = filter (not o isAVLTree) (map (foldr deleteAVLTree tree) (subs elementen))
+where
+ elementen = [3,2,1,0,1,2,3,2,1,0,1,2,3]
+ tree = foldr insertAVLTree mkAVLLeaf elementen