求解非线性方程

dingiacas

求解附件中方程时，跑了很长的一段时间(半个小时)后总出现：
“No more memory available.
Mathematica kernel has shut down.
Try quitting other applications and then retry."
我的电脑配置是：
intel core(TM) 2 Duo CPU
2.00GB的内存。最大可能地关闭了其他的应用程序，程序前两小段运行都比较快，主要是最后一段出问题。网上搜了这个问题，很多说法不一。被这个程序困扰很久了。
麻烦高手指点一下，谢谢了！
程序见附件。

FreddyMusic

你问的问题太大，代码也太多太乱。

挑关键的问，这样你才有可能获得你想要的答案。