src/Data/Functor/Kan/Rift.hs:108:10:
Illegal equational constraint g ~ h
(Use -XTypeFamilies to permit this)
In the context: (Functor g, g ~ h)
While checking the context of an instance declaration
In the instance declaration for `Applicative (Rift g h)'
https://ghc.haskell.org/~hvr/buildreports/kan-extensions.html