Added a beginner haskell solution to keep with the tone