From 379b6353396ca2401241d714733d570629835ffe Mon Sep 17 00:00:00 2001
From: Mart Lubbers
Date: Fri, 6 Feb 2015 08:39:37 +0100
Subject: added practicum files, updated gitignore

---
 files/practicum/EersteOfLaatste.icl | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)
 create mode 100644 files/practicum/EersteOfLaatste.icl

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

diff --git a/files/practicum/EersteOfLaatste.icl b/files/practicum/EersteOfLaatste.icl
new file mode 100644
index 0000000..bb02c4c
--- /dev/null
+++ b/files/practicum/EersteOfLaatste.icl
@@ -0,0 +1,37 @@
+implementation module EersteOfLaatste
+
+import StdEnv
+
+//	1.
+eerste2 :: [a] -> [a]
+eerste2 ...
+
+laatste2 :: [a] -> [a]
+laatste2 ...
+
+
+//	2.
+//  Reduceer de volgende Start-regels met de hand:
+Start = hd (hd (hd [[[1,2,3],[4]],[[5],[6]]]))
+Start = hd (tl [1,2,3,4,5])
+Start = eerste2 [[1],[],[2,3],[4,5,6]]
+Start = laatste2 [[1],[],[2,3],[4,5,6]]
+
+
+//	3.
+eersten  :: Int [a] -> [a]
+eersten ...
+
+laatsten :: Int [a] -> [a]
+laatsten ...
+
+//	4.
+//  Maak de volgende beweringen af:
+/*
+Voor alle 0 <= n, xs :: [a] : eersten n (eersten  n xs) = 
+Voor alle 0 <= n, xs :: [a] : eersten n (laatsten n xs) = 
+Voor alle 0 <= n, xs :: [a] : laatsten n (eersten n xs) = 
+Voor alle 0 <= n, xs :: [a] : laatsten n (laatsten n xs) = 
+Voor alle 0 <= m <= n, xs :: [a] : eersten m (eersten n xs) = 
+Voor alle 0 <= m <= n, xs :: [a] : length (eersten m xs) ? length (eersten n xs)
+*/
-- 
cgit v1.2.3