haskell homework on cis194