From 6f604b19d3f5966e5c1d7c4fdf3703bd6ff0861c Mon Sep 17 00:00:00 2001
From: Mart Lubbers
Date: Thu, 16 Apr 2015 21:22:20 +0200
Subject: update to fp2 yay, public and licence

---
 fp1/week2/camil/TupleOverloading.dcl | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 fp1/week2/camil/TupleOverloading.dcl

(limited to 'fp1/week2/camil/TupleOverloading.dcl')

diff --git a/fp1/week2/camil/TupleOverloading.dcl b/fp1/week2/camil/TupleOverloading.dcl
new file mode 100644
index 0000000..6831948
--- /dev/null
+++ b/fp1/week2/camil/TupleOverloading.dcl
@@ -0,0 +1,25 @@
+definition module TupleOverloading
+
+import StdEnv
+
+instance +    (a,b)   | + a & + b
+instance +    (a,b,c) | + a & + b & + c
+
+
+instance -    (a,b)   | - a & - b
+instance -    (a,b,c) | - a & - b & - c
+
+instance *    (a,b)   | * a & * b
+instance *    (a,b,c) | * a & * b & * c
+
+instance /    (a,b)   | / a & / b
+instance /    (a,b,c) | / a & / b & / c
+
+instance zero (a,b)   | zero a & zero b
+instance zero (a,b,c) | zero a & zero b & zero c
+
+instance one  (a,b)   | one a & one b
+instance one  (a,b,c) | one a & one b & one c
+
+instance ~    (a,b)   | ~ a & ~ b
+instance ~    (a,b,c) | ~ a & ~ b & ~ c
-- 
cgit v1.2.3