From caf697acd1ee77877b7cbe1c3895c47cd6c2df4c Mon Sep 17 00:00:00 2001
From: Mart Lubbers
Date: Thu, 23 Apr 2015 15:10:52 +0200
Subject: started with week2

---
 fp2/week2/mart/StdMonad.dcl | 8 ++++++++
 1 file changed, 8 insertions(+)
 create mode 100644 fp2/week2/mart/StdMonad.dcl

(limited to 'fp2/week2/mart/StdMonad.dcl')

diff --git a/fp2/week2/mart/StdMonad.dcl b/fp2/week2/mart/StdMonad.dcl
new file mode 100644
index 0000000..cd1c654
--- /dev/null
+++ b/fp2/week2/mart/StdMonad.dcl
@@ -0,0 +1,8 @@
+definition module StdMonad
+
+class return        c :: a -> c a
+class (>>=) infix 0	c :: (c a) (a -> c b) -> c b
+class fail          c :: c a
+
+class Monad	        c | return, >>= c
+class MonadFail	    c | Monad, fail c
-- 
cgit v1.2.3