End Floor_Ceil.
Section Zdiv_Rdiv.

(* Specifications: *)
Theorem Zfloor_div :
forall x y,
y <> Z0 ->
Zfloor (Z2R x / Z2R y) = (x / y)%Z.
Theorem Zfloor_div :
forall x y,
y <> Z0 ->
Zfloor (Z2R x / Z2R y) = (x / y)%Z.