一维等离子体FDTD的Matlab源代码两种方法.doc

一维等离子体FDTD的Matlab源代码两种方法.doc

ID:55925056

大小:82.00 KB

页数:23页

时间:2020-06-15

一维等离子体FDTD的Matlab源代码两种方法.doc_第1页
一维等离子体FDTD的Matlab源代码两种方法.doc_第2页
一维等离子体FDTD的Matlab源代码两种方法.doc_第3页
一维等离子体FDTD的Matlab源代码两种方法.doc_第4页
一维等离子体FDTD的Matlab源代码两种方法.doc_第5页
资源描述:

《一维等离子体FDTD的Matlab源代码两种方法.doc》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库

1、一维等离子体FDTD的Matlab源代码(两种方法)%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%1=V-V< %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%*$g-:ILRuZ %%%%%%%%%%%%%%%%%%%%        1D     

2、         %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%oCz/HQoBk %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%k9L;!TH~1K %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

3、'D1xh~ %%%%%%%%%初始化QVgl(;lX clear;3^yK!-Wp( %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%utV_W& %%%%%%%%%%%%%%%%系统参数uwGc@xOgg, TimeT=3000;%迭代次数qIT@g"%}t KE=2000;%网格树木p4Z(^+Aa kc=450;%源的位置f3y=Wxk[ kpstart=500;%等离子体开始位置

4、2A:eI8^ kpstop=1000;%等离子

5、体终止位置'LDQgC*% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%A@#E@;lm %%%%%%%%%%%%%物理参数V!~wj c0=3e8;%真空中波速3Jn;} zdelta=1e-9;%网格大小#GFr`o0$^ dt=zdelta/(2*c0);%时间间隔))Za&S*< f=900e12;%Gause脉冲的载频

6、iN~j&Be u0=57e12%碰撞频率m]&SNz= fpe=2000e12;%等离子体频率K(

7、}dl: wpe=2*pi*fpe;%等离子体圆频率m4Zk,1m.

8、 epsz=1/(4*pi*9*10^9);%真空介电常数$/],tSm mu=1/(c0^2*epsz);%磁常数;9#KeA_ ex_low_m1=0;yt2PU_), ex_low_m2=0;CvdN"k ex_high_m1=0;8FhdN ex_high_m2=0;v`r:=K a0=2*u0/dt+(2/dt)^2;'

9、hf8ZEW9' a1=-8/(dt)^2;+H2Qk4XFB a2=-2*u0/dt+(2/dt)^2;2t,zLwBdnJ b0=wpe^2+2*u0/dt+(2/dt)^2;*lb<$E]="! b1=2*wpe^2-8/(dt)^2;F:ELPs4" b2=wpe^2-2*u0/dt+(2/dt)^2;Vw"{` %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%&mvSiyKX %%%%%%%%%%%%%初始化电磁场?X;RLpEc

10、A 

11、Ex=zeros(1,KE);%XTI-B/K Ex_Pre=zeros(1,KE);rM"l@3hP Hy=zeros(1,KE);i6N',&jFU Hy_Pre=zeros(1,KE);E}.^kc[(4 Dx=zeros(1,KE);{XHh8_^& Dx_Pre=zeros(1,KE);K+iP6B Sx1=zeros(1,KE);(iGTACoF Sx2=zeros(1,KE);Wez5N Sx3=zeros(1,KE);U;I9bK8 Sx=zeros(1,KE);-.3w^D"l Dx=Ex;

12、nF/OPd Dx1=Ex;Qci]i)s$js Dx2=Ex;3N:D6w-R Dx3=Ex;:i7;w%B Ex1=Ex;cS+>J@L Ex2=Ex;WjjB

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。