登 录
註 冊
论坛
微波仿真网
注册
登录论坛可查看更多信息
微波仿真论坛
>
时域有限差分法 FDTD
>
这个 程序的边界吸收不好,能否指点一下, ..
发帖
回复
645
阅读
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++)
lEAf\T7
{
7]sRHX0o%
T++;
[h&)h+xt
HE!"3S2S&+
zu/BDyF
for (k=1;k<KE; k++)
p.@kv
{
-So$f-y
dx[k]=dx[k]+0.5*(hy[k-1]-hy[k]);
!U::kr=t
}
F-R5Ib-F*A
Aq5CF`e{
pulse=exp(-.5*(pow((t0-T)/spread,2.0))); /* put a Gassian pulse at the low end */
,L_u X
dx[5]=dx[5]+pulse;
"t0l)P*C}
printf("%5.1f %6.2f %6.2f \n",T,pulse,dx[5]);
<8)cr0~zy>
'k'"+
( fNG51h!
for (k=0;k<KE-1; k++)
'`+8'3K~E
{
65 ]>6D43
ex[k]=ga[k]*(dx[k]-ix[k]);
pSa pF)1>
}
iy!SqC
6&* z
for (k=0;k<KE-1; k++)
pYN.tD FO
{
Yw(O}U 5e
ix[k]=ix[k]+gb[k]*ex[k];
u~c75Mk_v
}
L0\~K~q
@tT2o@2Y^
G]v BI=
/* Boundary conditions */
t]gZ^5
ex[0]=ex_low_m2;
b I"+b\K
ex_low_m2=ex_low_m1;
i 1dE.f;
ex_low_m1=ex[1];
<S ae:m4
x3AAn,m8
ex[KE-1]=ex_high_m2;
(jmF7XfU
ex_high_m2=ex_high_m1;
Q6PaT@gs
ex_high_m1=ex[KE-2];
/* calculate the hy field */
7m$EZTw?
for (k ..
@bRKJPU9)
"f~*4g
未注册仅能浏览
部分内容
,查看
全部内容及附件
请先
登录
或
注册
共
条评分
发帖
回复