proposition: Lemma isaprop_Zero : isaprop (Zero C).
proof: Proof. apply invproofirrelevance. intros Z Z'. apply (total2_paths_f (isotoid _ H (z_iso_Zeros _ Z Z'))). apply proofirrelevance. unfold isZero. apply isapropdirprod; apply impred; intros t; apply isapropiscontr. Defined.
imports: UniMath.Foundations.PartD UniMath.Foundations.Propositions UniMath.Foundations.Sets UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Core.Univalence UniMath.CategoryTheory.opp_precat UniMath.CategoryTheory.Limits.Initial UniMath.CategoryTheory.Limits.Terminal