chapter 2: excercise 2.2
finding my way in haskell :P