Solved 020 in Haskell.