[Haskell-cafe] Unique functor instance