(** Zeven, used for rounding to nearest, ties to even *)
Definition Zeven (n : Z) :=
  match n with
  | Zpos (xO _) => true
  | Zneg (xO _) => true
  | Z0 => true
  | _ => false
  end.

Theorem Zeven_Zpower_odd : forall b e, (0 <= e)%Z -> Zeven b = false -> Zeven (Zpower b e) = false.