advanceetime.m

来自「外国人开发的电磁时域有限差分方法工具包 Electromagnetic Fin」· M 代码 · 共 22 行

function AdvanceETime

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% 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 Tx Ty U Ux Uy
global DifferenceDirection 
global h1 h2 k1 k2

Txy=BlochDiff(Tx,2,-DifferenceDirection,-1);
Tyx=BlochDiff(Ty,1,-DifferenceDirection,-1);
Ux=h1.*Ux+h2.*Tyx;
Uy=k1.*Uy-k2.*Txy;
U=Ux+Uy;