End Zround_opp.
(** IEEE-754 roundings: up, down and to zero *)
Global Instance valid_rnd_DN : Valid_rnd Zfloor.
Global Instance valid_rnd_UP : Valid_rnd Zceil.
Global Instance valid_rnd_ZR : Valid_rnd Ztrunc.
Global Instance valid_rnd_AW : Valid_rnd Zaway.
Section monotone.
Variable rnd : R -> Z.
Context { valid_rnd : Valid_rnd rnd }.

Theorem round_ZR_or_AW :
forall x,
round rnd x = round Ztrunc x \/ round rnd x = round Zaway x.