{A B C : Type} `{Is1Cat A, Is1Cat B, Is1Cat C} (F : A -> B -> C) `{!Is0Bifunctor F, !Is1Bifunctor F} {a0 a1 a2 : A} (g : a1 $-> a2) (f : a0 $-> a1) {b0 b1 b2 : B} (k : b1 $-> b2) (h : b0 $-> b1) : fmap11 F (g $o f) (k $o h) $== fmap11 F g k $o fmap11 F f h := fmap_pair_comp (uncurry F) _ _ _ _.
Require Import Basics.Overture Basics.Tactics. Require Import Types.Forall Types.Prod. Require Import WildCat.Core WildCat.Prod WildCat.Equiv WildCat.NatTrans