#[export] Instance Rge_Reflexive : Reflexive Rge | 10 := Rge_refl.

(* Specifications: *)
Lemma Req_le : forall r1 r2, r1 = r2 -> r1 <= r2.
Lemma Req_ge : forall r1 r2, r1 = r2 -> r1 >= r2.
Lemma Rlt_irrefl : forall r, ~ r < r.