Thank you very much Andy,
Your suggestion really reduced the calculation time. I appreciate your attention regarding the modifications.
I used the Mathcad help about the functions "time" and "trace" and didn't understand how they work. I need to spend more time on your modifications to fully understand their roles.
