Jacobi迭代实例_第1页
Jacobi迭代实例_第2页
Jacobi迭代实例_第3页
免费预览已结束,剩余1页可下载查看

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、连续梁内力有限元数值 jacobi 迭代计算学院:建筑工程学院学号:2111206052 姓名:王瑞峰一、问题来源对很多实际问题建立数学模型以后的得到是偏微分方程或者边界问题,对这些问题用有限元法进行离散化而得到的是线性方程组,因此求任何实际问题边界的关键是正确的离散化和解线性方程组。应用有限元位移法计算如图 1 所示的连续梁内力二、数学模型经过求单元刚度矩阵及相应的单元贡献矩阵, 得到整体刚体矩阵:引入支承条件,本问题中支承条件为= 0 ,=0,因此将整体矩阵 k 的第 1 ,4行和列进行修改 , 同时荷载列阵 p 的第1 ,4 个元素改为 0 ,得基本方程:三、方法选择考虑线性方程组 ax

2、 = b 时,一般当 a 为低阶稠密矩阵时,用主元消去法解此方程组是有效方法。但是,对于由工程技术中产生的大型稀疏矩阵方程组(a 的阶数很高,但零元素较多,例如求某些偏微分方程数值解所产生的线性方程组),利用迭代法求解此方程组就是合适的,在计算机内存和运算两方面,迭代法通常都可利用 a 中有大量零元素的特点。雅克比迭代法就是众多迭代法中比较早且较简洁的一种。考察一般形式的线性方程组:,i=1,2,3,(1)设从(1)中分别变出变量 xi,将它改写成:i=1,2,3,n据此建立迭代公式i=1,2,3,n四、编程实现本文接受 fortran 软件求解,程序的代码如下: program ex02im

3、plicit none integer:i,j,k,l=30,m=4,n=4 real:e=0.0000001 real:y(4),x(4)=(/0,0,0,0/)real:b(4)=(/0,-700,-500,0/) real:a(4,4)=(/1,0,0,0,0,12,4,0,0,4,12,0,0,0,0,1/)do k=0,l write(*,*)k,x(1),x(2),x(3),x(4) doi=1,ndo j=1,mif(i-j)/=0)y(i)=y(i)+(-a(i,j)/a(i,i)*x(j) end doy(i)=y(i)+b(i)/a(i,i) end doif(max(abs(y(1)-x(1),abs(y(2)-x(2),abs(y(3)-x(3),abs(y(4)- x(4)<e) stopx=y y=(/0,0,0,0/)end do end程序的代码截图如下:计算结果截图如下:五、误差要求对(2)求基本方程,得其精确解:由迭代过程可知,jacobi 迭代误差大 ,效率低 ,收敛速度慢。六、实际意义分析对于

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论