Adding start attempt at writing in haskell. Needs do something clever within the IO monad... whatever that may mean to me