[Haskell-beginners] How to make instance of MonoFunctor