diff options
| author | Camil Staps | 2017-09-14 11:55:09 +0200 |
|---|---|---|
| committer | Camil Staps | 2017-09-14 11:55:09 +0200 |
| commit | 29f3bc73cdeffcc59cfe0644f67bcb57b758d0d9 (patch) | |
| tree | 0a40edd9cedf9d05f31a8c6a32eb3fccce503d15 /assignment-1/program2.icl | |
| parent | foldl instead of seq+map (diff) | |
foldr instead of seq+map
Diffstat (limited to 'assignment-1/program2.icl')
| -rw-r--r-- | assignment-1/program2.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/assignment-1/program2.icl b/assignment-1/program2.icl index 304699a..1c70366 100644 --- a/assignment-1/program2.icl +++ b/assignment-1/program2.icl @@ -61,4 +61,4 @@ where Start = (Ccontains 3 c, Cshow c) where c :: Bin Int // Change to [Int] for testing the [] instance - c = seq (map Cinsert [10..20]) Cnew + c = foldr Cinsert Cnew [10..20] |