proposition: Lemma islogeqhfalse_hdisj {P : hProp} : ∅ ∨ P <-> P.
proof: Proof. split. - apply hinhuniv; intros hPPQ. induction hPPQ as [hF|hP]. + induction hF. + exact hP. - intros hP; apply (hinhpr (ii2 hP)). Defined.
imports: UniMath.MoreFoundations.Notations UniMath.MoreFoundations.PartA UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions