(** Conversion from an integer.  Round to nearest. *)

Definition BofZ (n: Z) : binary_float :=
  binary_normalize prec emax prec_gt_0_ Hmax mode_NE n 0 false.

Lemma round_odd_flt: forall prec' emin' x choice, prec > 1 -> prec' > 1 -> prec' >= prec + 2 -> emin' <= emin - 2 -> round radix2 fexp (Znearest choice) (round radix2 (FLT_exp emin' prec') Zrnd_odd x) = round radix2 fexp (Znearest choice) x.