Evaluate the final "test" in a “For” command?

Found this code in the literature that evidently worked in Version 7 of Mathematica evidenced by the published output. It now seems to ignore the final “test” in the “For” statement. Any ideas as to why? Attached it the code.

TestCase2-16.nb (7.89 KB)

Is this the result you expect?

This is the output I get as well. According to the published paper which I will attach, there is a second part for 3 iterations.

NewtonHomotopyContinuationMethodusingMathematica.pdf (525 KB)

Problem solved!

You have used Curly brackets instead of Round brackets / parantheses in line

H[x_, t_] = (1 - t)*(g[x]) + t (f[x]);

An updated file is attached. Have fun!

TestCase2-16.nb (24.2 KB)

You would not believe how long I looked for the problem and never found it. Thanks a bunch.