Section monotone_abs.
Variable rnd : R -> Z.
Context { valid_rnd : Valid_rnd rnd }.

(* Specifications: *)
Theorem abs_round_ge_generic :
forall x y, generic_format x -> (x <= Rabs y)%R -> (x <= Rabs (round rnd y))%R.
Theorem abs_round_ge_generic :
forall x y, generic_format x -> (x <= Rabs y)%R -> (x <= Rabs (round rnd y))%R.