Applicative.hs exercises completed