(*******************************)
(** *       Power              *)
(*******************************)
(*********)
Infix "^" := pow : R_scope.

Lemma Rlt_pow_R1 : forall (x:R) (n:nat), 1 < x -> (0 < n)%nat -> 1 < x ^ n.
#[global]
Hint Resolve Rlt_pow_R1: real.