计算固体力学课程作业.doc

计算固体力学课程作业.doc

ID:59131595

大小:1.92 MB

页数:25页

时间:2020-09-12

计算固体力学课程作业.doc_第1页
计算固体力学课程作业.doc_第2页
计算固体力学课程作业.doc_第3页
计算固体力学课程作业.doc_第4页
计算固体力学课程作业.doc_第5页
资源描述:

《计算固体力学课程作业.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、计算固体力学课程作业专业固体力学学号姓名尹亚川作业1:(一)、,其中,(1)试用直接迭代法,Newton-Raphson方法,修正Newton-Raphson方法,拟Newton-Raphson方法进行求解并进行比较。(2)用Euler-Newton法计算,f分2级求解:(1)直接迭代法:(1)(2)于是得近似解(3)重复这一过程,以第i次近似解求出第i+1次近似解的迭代公式为(4)(5)直到(6)变得充分小,即近似解收敛时,终止迭代。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为5次,。取,令,运用matlab进行编程求解(代

2、码见附录)。可得迭代次数为4次,。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为2次,。(1)Newton-Raphson方法(7)(8)(9)(10)(11)(12)当变得充分小,即近似解收敛时,终止迭代。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为11次,。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为4次,。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为1次,。(1)修正的Newton-Raphson方法将Newton-Raphsom法迭代公式中的改用初始矩阵,

3、就是修正的Newton-Raphsom法。仅第一步迭代需要完全求解一个线性方程组,并将存贮起来,以后的每一步迭代都采用公式(13)当变得充分小,即近似解收敛时,终止迭代。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为次,。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为21次,。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为1次,。(1)拟Newton-Raphson方法K的修正要满足一下的拟牛顿方程(14)对于单变量情况,上式中的是导数的近似表达式,实际上就是割线劲度矩阵。(15)(16)

4、(17)(18)(19)当变得充分小,即近似解收敛时,终止迭代。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为11次,。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为4次,。取,令,运用matlab进行编程求解(代码见附录)。可得迭代次数为1次,。根据结果可知,在精度取时,Newton法和拟Newton法迭代次数基本一致,收敛速度较快,而修正的Newton法迭代次数较多,收敛速度较慢。不过,Newton法和拟Newton法计算量较大,而修正Newton法计算量较小。并且,直接迭代法在解决这种简单问题时迭代次数

5、也较少,收敛速度较快。若本题不考虑迭代次数,而对精度要求较高,建议采用Newton法和拟Newton法;若本题对精度要求不高,主要考虑迭代次数,建议采用Newton法和拟Newton;法;若本题对精度和迭代次数要求不高,主要考虑计算量,建议采用修正Newton法。Euler-Newton法在增量步内采用Newton迭代法。现以和分别表示第级载荷增量时的初值和终值,以表示第级增量时的的终值,则由式(11)得第增量步的迭代公式(20)(21)(22)(23)如果每一增量步内只迭代一次,此时(24)(25)则对第m增量步有(26)(27)设,,,,,,。

6、设,根据Euler-Newton法基本原理运用matlab编程(代码见附录)得,,,,。于是可得。附录:%直接迭代法clear;y0=1;n=0;fori=1:100;y1=-10/(10*(1+exp(8*y0)));d=y1-y0;y0=y1;if(abs(d)>0.);formatlong,y0n=n+1;nendend%newton-raphsom法clear;y0=1;n=0;fori=1:100;k=10+10*exp(8*y0)+80*y0*exp(8*y0);f=10*y0+10*y0*exp(8*y0);d=1/k*(-10-f)

7、;y0=y0+d;if(abs(d)>0.);formatlong,y0n=n+1;nendend%修正的newton-raphsom法clear;y0=1;a=1;n=0;fori=1:;k=10+10*exp(8*a)+80*a*exp(8*a);f=10*y0+10*y0*exp(8*y0);d=1/k*(-10-f);y0=y0+d;if(abs(d)>0.);y0n=n+1;nendend%拟newton-raphsom法clear;y0=1;n=0;fori=1:100;f0=10*y0+10*y0*exp(8*y0);k0=10+10

8、*exp(8*y0)+80*y0*exp(8*y0);b=1/k0*(-10-f0);a0=f0+10;y1=y0+b;f

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。