proposition: Lemma isaprop_ispreorder {X : hSet} (R : hrel X) : isaprop (ispreorder R).
proof: Proof. intros. unfold ispreorder. apply isapropdirprod. { apply isaprop_istrans. } { apply isaprop_isrefl. } Defined.
imports: UniMath.Foundations.Propositions