proposition: Corollary fmap_compose `{Functor F} `{Functor G} : forall {X Y} (f : X -> Y), @fmap F _ (G X) (G Y) (@fmap G _ X Y f) = @fmap (F \o G) _ X Y f.
proof: Proof. reflexivity. Qed.
imports: Hask.Data.Functor Hask.Control.Applicative Hask.Control.Monad FunctionalExtensionality