Fixed point iterative method using mathematica (x = g(x))