Exercise 5.3

Note: Anonymous functions are not introduced until chapter 9! But they are an easy way to solve problems like this.

mylength :: [a] -> Int
mylength xs = foldl (\x _ -> x + 1) 0 xs

One Response to “Exercise 5.3”

  1. Minime says:

    same one without anonymous function
    length1 x = foldl count 0 x where count x y = x + 1

Leave a Reply