intros e z H'; apply Rlt_le; auto with real.
Qed.
Hint Resolve powerRZ_le: real.

(* Specifications: *)
Theorem Rlt_powerRZ :
forall (e : R) (n m : BinInt.Z),
(1 < e)%R -> (n < m)%Z -> (powerRZ e n < powerRZ e m)%R.
Theorem Rlt_powerRZ :
forall (e : R) (n m : Z),
(1 < e)%R -> (n < m)%Z -> (powerRZ e n < powerRZ e m)%R.