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/StdMaybeMonad.icl | 10 ---------- 1 file changed, 10 deletions(-) delete mode 100644 fp2/week2/mart/oldold/old/StdMaybeMonad.icl (limited to 'fp2/week2/mart/oldold/old/StdMaybeMonad.icl') diff --git a/fp2/week2/mart/oldold/old/StdMaybeMonad.icl b/fp2/week2/mart/oldold/old/StdMaybeMonad.icl deleted file mode 100644 index 1c6277d..0000000 --- a/fp2/week2/mart/oldold/old/StdMaybeMonad.icl +++ /dev/null @@ -1,10 +0,0 @@ -implementation module StdMaybeMonad - -import StdMonad - -:: Maybe a = Nothing | Just a - -instance return Maybe where return x = Just x -instance >>= Maybe where >>= (Just x) f = f x - >>= Nothing f = Nothing -instance fail Maybe where fail = Nothing -- cgit v1.2.3