登 录
註 冊
论坛
微波仿真网
注册
登录论坛可查看更多信息
微波仿真论坛
>
时域有限差分法 FDTD
>
一维FDTD问题请教
发帖
回复
1280
阅读
6
回复
一维FDTD问题请教
离线
comeback
UID :42564
注册:
2009-09-26
登录:
2010-11-19
发帖:
7
等级:
旁观者
0楼
发表于: 2009-11-13 22:47:13
我用Matlab编了一个程序,来仿真这样一个过程:一维条件,中部有个高斯脉冲激励源,其幅度最大值为1。程序运行后,有两个对称的高斯脉冲向两边传播。但我有两个问题:
yN<fmi};c
一、生成的两个脉冲幅度的最大值明显比1小,但我觉得应该和1差不多,不知道正确的应该是怎样。
}a1Sfl@`3
二、刚开始的一段时间内,源点位置有很大的负值分量,当两个脉冲分开后 ..
f}Tr$r
Z:J.FI@
未注册仅能浏览
部分内容
,查看
全部内容及附件
请先
登录
或
注册
共
条评分
离线
gwzhao
方恨少
UID :17098
注册:
2008-08-24
登录:
2019-01-09
发帖:
1374
等级:
荣誉管理员
1楼
发表于: 2009-11-14 02:43:26
1)你直接加就源就是1 了,比如Ex(center) = f(n)。
x1BOW
估计你写的是Ex(center) = Ex(center) + f(n)
^5^}MB%
Y <Znv%M
2)我觉得你看错了,不应该是负的很大值,而是exp(-number),是这个很大吧,无限接近于零。
共
条评分
逆流而上
离线
ye_jacky
Jacky
UID :46554
注册:
2009-11-13
登录:
2011-11-04
发帖:
52
等级:
仿真一级
2楼
发表于: 2009-11-14 09:35:27
(1)可以看看边界设置,这是衰减吧
共
条评分
Jacky
离线
coyoji
UID :3364
注册:
2007-06-11
登录:
2014-05-13
发帖:
201
等级:
仿真三级
3楼
发表于: 2009-11-14 10:36:05
把程序贴上来看看
共
1
条评分
gwzhao
rf币
+3
感谢您的资料,加分!
2010-01-02
我爱微波!
离线
wq_463
UID :20925
注册:
2008-11-06
登录:
2021-04-22
发帖:
227
等级:
仿真三级
4楼
发表于: 2009-11-16 09:48:38
是啊,把程序贴出来,大家帮你分析一下
共
1
条评分
gwzhao
rf币
+3
积极参与论坛交流,加分!
2010-01-02
离线
comeback
UID :42564
注册:
2009-09-26
登录:
2010-11-19
发帖:
7
等级:
旁观者
5楼
发表于: 2010-01-01 22:17:15
不好意思,我当时比较急,后来就忘了来这里看了,先谢谢给位的关心,并顺祝元旦快乐!程序我后来稍微修改了一下。
.NJ|p=fy
-Ep!- a
%初始化光速、介电常数、磁导率等常数
)MZC>:
c=3e8;
!}y1CA
ep0=8.854e-12;
n`(~OO
ep=9*ep0;
m9$ a"$c
u=pi*4e-7;
8eluO ?p
T=2e-11;
x4m 5JDC
t0=4*T;
t9FDU
%初始化时间步长、空间步长和总的执行步数
igD G}q3jG
dt=3e-13;
q-nER<
dz=2e-4;
q"akrI38
tmax=2e-9;
i9rS6<V'
step=round(tmax/dt);
B**Nn!}0
%设置介质分界面的坐标
!9;)N,
m1=[0.45 0.45];
DG(%-w8p"
m2=[0.5 0.5];
@x1%)1
m=[-3 3];
[4*1}}gW%5
!KcWH9
N=round(0.6/dz);
Qzqc .T
n1=round(0.45/dz+1);
V1B(|P
n2=round(0.5/dz+1);
s)zJT
ns=round(0.3/dz+1);
pMR,#[U<
fun=@(t) exp(-((t-t0)./T).^2);
=E(#YCx
Ex=zeros(1,N+1);
~6`iY@)
Hy=zeros(1,N);
h >-'-Hx+
t=0:dt:dt*step;
5RF4]$zT
Z=0:dz:0.6;
ACg;CTBb
Et=fun(t);
ExVDkt0
ca=dt/(dz*u);
AF}gSNX
cb=zeros(1,N+1);
%@?A_jS
cb(:)=dt/(dz*ep0);
VO=!8Yx[
cb([n1 n2])=dt/(dz*(ep0+ep)/2);
m:uPEpcU
cb(n1+1:n2-1)=dt/(dz*ep);
?cKZ_c
ct=(c*dt-dz)/(c*dt+dz);
3`*Kav>"
%电场和磁场相互迭代
*6Q|}b[qcD
for i=1:step
=su]w2,Iy
Ex(ns)=Ex(ns)+Et(i);
c 6"Ib)
Hy(1:N)=Hy(1:N)-ca*(Ex(2:N+1)-Ex(1:N));
/c` ^iPb
temp1=Ex(2);
\'Ssn(s
temp2=Ex(N);
wN97_Y=`n
Ex(2:N)=Ex(2:N)-cb(2:N).*(Hy(2:N)-Hy(1:N-1));
5\bJR0I@
Ex(1)=temp1+ct*(Ex(2)-Ex(1));
v4rW2F:X
Ex(N+1)=temp2+ct*(Ex(N)-Ex(N+1));
6)qp*P$L
ba3*]01Yb
%画图
jVO{$j
plot(Z,Ex);
DkDoA;m
line(m1,m);
eQUe >*
line(m2,m);
tIc 7:th
ylabel('Ex');xlabel('z');
w##^}nHOR
axis([0 0.6 -0.8 1.2]);
Y-)xTn
pause(0.0001);
:@eHX&
end
O^Q,-=tA\
, sjh^-;
共
1
条评分
gwzhao
rf币
+5
积极参与论坛交流,加分!
2010-01-02
离线
042310082
UID :26545
注册:
2009-03-03
登录:
2012-05-21
发帖:
39
等级:
仿真新人
6楼
发表于: 2010-01-03 17:20:12
这个就如上面说的
共
条评分
发帖
回复