(** Reasoning by case on equality and order *)

(*********************************************************)
(** ** Relating [<], [>], [<=] and [>=]                  *)
(*********************************************************)
(** *** Relating strict and large orders *)
Lemma Rlt_le : forall r1 r2, r1 < r2 -> r1 <= r2.
#[global]
Hint Immediate Rnot_le_lt: real.