      real x(0:10001), newx(0:10001), dx2
      n=10000
      dx2 = (1.0/n)**2
      NoIters=100000