From: Mart Lubbers <mart@martlubbers.net>
Date: Fri, 4 Sep 2015 11:04:24 +0000 (+0200)
Subject: final mart ass1
X-Git-Tag: assignment2~8
X-Git-Url: https://git.martlubbers.net/?a=commitdiff_plain;h=79c91f9cdf0824f9c5a1b2e5d0fe1284ce403b8a;p=ap2015.git

final mart ass1
---

diff --git a/a1/mart/skeleton1.icl b/a1/mart/skeleton1.icl
index 128974d..f94b558 100644
--- a/a1/mart/skeleton1.icl
+++ b/a1/mart/skeleton1.icl
@@ -167,13 +167,3 @@ treeToGen (Bin x xr xl) = RIGHT (PAIR x (PAIR xr xl))
 //3.2.	Yes
 //3.3.	Less defining and easier overloading
 //3.4.	Overhead, the compiler has to translate on and on
-
-Start = [Red >< Yellow, Blue >< Yellow, Blue >< Blue,
-	(Bin 1 Tip Tip) >< Tip,
-	[1, 2] >< [2, 3],
-	[1, 2] >< [1, 2],
-	[1, 3] >< [1, 2],
-//	[] >< [],
-//	Tip >< Tip,
-	(Bin 1 Tip Tip) >< (Bin 1 Tip Tip),
-	Tip >< (Bin 1 Tip Tip) ]