Tried to improve expmod