Assignment 1: Intro to Haskell Solution