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

    function ScanPath(kxrng,kyrng,fname)

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% 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 Counter KappaX KappaY Phase

Counter=0;

mMax=length(kxrng);

for m=1:mMax
    KappaX=kxrng(m);
    KappaY=kyrng(m);
    Phase=(m-1)*pi/(mMax-1);
    MakeFileName(fname)
    RunFDTD
    Counter=Counter+1;
    fprintf('.')
end