计算实验课
微分方程数值解法数值计算实验题目
一、常微分方程部分:
1.使用四阶Runge-Kutta方法求解如下初值问题的近似解,并将结果与实际值进行比较。
2.使用四阶Adams预估校正算法(PECP和PMECME方案),初始值用四阶Runge-Kutta方法提供,并将结果与实际值进行比较。
11t。
u1tu,2t3,u21;精度105,h0.5。实际解
2utu1ut,1t2,u12;精度105,h0.2。实际解utlnt2。
二、偏微分方程部分:
1.用有限差分法求解如下Poisson方程
ux,ycos3xsiny,,0x,0y1
边界条件为: ux,0ux,10,0x1;
ux0,yux,y0,0y1
取
h1N和
,h21,N作矩形剖分,网格节点为xiih1,yjjh2,i,j=0,1,…,N。
差分格式为
ui1,j2ui,jui1,jui,j12ui,jui,j1cos3xisinyjhh12
i,j1,2,,N1
,N,边界条件为: ui0uiN0,i0,
u0ju1j,j1,,N1,
uNjuN1j,j1,,N1,
结果与精确解
ux,y921cos3xsiny进行比较。
求解方案:依次令N4,8,16,32,取6位小数计算。
ijx,y,j44,i,j1,2,3处列出差分解与精确解。 用消元法求解,并就
其次,就N=32,0.25,0.5,0.75及i=0,2,4,…,30,32画出差分解曲线。
2.用向前、向后或Crank-Nicolson算法求解一维抛物型方程的初边值问题:
u2u2sint,tx,0x1,0t
ux0,tux1,t0,0t ux,0cosx,0x1
1J,时间步长0,tk=kt,网
ux,te精确解为:2tcosx1cost,设空间步长
h比
rh2。
(一) 向前差分格式的计算方案:
1ukukjj
kkukj12ujuj1h2sintk j1,2,,J1,k1,2,,N
边值条件为
k1ku0u0 j=0,
kku1k2u0u1sintkk2uu1n1h,;
k1kuJuJ j=J,
kkkuJ12uJuJ1sintkknuJuJ11; h2,
初值条件为
uxj,0cosxj,j0,1,2,,J
a) 取
h111,,r40 3200 此时2,计算到时间层t32001;
b) 取
h111,,r80 12800 此时2,计算到时间层t128001;
c) 取
h11,,80 3200 此时r2,观察计算结果;
(二) 向后差分格式的计算方案:
1ukukjjkkukj12ujuj1h2sintk1 j1,2,,J1,k1,2,,N
边值条件为
k1ku0u0 j=0,
k1k1u1k12u0u1sintk1uk1uk121h,1;
k1kuJuJ j=J,
uJ12uJuJ1sintkuk1uk12h,J1J1;
初值条件为
uxj,0cosxj,j0,1,2,,J
a) 取
h11,,40 1600 此时r1,计算到时间层t16001;
b) 取
h11,,80 3200 此时r2,计算到时间层t32001;
(三) 六点对称差分格式的计算方案:
1ukukjj12uk1j1k1kk1kuk2uuuuj1jjj1j11sintk1sintk2h2 j1,2,,J1,k1,2,,N
边值条件为
j=0,J列Crank-Nicolson格式,其中
ukk1kk1; ukk1ukk11u1u1u1J1uJ1J1uJ1
初值条件为
uxj,0cosxj,j0,1,2,,J
1a) 取
h40, 11600, 此时r1,计算到时间层t16001;
b) 取
h1180, 3200, 此时r2,计算到时间层t32001;
将以上三种数值方法的结果与精确解列表作比较,其中
xjj4,二维抛物型方程的初边值问题*:
j1,,4。
用六点对称差分格式,ADI法,预校法和LOD法求解二维抛物型方程的初边值问题:
2u2u2u422,txy x,yG0,10,1,0t
u0,y,tu1,y,t0,0y1,0t uyx,0,tuyx,1,t0,0x1,0t ux,y,0cosysinx,
精确解为:
ux,y,te28tsinxcosy。
设xj=jh (j=0,1,…,J), yk=kh (k=0,1,…,K), tn=nt (n=0,1,…,N),差分解为条件为
unjk,则边值
nnu0kuJk0,k=0,1,…,K;
nunuj0j1,
nunujKjK1,j=0,1,…,J
取空间步长
hh1h211r2140,时间步长1600,网比h,用六点对称差分格式,
ADI法,预校法和LOD法分别计算到时间层t=1。
3.微分方程数值解法书第181页的实习题1、2。