{A : Type} {D : A -> Type} `{IsD1Cat A D} {a b c : A} {f g : a $-> b} {h k : b $-> c} {p : f $== g} {q : h $== k} {a' : D a} {b' : D b} {c' : D c} {f' : DHom f a' b'} {g' : DHom g a' b'} {h' : DHom h b' c'} {k' : DHom k b' c'} (p' : DHom p f' g') (q' : DHom q h' k') : DHom (p $@@ q) (h' $o' f') (k' $o' g') := (k' $@L' p') $o' (q' $@R' f').
Require Import Basics.Overture. Require Import Basics.PathGroupoids. Require Import Basics.Tactics. Require Import Types.Sigma. Require Import WildCat.Core. Require Import WildCat.Prod.