Lemma isotoid_identity_iso (C : category) (H : is_univalent C) (a : C) : isotoid _ H (identity_z_iso a) = idpath _ . Proof. apply idtoiso_inj; try assumption. rewrite idtoiso_isotoid; apply idpath. Qed.
Require Import UniMath.Foundations.PartA. Require Import UniMath.Foundations.Sets. Require Import UniMath.MoreFoundations.PartA. Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Isos.