`(p : morphism C x y) `(q : morphism C x z) `(@IsIsomorphism C y z r) : p = (r^-1 o q) -> (r o p) = q. Proof. iso_concat_t. Qed.
Require Import Category.Core Functor.Core. Require Import HoTT.Tactics Basics.Trunc Basics.Tactics Types.Sigma Equivalences.