TESIS

G
CÁLCULO DE LAS COMPONENTES DE H
HX(2:IMAX.1:JMAX-1,ACT)=Chx1(2:IMAX,1:JMAX-1)*HX(2:IMAX,1:JMAX-1,PR1)
+Chx2(2:IMAX,1:JMAX-1)*{EZY(2:IMAX,1:JMAX-1,PR1)
-EZY(2:IMAX,2:JMAX,PR1)+EZX(2:IMAX,1:JMAX-1,PR1)
-EZX(2:IMAX,2:JMAX,PR1)}
HY(1:IMAX-1,2:JMAX,ACT)=Chy1(1:IMAX-1,2:JMAX)*HY(1:IMAX-1,2:JMAX,PR1)
+Chy2(1:IMAX-1,2:JMAX)*{EZX(2:IMAX,2:JMAX,PR1)
-EZX(1:IMAX-1,2:JMAX,PR1)+EZY(2:IMAX,2:JMAX,PR1)
-EZY(1:IMAX-1,2:JMAX,PR1)}
CÁLCULO DE LAS COMPONENTES DE E
EZX(2:IMAX.2:JMAX,ACT)=Cex1(2:IMAX,2:JMAX)*EZX(2:IMAX,2:JMAX,PR1)
+Cex2(2:IMAX, 2:JMAX)*{HY(2:IMAX, 2:JMAX,ACT)
-HY(1:IMAX-1,2:JMAX,ACT)}
EZY(2:IMAX.2:JMAX,ACT)=Cey1(2:IMAX,2:JMAX)*EZY(2:IMAX,2:JMAX,PR1)
+Cey2(2:IMAX, 2:JMAX)*{HX(2:IMAX, 1:JMAX-1,ACT)
-HX(2:IMAX,2:JMAX,ACT)}
EZ=EZX+EZY
DEFINIR LA FUENTE
A= sin (2π f t ∆t)
H
89