haskell part2

haskell part1