proposition: Lemma double_transport_idtoiso (C : precategory) (a a' b b' : ob C) (p : a = a') (q : b = b') (f : a --> b) : double_transport p q f = inv_from_z_iso (idtoiso p) · f · idtoiso q.
proof: Proof. destruct p. destruct q. intermediate_path (identity _ · f). - apply pathsinv0; apply id_left. - apply pathsinv0; apply id_right. Defined.
imports: UniMath.Foundations.PartA UniMath.Foundations.Sets UniMath.MoreFoundations.PartA UniMath.MoreFoundations.Tactics UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Isos