版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、 一维抛物线偏微分方程数值解法(2)上一篇文章请参看 一维抛物线偏微分方程数值解法(1)解一维抛物线型方程(理论书籍可以参看孙志忠:偏微分方程数值解法)Ut-Uxx=0, 0<x<1,0<t<=1(Ut-aUxx=f(x,t),a>0) U(x,0)=ex, 0<=x<=1,U(0,t)=et,U(1,t)=e(1+t), 0<t<=1精确解为:U(x,t)=e(x+t);Matlab程序: (此为向后差分法)function u p e x t=pwxywxh(h1,h2,m,n)%欧拉向后差分法解一维抛物线型偏微分方程%此程序用的是追赶
2、法解线性方程组%h1为空间步长,h2为时间步长%m,n分别为空间,时间网格数%p为精确解,u为数值解,e为误差x=(0:m)*h1+0;t=(0:n)*h2+0;for(i=1:n+1)for(j=1:m+1) f(i,j)=0;endendfor(i=1:n+1) u(i,1)=exp(t(i); u(i,m+1)=exp(1+t(i);endfor(i=1:m+1) u(1,i)=exp(x(i);endr=h2/(h1*h1);for(i=2:n+1) %外循环,先固定每一时间层,每一时间层上解一线性方程组% a(1)=0;b(1)=1+2*r;c(1)=-r;d(1)=u(i-1,2)
3、+h2*f(i,2)+r*u(i,1);for(k=2:m-2) a(k)=-r;b(k)=1+2*r;c(k)=-r;d(k)=u(i-1,k+1)+h2*f(i,k+1);%输入部分系数矩阵,为0的矩阵元素不输入%end a(m-1)=-r;b(m-1)=1+2*r;d(m-1)=u(i-1,m)+h2*f(i,m)+r*u(i,m+1);for(k=1:m-2) %开始解线性方程组 消元过程 a(k+1)=-a(k+1)/b(k); b(k+1)=b(k+1)+a(k+1)*c(k); d(k+1)=d(k+1)+a(k+1)*d(k);end u(i,m)=d(m-1)/b(m-1);
4、 %回代过程% for(k=m-2:-1:1) u(i,k+1)=(d(k)-c(k)*u(i,k+2)/b(k);endendfor(i=1:n+1)for(j=1:m+1) p(i,j)=exp(x(j)+t(i); %p为精确解 e(i,j)=abs(u(i,j)-p(i,j);%e为误差endendu p e x t=pwxywxh(0.1,0.005,10,200);surf(x,t,e); xlabel('x');ylabel('t');zlabel('e');>> title('误差曲面'); plot(t,e)误差较之前的欧拉向前差分格式 增长了两倍u p e x t=pwxywxh(0.1,0.05,10,20);plot(t,e)u p e x t=pwxywxh(0.01,0.05,100,20);plot(t,e)u p e x t=pwxywxh(0.01,0.01,100,100);plot(t,e)u p e x t=pwxywxh(0.01,0.005,100,200);plot(x,e)u p e x t=pwxywxh(0.01,0.005,100,200);plot(t,e)u p e x t=pwxywxh(0.005,0.0
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 黄山学院《材料力学》2021-2022学年第一学期期末试卷
- 淮阴师范学院《中学思想政治学科教学论》2021-2022学年第一学期期末试卷
- 淮阴师范学院《现代教师礼仪》2021-2022学年第一学期期末试卷
- 淮阴师范学院《雕塑》2022-2023学年第一学期期末试卷
- 淮阴师范学院《大学体育》2021-2022学年第一学期期末试卷
- 淮阴工学院《通信电子线路》2022-2023学年期末试卷
- DB5115-T 129-2024《油樟优树选择技术规程》
- DB 3705-T 14-2024《城市大脑场景应用开发规范》
- 噢易教育桌面云解决方案(100点)
- 劳动防护用品知识培训考核试卷
- 教师教学述评管理制度
- 建立网络安全管理责任制明确安全工作职责和责任
- 安徽省工伤职停工留薪分类目录
- 30题南昌轨道交通集团供电技术类岗位岗位常见面试问题含HR问题考察点及参考回答
- 农贸市场摊位招商方案
- 医疗设备采购 投标技术方案 (技术方案)
- 《化学课程思政元素》
- 2024继续教育《医学科研诚信与医学了研究伦理》答案
- 门诊品管圈课件:提高门诊治疗患者健康教育的满意度
- 职业生涯报告六篇
- 作业本印制服务投标方案(技术标)
评论
0/150
提交评论