登 录
註 冊
论坛
微波仿真网
注册
登录论坛可查看更多信息
微波仿真论坛
>
时域有限差分法 FDTD
>
这个 程序的边界吸收不好,能否指点一下, ..
发帖
回复
644
阅读
0
回复
[
求助
]
这个 程序的边界吸收不好,能否指点一下,如何设置PML边界
离线
王璇
I do
UID :91162
注册:
2012-03-29
登录:
2013-03-15
发帖:
19
等级:
仿真新人
0楼
发表于: 2012-04-30 17:29:21
关键词:
设置
for (n=1;n<=NSTEPS;n++)
-|3U0:'m
{
5-C6; 7%:
T++;
q,*IR*B:a
"?N`9J|j)~
(Hn,}(3S
for (k=1;k<KE; k++)
;pU LJ}rDb
{
;bA9(:?
dx[k]=dx[k]+0.5*(hy[k-1]-hy[k]);
o?%x!m>
}
I&cb5j]C
Z4(2&t^
pulse=exp(-.5*(pow((t0-T)/spread,2.0))); /* put a Gassian pulse at the low end */
),~Ca'TU
dx[5]=dx[5]+pulse;
P!vBS"S
printf("%5.1f %6.2f %6.2f \n",T,pulse,dx[5]);
@RnG K 5
2>H\arEstR
A2+t`[w
for (k=0;k<KE-1; k++)
f5yd2wKy6
{
t>25IJG
ex[k]=ga[k]*(dx[k]-ix[k]);
~pF'Qw"z|
}
Np=*B_ @8
+0=RC^
for (k=0;k<KE-1; k++)
CId`6W
{
V)0bLR
ix[k]=ix[k]+gb[k]*ex[k];
h`vM+,I
}
-bj1y2)n
r1=Zoxc=w
8l}|.Q#--
/* Boundary conditions */
&FK=w]P
ex[0]=ex_low_m2;
3'']q3H
ex_low_m2=ex_low_m1;
HQE#O4
ex_low_m1=ex[1];
Tok"-$`N
AOfQqGf
ex[KE-1]=ex_high_m2;
,:v}gS?Uq
ex_high_m2=ex_high_m1;
sF|$oyDE
ex_high_m1=ex[KE-2];
/* calculate the hy field */
lRO8}XSI
for (k ..
/g8yc'{p
=T\pq8
未注册仅能浏览
部分内容
,查看
全部内容及附件
请先
登录
或
注册
共
条评分
发帖
回复