From 79c91f9cdf0824f9c5a1b2e5d0fe1284ce403b8a Mon Sep 17 00:00:00 2001 From: Mart Lubbers Date: Fri, 4 Sep 2015 13:04:24 +0200 Subject: [PATCH] final mart ass1 --- a1/mart/skeleton1.icl | 10 ---------- 1 file changed, 10 deletions(-) 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) ] -- 2.20.1