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/BewijsMapO.icl | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 1415/files/practicum/BewijsMapO.icl (limited to '1415/files/practicum/BewijsMapO.icl') diff --git a/1415/files/practicum/BewijsMapO.icl b/1415/files/practicum/BewijsMapO.icl new file mode 100644 index 0000000..144a4d6 --- /dev/null +++ b/1415/files/practicum/BewijsMapO.icl @@ -0,0 +1,12 @@ +Zij gegeven: + + map :: (a -> b) [a] -> [b] + map f [] = [] (1) + map f [x:xs] = [f x : map f xs] (2) + + (f o g) x = f (g x) (3) + +Bewijs de volgende stelling voor alle eindige lijsten xs en functies f en g: + + map (f o g) xs = map f (map g xs) + -- cgit v1.2.3