iritmaximus/haskell
1
0
Fork 0
mirror of https://github.com/iritmaximus/haskell.git synced 2026-10-12 19:13:39 +03:00
Code Issues Packages Projects Releases Wiki Activity

4b ex2

Browse Source
This commit is contained in:
Aaro Koivukangas
2025-12-22 21:00:16 +02:00
parent 5b03b871c1
commit b55b116ec0
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
exercises/Set4b.hs
+2 -1
View File
@@ -38,7 +38,8 @@ myMaximum :: [Int] -> Int
myMaximum [] = 0 myMaximum [] = 0
myMaximum (x:xs) = foldr maxHelper x xs myMaximum (x:xs) = foldr maxHelper x xs
maxHelper = todo maxHelper :: Int -> Int -> Int
maxHelper x acc = if x > acc then x else acc
------------------------------------------------------------------------------ ------------------------------------------------------------------------------
-- Ex 3: compute the sum and length of a list with a fold. Define -- Ex 3: compute the sum and length of a list with a fold. Define