Lemma idtoiso_inv (C : category) (a a' : ob C) (p : a = a') : idtoiso (!p) = z_iso_inv_from_z_iso (idtoiso p). Proof. destruct p. simpl. apply z_iso_eq. apply idpath. Defined.
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.