diff options
author | Camil Staps | 2016-02-02 19:24:50 +0100 |
---|---|---|
committer | Camil Staps | 2016-02-02 19:24:50 +0100 |
commit | a7d7542dc646a5fd124ef71e71ce260889f1701b (patch) | |
tree | 04ed89503bbb3cc9933273a1326a53ca724c3492 /files/practicum/NotatieFuncties.icl | |
parent | week6 camil: working positioning of lines by putting empties at left and righ... (diff) |
Diffstat (limited to 'files/practicum/NotatieFuncties.icl')
-rw-r--r-- | files/practicum/NotatieFuncties.icl | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/files/practicum/NotatieFuncties.icl b/files/practicum/NotatieFuncties.icl deleted file mode 100644 index 87c9b8a..0000000 --- a/files/practicum/NotatieFuncties.icl +++ /dev/null @@ -1,34 +0,0 @@ -module NotatieFuncties
-
-import StdEnv
-
-f1 :: Int
-f1 = 1 + 5
-
-f2 :: Int
-f2 = (+) 1 5
-
-f3 :: Int Int -> Int
-f3 m n
-| m < n = m
-| otherwise = n
-
-f4 :: String Int -> String
-f4 s n
-| n <= 0 = ""
-| otherwise = s +++ f4 s (n-1)
-
-f5 :: Int Int -> Int
-f5 x 0 = x
-f5 x y = f5 y (x rem y)
-
-f6 :: (Int,Int) -> Int
-f6 x = fst x + snd x
-
-f7 :: (a,b) -> (b,a)
-f7 (a,b) = (b,a)
-
-f8 :: (a,a) -> (a,a)
-f8 x = f7 (f7 x)
-
-Start = f1
|