End of section 2.
Dont know haskell well enough.