code produced in haskell dojo session 3
set next time's homework and problem