(** Conversions to/from 32-bit integers can be implemented by going through 64-bit integers. *)
Remark ZofB_range_widen:
forall (f: float) n min1 max1 min2 max2,
ZofB_range _ _ f min1 max1 = Some n ->
min2 <= min1 -> max1 <= max2 ->
ZofB_range _ _ f min2 max2 = Some n.

Theorem to_intu_to_long:
forall f n, to_intu f = Some n -> to_long f = Some (Int64.repr (Int.unsigned n)).