xreal_module.f90: fixed a bug x**0 should be 1.0. implemented repeated squaring method in xpowi