[Haskell] Functor ((,) a)