Dear David and Jim,
Thanks for flagging the typos that I missed while debugging the Mathematica script, and that seems to have fixed part of the problem. I also retype set MaxIterations -> 50 in the FindRoot line, but this produces a new FindRoot Error seen as:
The Notebook was created before the 1st Edition of the book was printed in 2012, and the Notebook was not changed when the 2nd Edition was printed in 2015. I am not actively using Mathematica these days, even though I used it rigorously when V1 was released for performing the Symbolic Integration of 2D waveguide cross-section fields. The integrals would normally take 30-days to do by hand with the CRC tables, and then converting the final equation into Fortran. Sign errors were always troublesome, but Mathematica expedited that work 30x for me and produced Fortran code when the Symbolic Integration was completed.
I wish Mathematica provided more information for errors, particularly for typos, but it fails miserably. I thought I could get this Notebook running in a few days, but that has not worked out for me. In conclusion, if you look at the attached Notebook with the typos I missed corrected, do you know what could be causing the new FindRoot error message to be created?
Thanks in advance,
Scott
Attachments: