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

---
 files/practicum/StdStack.icl | 24 ------------------------
 1 file changed, 24 deletions(-)
 delete mode 100644 files/practicum/StdStack.icl

(limited to 'files/practicum/StdStack.icl')

diff --git a/files/practicum/StdStack.icl b/files/practicum/StdStack.icl
deleted file mode 100644
index 4b3a1f8..0000000
--- a/files/practicum/StdStack.icl
+++ /dev/null
@@ -1,24 +0,0 @@
-implementation module StdStack
-
-import StdEnv
-
-:: Stack a = ... // maak deze type definitie af (mag ook een synoniem type zijn, maar gebruik dan :== in plaats van =)
-
-Start  = ( "s0 = newStack = ",        s0,'\n'
-         , "s1 = push 1 s0 = ",       s1,'\n'
-         , "s2 = pushes [2..5] s1 = ",s2,'\n'
-         , "s3 = pop s2 = ",          s3,'\n'
-         , "s4 = popn 3 s3 = ",       s4,'\n'
-         , "s5 = top s4 = ",          s5,'\n'
-         , "s6 = topn 3 s2 = ",       s6,'\n'
-         , "s7 = elements s2 = ",     s7,'\n'
-         )
-where
-	s0 = newStack
-	s1 = push 1 s0
-	s2 = pushes [2..5] s1
-	s3 = pop s2
-	s4 = popn 3 s3
-	s5 = top s4
-	s6 = topn 3 s2
-	s7 = elements s2
-- 
cgit v1.2.3