proposition: Theorem po_category_is_univalent_iff_is_antisymm (PO : po X) : is_univalent (po_category PO) <-> isantisymm PO.
proof: Proof. split. - intros isuni a b relab relba. apply (isotoid _ isuni). exists relab. exists relba. apply make_is_inverse_in_precat; apply po_homsets_isaprop. - intro poasymm. intros ? ?. apply (antisymm_po_category_isweq PO poasymm). Defined.
imports: UniMath.Foundations.HLevels UniMath.Foundations.Sets UniMath.Foundations.Propositions UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Core.Univalence