Lesson 4: Haskell: recursion