summaryrefslogtreecommitdiff
path: root/p4.hs
blob: 1aea62962ef23e2870d16bace6af109dbe19e11a (plain)
1
2
3
myLength :: [a] -> Integer

myLength = foldl (\x _ -> x+1) 0