www.gusucode.com > FDTD计算二维光子带隙的程序 > FDTD计算二维光子带隙的程序/247787/SaveField.m

    function SaveField(Data)

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Electromagnetic Finite-Difference Time-Domain %
% Version 1.20, Release 1                       %
%                                               %
%   (C) Copyright 2005                          %
%   Sharif University of Technology             %
%   School of Electrical Engineering            %
%   All Rights Reserved                         %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

global TimeSteps dT TimeDecimation MaxTimeStep
global OutputFileName FileExtension

fname=strcat('Output\\',OutputFileName,FileExtension);

dTT=dT/MaxTimeStep;
nT=length(Data);
dt=dTT*TimeDecimation;
T=nT*dt;

SaveComponent(fname,Data,nT,dTT,dt,T)