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 ex6

Browse Source
This commit is contained in:
Aaro Koivukangas
2025-12-22 21:40:05 +02:00
parent 2fa25f7fe6
commit 465a2b4803
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
exercises/Set4b.hs
+3 -2
View File
@@ -108,8 +108,9 @@ largestHelper x acc
myHead :: [a] -> Maybe a
myHead xs = foldr headHelper Nothing xs
headHelper = todo
headHelper :: a -> Maybe a -> Maybe a
headHelper x Nothing = Just x
headHelper x (Just a) = Just x
------------------------------------------------------------------------------
-- Ex 7: get the last element of a list with a fold. Define lasthelper
-- so that the given definition of myLast works.