From a7d7542dc646a5fd124ef71e71ce260889f1701b Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Tue, 2 Feb 2016 19:24:50 +0100
Subject: Moved to 1415 directory

---
 1415/files/practicum/LijstOverloading.icl | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 1415/files/practicum/LijstOverloading.icl

(limited to '1415/files/practicum/LijstOverloading.icl')

diff --git a/1415/files/practicum/LijstOverloading.icl b/1415/files/practicum/LijstOverloading.icl
new file mode 100644
index 0000000..5d40186
--- /dev/null
+++ b/1415/files/practicum/LijstOverloading.icl
@@ -0,0 +1,20 @@
+implementation module LijstOverloading
+
+import StdEnv, LijstGenerator
+
+instance zero [a] | zero a where 
+instance one  [a] | one  a where 
+instance ~    [a] | ~    a where 
+instance +    [a] | +    a where 
+instance -    [a] | -    a where 
+instance *    [a] | *    a where 
+instance /    [a] | /    a where 
+
+Start  = (test [1,2,3], test [1.0,2.0,3.0])
+
+test a = ( zero + a == a && a == a + zero
+         , a - zero == a && a == ~ (zero - a)
+         ,  one * a == a && a == a * one
+         ,  a / one == a
+         ,  ~ (~ a) == a
+         )
-- 
cgit v1.2.3