proposition: Lemma iso_stable_under_equalitytransportation {C : category} {x y z : C} {f : C⟦x,y⟧} {g : C⟦x,z⟧} {pf : y=z} : (g = transportf _ pf f) -> (is_z_isomorphism f) -> (is_z_isomorphism g).
proof: Proof. intros p isof. use (iso_stable_under_equality p). use (iso_stable_under_tranportation). exact isof. Qed.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Monoidal.AlternativeDefinitions.MonoidalCategoriesCurried