From 78636495692cc41761ad58f10b4479b6f06bdbaf Mon Sep 17 00:00:00 2001
From: Mart Lubbers
Date: Sat, 25 Apr 2015 12:18:42 +0200
Subject: finally, week2 done:)

---
 fp2/week2/mart/oldold/old/Map.icl | 19 -------------------
 1 file changed, 19 deletions(-)
 delete mode 100644 fp2/week2/mart/oldold/old/Map.icl

(limited to 'fp2/week2/mart/oldold/old/Map.icl')

diff --git a/fp2/week2/mart/oldold/old/Map.icl b/fp2/week2/mart/oldold/old/Map.icl
deleted file mode 100644
index d248c66..0000000
--- a/fp2/week2/mart/oldold/old/Map.icl
+++ /dev/null
@@ -1,19 +0,0 @@
-implementation module Map
-
-//import BinTree
-import StdMaybe
-import StdList
-
-class Map c :: (a -> b) (c a) -> c b
-
-instance Map [] where 
-	Map f [] = []
-	Map f [x:xs] = [f x: Map f xs]
-
-instance Map Maybe where
-	Map f Nothing = Nothing
-	Map f (Just x) = Just (f x)
-
-//instance Map Tree  where
-//	Map f Leaf = Leaf
-//	Map f (Node x l r) = Node (f x) (mapTree f l) (mapTree f r)
-- 
cgit v1.2.3