(** Rbar_div_pos *)

(* Specifications: *)
Lemma Rbar_div_pos_eq (x y : Rbar) (z : posreal) :
x = y <-> (Rbar_div_pos x z) = (Rbar_div_pos y z).
Lemma Rbar_div_pos_lt (x y : Rbar) (z : posreal) :
Rbar_lt x y <-> Rbar_lt (Rbar_div_pos x z) (Rbar_div_pos y z).
Lemma Rbar_div_pos_le (x y : Rbar) (z : posreal) :
Rbar_le x y <-> Rbar_le (Rbar_div_pos x z) (Rbar_div_pos y z).