proposition: Lemma iseo_Dcuts_le_lt_rel : isEffectiveOrder Dcuts_le_rel Dcuts_lt_rel.
proof: Proof. split. - split. + exact ispreorder_Dcuts_le_rel. + exact isstpo_Dcuts_lt_rel. - repeat split. + now apply Dcuts_le_ngt_rel. + apply (pr2 (Dcuts_le_ngt_rel _ _)). + exact istrans_Dcuts_lt_le_rel. + exact istrans_Dcuts_le_lt_rel. Qed.
imports: UniMath.MoreFoundations.Orders UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.Notations UniMath.RealNumbers.Sets UniMath.Algebra.ConstructiveStructures UniMath.OrderTheory.Lattice.Lattice UniMath.RealNumbers.Prelim UniMath.RealNumbers.NonnegativeRationals