- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
两点边值问题的差分求解
微分方程数值解
姓名 丁建伟 学号 200708020211 日期 2010.11.25 实验项目 两点边值问题的差分求解 指导教师 徐强 上机实验的问题和要求(需求分析):
实验内容:(I) 分别在步长h=1/20,1/40,1/80,1/160情形下用中心差分格式计算齐次两点边值问题-u"=f,u(0)=u(1)=0。其中f(x) = 100*exp(-10*x),精确解为u(x) = 1 - (1-exp(-10))*x - exp(-10*x)(II) 给出差分解近似精确解在无穷范数和L2范数下的误差阶。目的与要求:掌握中心差分格式的程序实现掌握分析算法误差的方法二、程序设计的基本思想,原理和算法描述:
基本思想及原理:
做均匀网格剖分:
,分点步长 在节点处,对微分方程离散化
有
其中
记在节点数值解为 ,
则有
比较知
所以
表示用差分算子代替微分算子产生的误差
称之为(局部)截断误差。这里关于的阶为 。
注意
所以
由此知:(局部)截断误差可视为差分格式,将数值解换成相应真解值后,左端减右端,再做Taylor展式获得的(可作为计算公式)。
方程的联立形式(中心差分格式)
矩阵形式 (其中 是三对角矩阵)
又因为A是三对称矩阵,而且符合追赶法的使用条件,故可用追赶法求解U的解。
主要程序代码或命令:
#includestdio.h
#includemath.h
#define MAX 200 /*预定义数组大小*/
void main()
{ int n,i; /*初始化阶数n*/
float u[MAX],y[MAX];
float F[MAX],f[MAX],m[MAX];
float h,x; /*步长*/
printf(请输入等分数n值:);
scanf(%d,n); /*读入阶数*/
h=1/float(n);
m[1]=-0.5;
for(i=2;i=n-2;i++)
m[i]=-1/(2+m[i-1]);
for(i=1,x=h;x1.0;x+=h,i++)
{F[i]=100*exp(-10*x);
f[i]=1-(1-exp(-10))*x-
文档评论(0)