My haskell homework tasks