文件名称:new1dfdtd
介绍说明--下载内容来自于网络,使用问题请自行百度
增加了声子晶体周期条件:
if (mod(ii,19)<9)
u(ii,3)=2*u(ii,2)-u(ii,1)+c*(u(ii+1,2)-2*u(ii,2)+u(ii-1,2))
else
u(ii,3)=2*u(ii,2)-u(ii,1)+0.5*c*(u(ii+1,2)-2*u(ii,2)+u(ii-1,2))
end-if (mod(ii,19)<9)
u(ii,3)=2*u(ii,2)-u(ii,1)+c*(u(ii+1,2)-2*u(ii,2)+u(ii-1,2))
else
u(ii,3)=2*u(ii,2)-u(ii,1)+0.5*c*(u(ii+1,2)-2*u(ii,2)+u(ii-1,2))
end
if (mod(ii,19)<9)
u(ii,3)=2*u(ii,2)-u(ii,1)+c*(u(ii+1,2)-2*u(ii,2)+u(ii-1,2))
else
u(ii,3)=2*u(ii,2)-u(ii,1)+0.5*c*(u(ii+1,2)-2*u(ii,2)+u(ii-1,2))
end-if (mod(ii,19)<9)
u(ii,3)=2*u(ii,2)-u(ii,1)+c*(u(ii+1,2)-2*u(ii,2)+u(ii-1,2))
else
u(ii,3)=2*u(ii,2)-u(ii,1)+0.5*c*(u(ii+1,2)-2*u(ii,2)+u(ii-1,2))
end
(系统自动生成,下载前可以参看下载内容)
下载文件列表
new1dfdtd.m
1999-2046 搜珍网 All Rights Reserved.
本站作为网络服务提供者,仅为网络服务对象提供信息存储空间,仅对用户上载内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。
