下载
加入VIP
  • 专属下载特权
  • 现金文档折扣购买
  • VIP免费专区
  • 千万文档免费下载

上传资料

关闭

关闭

关闭

封号提示

内容

首页 Matlab解微分方程.doc

Matlab解微分方程.doc.doc

Matlab解微分方程.doc

问我好助手
2017-10-22 0人阅读 举报 0 0 暂无简介

简介:本文档为《Matlab解微分方程.docdoc》,可适用于综合领域

Matlab解微分方程doc第十六章偏微分方程的数值解法科学研究和工程技术中的许多问题可建立偏微分方程的数学模型。包含多个自变量的微分方程称为偏微分方程(partialdifferentialequation)简称PDE。偏微分方程问题其求解是。除少数特殊情况外绝大多数情况均难以求出精确解。因此近似解法就显得十分困难的更为重要。本章仅介绍求解各类典型偏微分方程定解问题的差分方法。几类偏微分方程的定解问题一个偏微分方程的表示通常如下:ABCfxy,,,,,,,(,,,,)()xxxyyyxy式中是常数称为拟线性(quasilinear)数。通常存在种拟线性方程:ABC,,双曲型(hyperbolic)方程:BAC,,抛物线型(parabolic)方程:BAC,,椭圆型(ellliptic)方程:。BAC,,双曲型方程最简单形式为一阶双曲型方程:,,uu(),a,,tx物理中常见的一维振动与波动问题可用二阶波动方程:,,uu,a(),,tx描述它是双曲型方程的典型形式。方程的初值问题为:,,,uu,,,,,,,atx,,,,tx,,uxx,(,)()(),,,,u,,,,,,,xx(),,,t,t,边界条件一般有三类最简单的初边值问题为:,,,uu,,,,,,atTxl,,,,tx,,,uxl(,),,,(),utgtultgttT(,)(),(,)(),,,,,,,u,,,,,,()xx,,,t,t,,抛物型方程其最简单的形式为一维热传导方程:,,uu,,,aa()(),,tx方程可以有两种不同类型的定解问题:()初值问题:,uu,,atx,,,,,,,,,,()tx,,,,,uxxx(,)(),,,,,,,()初边值问题:,uu,,atTxl,,,,,,,,tx,,,,,uxxxl(,)(),,,(),,utgtultgttT(,)(),(,)(),,,,,,,其中,()x为已知函数且满足连接条件:gt()gt()(),,()(),()(),,glg边界条件为第一类边界条件。utgtultgt(,)(),(,)(),,第二类和第三类边界条件为:,u,,,()()tugtx,,,,x(),,tT,u,()()tugt,xl,,,,x其中。当时为第二类边界条件否则称为第三类边界条,()t,,()t,,,()()tt,,件。椭圆型方程其最典型、最简单的形式是泊松(Poisson)方程,,uu,,,ufxy(,)(),,xy特别地当时即为拉普拉斯(Laplace)方程又称为调和方程:fxy(,),,u,u,u,,(),x,yPoisson方程的第一边值问题为:,,,uu,,,fxyxy(,)(,),xy,,(),,,uxyxy(,)(,),,,,,(,)xy,,,,,其中为以为边界的有界区域为分段光滑曲线称为定解区域,fxy(,),(,)xy,,,分别为上的已知连续函数。,第二类和第三类边界条件可统一表示为:,,,u(),,(,),uxy,,(,)xy,,,n,,,其中n为边界的外法线方向。当,,时为第二类边界条件,,时为第三类边界条件。差分方法的基本概念差分方法又称为有限差分方法或网格法是求偏微分方程定解问题的数值解中应用最广泛的方法之一。它的基本思想是:先对求解区域作网格剖分将自变量的连续变化区域用有限离散点(网格点)集代替将问题中出现的连续变量的函数用定义在网格点上离散变量的函数代替通过用网格点上函数的差商代替导数将含连续变量的偏微分方程定解问题化成只含有限个未知数的代数方程组(称为差分格式)。如果差分格式有解且当网格无限变小时其解收敛于原微分方程定解问题的解则差分格式的解就作为原问题的近似解(数值解)。因此用差分方法求偏微分方程定解问题一般需要解决以下问题:()选取网格()对微分方程及定解条件选择差分近似列出差分格式()求解差分格式()讨论差分格式解对于微分方程解的收敛性及误差估计。下面用一个简单的例子来说明用差分方法求解偏微分方程问题的一般过程及差分方法的基本概念。设有一阶双曲型方程初值问题。,,uu,,,,,,,,atx,,tx,,(),,,uxx(,)(),,选取网格:图差分示意图Dxtxt,,,,,,,{(,),}首先对定解区域作网格剖分最简单常用一种网格是用两族t分别平行于轴与轴的等距直线:xttjkj,,,,,,,(,,,,,,),()xxkh,,jk将分成许多小矩形区域。这些直线称为网格线其交点称为网格点也称为节点和分Dh,别称作方向和t方向的步长。这种网格称为矩形网格。x()对微分方程及定解条件选择差分近似列出差分格式。如果用向前差商表示一阶偏导数即:uxtuxt(,)(,),,uhkjkj,,,,,uxht(,)kjx,xh(,)xtkj()uxtuxt(,)(,),,ukjkj,,,,,uxt(,),,kjt,t,(,)xtkj其中。,,,,,方程:,,uu,a(),,tx在节点(,)xt处可表示为:kjuxtuxtuxtuxt(,)(,)(,)(,),,kjkjkjkja,hah,,,,,,uxtuxht(,)(,)(),,,kjkjtx,,,,,Rxtkj(,)(,,,,,,,)kj其中:。由于当足够小时在式中略去Rxt(,)就得到h,,uxxk(,)()(,,,),,,,,kjkk一个与方程相近似的差分方程:uuuu,,,kjkjkjkj,,,,a(),hu(,)xt此处可看作是问题的解在节点处的近似值。同初值条件:kj,kjuxk,,,,,()(,,,)()kk,结合就得到求问题的数值解的差分格式。式:,ah,,,,(,)(,)(,)(),,RxtuxtuxhtOh(),,,,kjkjkjtxqp称为差分方程的截断误差。如果一个差分方程的截断误差为则称差分方程对ROh,(),t是阶精度对x是阶精度的。显然截断误差的阶数越大差分方程对微分方程的逼近pq越好。若网格步长趋于时差分方程的截断误差也趋于则称差分方程与相应的微分方程是相容的。这是用差分方法求解偏微分方程问题的必要条件。如果当网格步长趋于时差分格式的解收敛到相应微分方程定解问题的解则称这种差分格式是收敛的。双曲型方程的差分解法一阶双曲型方程的差分格式考虑一阶双曲型方程的初值问题:,,uu,,,,,,,,atx,,tx,,(),,,uxxx(,)(),,,,,,,xt,将平面剖分成矩形网格取方向步长为方向步长为网格线为:ht,x,,ttjj,,,,(,,)xxkhk,,,,,(,,,)jk为简便记:(,)(,)kjxt,,ukjuxtx(,)(,),(),,,,kjkjkk以不同的差商近似偏导数可以得到方程的不同的差分近似uuuu,,kjkjkjkj,,,,,a(),huuuu,,kjkjkjkj,,,,,,a(),huuuu,,kjkjkjkj,,,,,,a(),h截断误差分别为Oh()Oh()与。结合离散化的初始条件可以得到几种简单,,Oh(),的差分格式:uuaruu,,,(),kjkjkjkj,,,,,()(,,,,,,,)kj,,,,,,u,,kk,,uuaruu,,,(),kjkjkjkj,,,,,,()(,,,,,,,)kj,,,,,,u,,kk,,ar,()uuuu,,,,kjkjkjkj,,,,,()(,,,,,,,)kj,,,,,,,u,kk,,,r,其中:。如果已知第层节点上的值按上面三种格式就可求出第层上的值。uujjkj,kj,h因此这三种格式都是显式格式。,u,u如果对采用向后差商采用向前差商则方程可化成:,t,xukjukjukjukj(,)(,)(,)(,),,,,,aOh()()h,相应的差分格式为:uuaruu,,,(),kjkjkjkj,,,,,()(,,,,,,,)kj,,,,,,u,,kk,,此差分格式是一种隐式格式必须通过解方程组才能由第层节点上的值求出第层节ujjkj,点上的值。ukj,x,,,,uu,,,tx,,,,,,,,,tx,,,例对初值问题:其中:()xx,,,,,,,uxxx(,)(),,,,,,,x,,,,r,,uj(,,,),用差分格式求其数值解取。kj,h解:记由初始条件:xkhk,,,,(,,,)k,,k,,,,,,,,,,,()xk,kk,,,k,,,按差分格式:uuaruu,,,(),kjkjkjkj,,,,,(,,,,,,,)kj,,,,,,u,,kk,,uuu,,计算公式为:。计算结果略。kjkjkj,,,如果用差分格式:uuaruu,,,(),kjkjkjkj,,,,,,(,,,,,,,)kj,,,,,,u,,kk,,求解计算公式为:uuu,()kjkjkj,,,,计算结果略。与准确解:xt,,,,uxtxt(,),,,,x,,,比较知按前一个差分格式所求得的数值解不收敛到初值问题的解而后一个差分格式的解收敛到原问题的解。波动方程的差分格式对二阶波动方程:,,uu,a(),,tx,u,u如果令则方程可化成一阶线性双曲型方程组:v,v,,x,t,,vv,,a,,,tx,(),,,vv,,,,,tx,Tv(,),vv记则方程组可表成矩阵形式:a,,,vvv(),,A,,,,,txxAP矩阵有两个不同的特征值,,,a故存在非奇异矩阵使得:a,PAP,,,(),,,aTwv(,),,Pww作变换方程组可化为:,,ww(),,,,tx方程组由二个独立的一阶双曲型方程联立而成。因此本节主要讨论一阶双曲型方程的差分解法。下面给出如下波动方程和边界条件的差分格式:()uxtcuxyxatb(,)(,),,,,,,ttxxutuattb(,),(,),,,,,,()uxftxa(,)(),,,,,uxgxxa(,)(),,,t,将矩形划分成个小矩形长宽分别为:,,xhRxtxatb,,,,,{(,):,}()()nm,,形成一个网格如图所示。,,tk图网格图可通过差分方程的方法计算近似值:{:,,,}uin,在连续行内jm,,,,ij,网格点的真实值为。uxt(,)ii求和的中心差分为:uxt(,)uxt(,)ttxxuxtkuxtuxtk(,)(,)(,),,uxtOk(,)(),()ttkuxhtuxtuxht(,)(,)(,),,uxtOh(,)(),()xxh在每一行的网格间距是均匀的:而且。同时它在每一列也是均xxh,xxh,,iiii,匀的。接下来将和去掉用()和()中的近uttk,ttk,,Ok()Oh()ij,iiii,似并按顺序代入()式可得到差分方程:uxt(,)ijuuuuuu,,ijijijijijij,,,,,,,,,c()kh可用它来近似()式。为方便起见可将代入上式可得:rckh,uuuruuu,,,()()ijijijijijij,,,,,,,,设行和的近似值已知可用上式求网格的行:j,jjururuuu,,,()()()ijijijijij,,,,,,,式中。根据上式左边的个已知值可得到近似值u如图所示。in,,,,,ij,图波动方程的空格样板用上式时必须注意如果计算的某个阶段带来的误差最终会越来越小则方法是稳定的。为了保证上式的稳定性必然使rckh,,。还存在其他一些差分方程方法以称为隐格式法它们更难实现但对无限制。r差分方法求解波动方程的MATLAB程序求解区间Rxtxatb,,,,,{(,):,}以()为边界条件的波动方程的差分方法程序。**********************************************************functionU=finedif(f,g,a,b,c,n,m)Inputf=u(x,)asastring'f'g=ut(x,)asastring'g'aandbrightendpointsof,aand,bctheconstantinthewaveequationnandmnumberofgridpointsover,aand,bOutputUsolutionmatrixanalogoustoTableInitializeparametersandUh=a(n)k=b(m)r=c*khr=r^r=r^s=r^s=*r^U=zeros(n,m)Computfirstandsecondrowsfori=:nU(i,)=feval(f,h*(i))U(i,)=s*feval(f,h*(i))k*feval(g,h*(i))r*(feval(f,h*i)feval(f,h*(i)))endComputeremainingrowsofUforj=:m,fori=:(n),U(i,j)=s*U(i,j)r*(U(i,j)U(i,j))U(i,j)endendU=U'*******************************************************************抛物型方程的差分解法以一维热传导方程:,,uu(),,,aa(),,tx为基本模型讨论适用于抛物型方程定解问题的几种差分格式。差分格式的建立首先对xt,平面进行网格剖分。分别取为方向与t方向的步长用两族平行直线h,,xttjj,,,,(,,)将xt,平面剖分成矩形网格节点为:xxkhk,,,,,(,,,)jk(,)(,,,,,,)xtkj,,,,。为简便记:kj(,)(,)kjxt,ukjuxt(,)(,),ggt,(),,,()t,,,()x,,,()xkjkjjjjjkkkk,,,()t。jj微分方程的差分近似,u在网格内点处对分别采用向前、向后及中心差商公式:(,)kj,t,,uukjukj(,)(,),O(),,t,(,)kj,,,uukjukj(,)(,),O()(),,t,(,)kj,,,uukjukj(,)(,),O(),,t(,)kj,一维热传导方程可分别表示为:ukjukjukjukjukj(,)(,)(,)(,)(,),,,,,,aOh()()h,ukjukjukjukjukj(,)(,)(,)(,)(,),,,,,,,aOh()()h,ukjukjukjukjukj(,)(,)(,)(,)(,),,,,,,,aOh()()h,由此得到一维热传导方程的不同差分近似:uuuuu,,kjkjkjkjkj,,,,,,(),,a,huuuuu,,kjkjkjkjkj,,,,,,,(),,a,huuuuu,,kjkjkjkjkj,,,,,,,(),,a,h上述差分方程所用到的节点各不相同。其截断误差分别为和Oh(),Oh(),。因此它们都与一维热传导方程相容。Oh(),ukjukjukjukjukj(,)(,)(,)(,)(,),,,,,,,aOh()如果将式:中的用ukj,h,uu()代替则可得到又一种差分近似:kjkj,,,uuuuuu,,,kjkjkjkjkjkj,,,,,,,,,,,a(),h差分方程用到四个节点。由Taylor公式容易得出:uuuO,,()()()kjkjkj,,,,,,,故其的截断误差为。因而不是对任意的此差分方程都能逼近热h,,,OhO(),,,h,,,,uu,,,aa,()传导方程:仅当时才成立。,,oh(),,tx综上可知用不同的差商公式可以得到微分方程的不同的差分近似。构造差分格式的关键在于使其具有相容性、收敛性和稳定性。前面三个方程都具有相容性而此方程则要在一定条件下才具有相容性。初、边值条件的处理为用差分方法求解定解问题初值问题:,,,uuatx,,,,,,,,,,()tx,,,,,uxxx(,)(),,,,,,,初边值问题:,,,uuatTxl,,,,,,,,,,tx,,(),uxxxl(,)(),,,,,utgtultgttT(,)(),(,)(),,,,,,,还需对定解条件进行离散化。对初始条件及第一类边界条件可直接得到:(,,,,,)kkn,,,或uux,,(,),kkk,uutg,,(,),jjj(,,,)jm,,uultg,,(,)njjj,lTnm,,,式中:。h,对第二、三类边界条件:,u,,,()()tugtx,,,,x(),,tT,u,()()tugt,xl,,,,x需用差分近似。下面介绍两种较简单的处理方法。,u,u在左边界处用向前差商近似偏导数在右边界处用向后差商近似()x,()xl,,x,x即:,,uujuj(,)(,),Oh(),xh(,)j()(,,,)jm,,,,uunjunj(,)(,),Oh(),xh(,)nj则得边界条件的差分近似为:uu,,,,jj,,,ug,jjj,,h(,,,)jm,(),uu,,njnj,,,,ug,,jnjj,h,其截断误差为Oh()。,u()用中心差商近似,即:,x,,,uujuj(,)(,),Oh(),xhj(,)()(,,,)jm,,,,uunjunj(,)(,),Oh(),xhnj(,)则得边界条件的差分近似为:uu,,,,jj,,,,ug,jjj,,h()(,,,)jm,,uu,njnj,,,,,ug,,jnjj,h,其截断误差为。误差的阶数提高了但出现定解区域外的节点和这就(,),j(,)njOh()需要将解拓展到定解区域外。可以通过用内节点上的值插值求出u和u也可以假定u,,jnj,u热传导方程在边界上也成立将差分方程扩展到边界节点上由此消去和。un,j,,j几种常用的差分格式以热传导方程的初边值问题:,,,uuatTxl,,,,,,,,,,tx,,,()uxxxl(,)(),,,,,utgtultgttT(,)(),(,)(),,,,,,,为例给出几种常用的差分格式。)古典显式格式(a,r,令则:huuuuu,,kjkjkjkjkj,,,,,,,,a(),hurururu,,()可改写成:。将其与初始条件及第一类边界条件:kjkjkjkj,,,,,(,,,,,)kkn,,,或uux,,(,),kkk,uutg,,(,),jjj(,,,)jm,,uultg,,(,)njjj,结合我们得到求解此问题的一种差分格式:,urururuknjm,,,,,,()(,,,,,,,kjkjkjkj,,,,,,(),ukn,,(,,,),kk,,ugugjm,,,,(,,,),,jjnjj,(u,,)由于第层上节点处的值已知由此即可算出在第一层上节点处()j,uu()j,k,k的近似值u。重复使用此式可以逐层计算出所有的因此此差分格式称为典显式格式。uk,kj,又因式中只出现相邻两个时间层的节点故此式是二层显式格式。()古典隐式格式将式:uuuuu,,kjkjkjkjkj,,,,,,,,,a(),h整理并与初始条件及第一类边界条件式联立得差分格式如下:,uuruuuknjm,,,,,,()(,,,,,,,)kjkjkjkjkj,,,,,,,(),ukn,,(,,,),kk,,ugugjm,,,,(,,,),,jjnjj,a,r,其中:。虽然第层上的值仍为已知但不能由上式直接计算以上各层节点上的值uukj,h必须通过解下列线性方程组:,rr,,uurg,,rrr,,jjj,,,,,,uu,,,,jj,,,,,,,,,,(),,,,,,,,,uunjnj,,,,,,,,,,,,,,uurg,,rrrnjnjj,,,,,,,,,rruu式中(,,,)jm,,。才能由计算故此差分格式称为古典隐式格式。此方程组kj,kj,是三对角方程组且系数矩阵严格对角占优故解存在唯一。()Richardson格式Richardson格式是将式:uuuuu,,kjkjkjkjkj,,,,,,,,,a,h整理后与初始条件及第一类边界条件式联立。其计算公式为:,uuruuuknjm,,,,,,()(,,,,,,,kjkjkjkjkj,,,,,,,,),ukn,,(,,,),kk,,ugugjm,,,,(,,,),,jjnjj,j,,j,j这种差分格式中所涉及的节点出现在三层上故为三层显式格式。Richardson格式是一种完全不稳定的差分格式因此它在实际计算中是不能采用的。()杜福特弗兰克尔(DoFortFrankel)格式DoFortFrankel格式也是三层显式格式它是由式:uuuuuu,,,kjkjkjkjkjkj,,,,,,,,,,,a,h与初始条件及第一类边界条件式结合得到的。具体形式如下:rr,,uuuuknjm,,,,,()(,,,,,,,)kjkjkjkj,,,,,,,rr,(),ukn,,(,,,),kk,,ugugjm,,,,(,,,),,jjnjj,,用这种格式求解时除了第层上的值u由初值条件得到必须先用二层格式求出第层上k,ujm(,,,),的值u然后再按上式逐层计算。k,kj,()六点隐式格式对二阶中心差商公式:,,,uukjukjukj(,)(,)(,),,xhkj(,),u,u(,)kj如果用在(,)kj与(,)kj处的二阶中心差商的平均值近似在处的值即:,x,xuuuuuu,,,,ukjkjkjkjkjkj,,,,,,,,,Oh(),xh(,)kj,u(k,j)同时在点处的值也用中心差商:,t,,,uukjukj(,)(,),,O(),t,(,)kj近似即:uu,,ukjkj,,,,,x(,)kj这样又得到热传导方程的一种差分近似:uu,akjkj,,(,),,,,uuuuuu()kjkjkjkjkjkj,,,,,,,,,h其截断误差为将上式与初始条件及第一类边界条件式联立并整理得差分格式:O(h),rr,uuuuuuuu,,,()()kjkjkjkjkjkjkjkj,,,,,,,,,,,,,(,,,,,,,)knjm,,,,(),,ukn,,,(,,,)kk,,ugugjm,,,,(,,,),,,jjnjj,此格式涉及到六个节点它又是隐式格式故称为六点隐式格式。与古典隐式格式类似用六点格式由第层的值u计算第层的值u时需求解三对角方程组:jjkj,kj,,rr,,u,,rrr,j,,,,u,,,j,,,,,,,,,,,,unj,,,,,,,,u,,rrrnj,,,,,,,rrrruuuuu,(),,,,,jjjjj,,,,r,,uuuu,(),,,,jjjj,,,,,,,,,ruuuu,()njnjnjnj,,,,,,,,,,,,rr,,u,uuuu()n,,,,,,jnjnjnjnj,,,,()式中(,,,)jm,,。此方程组的系数矩阵严格对角占优故仍可用追赶法求解。例用古典显式格式求初边值问题。,,,uu,,,,,,,tx,,,tx,,uxxx(,),,,,,ututt(,),(,),,,,,,,。的数值解取h,,,,a,ar,,,,解:这里:。gtgt(),(),,()xx,,h由格式:,urururuknjm,,,,,,()(,,,,,,,kjkjkjkj,,,,,,,ukn,,(,,,),kk,,ugugjm,,,,(,,,),,jjnjj,可得到:uuukj,,,()(,,,,,),kjkjkj,,,,,uxkk,,,(,,,),kk,,uuj,,,,(,,,),,jj,将初值u代入上式即可算出:k,uuu,,,()(),,,uuu,,,()(),,,u,将边界条件u,及上述结果代入又可求得:,,uuuu,,,,,,,,,,,如此逐层计算得全部节点上的数值解为:uuuu,,,,,,,,,,,,u,,,前向差分法求解热传导方程的MATLAB程序,,xa,,tb设uxfx(,)(),其中而且其中求解区utcuatc(,),(,),,uxtcuxt(,)(,),Rxtxatb,,,,,{(,):,}间内的近似解。txx*****************************************************functionU=forwdif(f,c,c,a,b,c,n,m)Inputf=u(x,)asastring'f'c=u(,t)andc=u(a,t)aandbrightendpointsof,aand,bctheconstantintheheatequationnandmnumberofgridpointsover,aand,bOutputUsolutionmatrixanalogoustoTableInitializeparametersandUh=a(n)k=b(m)r=c^*kh^s=*rU=zeros(n,m)BoundaryconditionsU(,:m)=cU(n,:m)=cGeneratefirstrowU(:n,)=feval(f,h:h:(n)*h)'GenerateremainingrowsofUforj=:mfori=:nU(i,j)=s*U(i,j)r*(U(i,j)U(i,j))endendU=U'*****************************************************CrankNicholson求解热传导方程的MATLAB程序设uxfx(,)(),其中,,xa而且其中,,tb求解区utcuatc(,),(,),,uxtcuxt(,)(,),间Rxtxatb,,,,,{(,):,}内的近似解。txx*****************************************************functionU=crnich(f,c,c,a,b,c,n,m)Inputf=u(x,)asastring'f'c=u(,t)andc=u(a,t)aandbrightendpointsof,aand,bctheconstantintheheatequationnandmnumberofgridpointsover,aand,bOutputUsolutionmatrixanalogoustoTableInitializeparametersandUh=a(n)k=b(m)r=c^*kh^s=rs=rU=zeros(n,m)BoundaryconditionsU(,:m)=cU(n,:m)=cGeneratefirstrowU(:n,)=feval(f,h:h:(n)*h)'FormthediagonalandoffdiagonalelemntsofAandtheconstantvectorBandsolvetridiagonalsystemAX=BVd(,:n)=s*ones(,n)Vd()=Vd(n)=Va=ones(,n)Va(n)=Vc=ones(,n)Vc()=Vb()=cVb(n)=cforj=:mfori=:nVb(i)=U(i,j)U(i,j)s*U(i,j)endX=trisys(Va,Vd,Vc,Vb)U(:n,j)=X'endU=U'*****************************************************椭圆型方程第一边值问题的差分解法本节以Poisson方程为基本模型讨论第一边值问题的差分方法。差分格式的建立考虑Poisson方程的第一边值问题:,,,uu,,,fxyxy(,)(,),xy,,(),,,uxyxy(,)(,),,,,,(,)xy,,,图取分别为方向和方向的步长如图所示以两族平行线:h,,xyyyjkj,,,,,,(,,,,)xxkh,,jk将定解区域剖分成矩形网格。节点的全体记为:Rxyxkhyjkj,,,{(,),,,},为整数。kjkj,定解区域内部的节点称为内点记内点集为。边界与网格线的交点称为边界点,R,h,(,)xy(,)xy(,)xy边界点全体记为。与节点沿x方向或方向只差一个步长的点和,ykjkj,kj,h,称为节点的相邻节点。如果一个内点的四个相邻节点均属于称为正则内点(,)xy,,kj()正内点的全体记为至少有一个相邻节点不属于的内点称为非正则内点非正则内,,,()点的全体记为。问题是要求出第一边值问题在全体内点上的数值解。,为简便记:()。对正则内点由二(,)(,)kjxy,ukjuxy(,)(,),ffxy,(,)(,)kj,,kjkjkjkj,阶中心差商公式:,,,uukjukjukjh(,)(,)(,)(),,,uxhy(,)kjx,xhkj(,)(),,,uukjukjukj(,)(,)(,),(),,uxy(,),,kjy,y,kj(,),,uu,fxy(,)Poisson方程在点处可表示为:(,)kj,,xyukjukjukjukjukjukj(,)(,)(,)(,)(,)(,),,,,,fRkj(,)()kj,,h其中:h,()()Rkjuxhyuxy(,)(,)(,),,,,kjkjxx(),,,()(,)Oh,,,R(k,j)为其截断误差表示式略去即得与方程相近似的差分方程:uuuuuu,,kjkjkjkjkjkj,,,,,,,,,f()kj,,hu式中方程的个数等于正则内点的个数而未知数则除了包含正则内点处解的近似值外ukj,还包含一些非正则内点处的近似值因而方程个数少于未知数个数。在非正则内点处Poissonu方程的差分近似不能按上式给出需要利用边界条件得到。边界条件的处理可以有各种方案下面介绍较简单的两种。()直接转移。用最接近非正则内点的边界点上的u值作为该点上u值的近似这就是边界条件的直接转移。例如点Pkj(,)为非正则内点其最接近的边界点为Q点则有:()uuQQkj,,,,()()(,),()kj,u上式可以看作是用零次插值得到非正则内点处的近似值容易求出其截断误差为O(h,)。将上式代入方程个数即与未知数个数相等。()线性插值。这种方案是通过用同一条网格线上与点相邻的边界点与内点作线性插P值得到非正则内点处值的近似。由点与的线性插值确定的近似值得:uPkj(,)uP()uRTkj,hd,,,()()uRT()kj,hdhddRP,其中其截断误差为。将其与方程相近似的差分方程联立得到方程个数与未Oh()知数个数相等的方程组求解此方程组可得Poisson方程第一边值问题的数值解。上面所给出的差分格式称为五点菱形格式uuuuuu,,kjkjkjkjkjkj,,,,,,,,,f()kj,,h此时五点菱形格式可化为:实际计算时经常取h,,uuuuuf,,()()kjkjkjkjkjkj,,,,,,,,h简记为:uf,()kjkj,,huuuuuu,,其中:。kjkjkjkjkjkj,,,,,,,,例用五点菱形格式求解拉普拉斯(Laplace)方程第一边值问题。,,,uu,,,fxyxy(,)(,),,,xy,,uxyxy(,)lg(),,,,,,,,,,,{(,),}xyxyh,,,其中:。取。解:网格中有四个内点均为正则内点。由五点菱形格式得方程组:,()uuuuu,,,,,,,,h,,()uuuuu,,,,,,,,h,,()uuuuu,,,,,,,,h,,()uuuuu,,,,,,,h,代入边界条件:,uu,,lg,lg,,,,,uu,,lg,lg,,,,,uu,,lg,lg,,,,,uu,,lg,lg,,,其解为:u,u,u,u,,,,,uuuuuf,,()当时对利用点h,,(,)kj(,)kj,,(,)kj,kjkjkjkjkjkj,,,,,,,,h构造的差分格式称为五点矩形格式简记为:uf,()kjkj,,huuuuuu,,其中:其截断误差为:kjkjkjkjkjkj,,,,,,,,,,,,huuu,,,(,)()()()RkjOhOh,,,,,,,,xxyy,,kj(,)五点菱形格式与矩形格式的截断误差均为称它们具有二阶精度。如果用更多的点构Oh()造差分格式其截断误差的阶数可以提高如利用菱形格式及矩形格式所涉及的所有节点构造出的九点格式就是具有四阶精度的差分格式。用Dirichlet法求解Laplace方程的MATLAB程序求解区间内的近似解。而且满足条件:uxtuxt(,)(,),Rxyxayb,,,,,{(,):,}xxyy其中而且其中,,xauxfxuxbfx(,)(),(,)(),,uyfyuayfy(,)(),(,)(),,而且存在整数和使得:。,,ybanhbmh,,,nm*****************************************************functionU=dirich(f,f,f,f,a,b,h,tol,max)Inputf,f,f,fareboundaryfunctionsinputasstringsaandbrightendpointsof,aand,bhstepsizetolisthetoleranceOutputUsolutionmatrixanalogoustoTableInitializeparametersandUn=fix(ah)m=fix(bh)ave=(a*(feval(f,)feval(f,))b*(feval(f,)feval(f,)))(*a*b)U=ave*ones(n,m)BoundaryconditionsU(,:m)=feval(f,:h:(m)*h)'U(n,:m)=feval(f,:h:(m)*h)'U(:n,)=feval(f,:h:(n)*h)U(:n,m)=feval(f,:h:(n)*h)U(,)=(U(,)U(,))U(,m)=(U(,m)U(,m))U(n,)=(U(n,)U(n,))U(n,m)=(U(n,m)U(n,m))SORparameterw=(sqrt((cos(pi(n))cos(pi(m)))^))Refineapproximationsandsweepoperatorthroughoutthegriderr=cnt=while((err>tol)(cnt<=max))err=forj=:mfori=:nrelx=w*(U(i,j)U(i,j)U(i,j)U(i,j)*U(i,j))U(i,j)=U(i,j)relxif(err<=abs(relx))err=abs(relx)endendendcnt=cntendU=flipud(U')*****************************************************

用户评价(0)

关闭

新课改视野下建构高中语文教学实验成果报告(32KB)

抱歉,积分不足下载失败,请稍后再试!

提示

试读已结束,如需要继续阅读或者下载,敬请购买!

文档小程序码

使用微信“扫一扫”扫码寻找文档

1

打开微信

2

扫描小程序码

3

发布寻找信息

4

等待寻找结果

我知道了
评分:

/32

Matlab解微分方程&#46;doc

VIP

在线
客服

免费
邮箱

爱问共享资料服务号

扫描关注领取更多福利