包含基于射线追踪的任意复杂界面计算

tem3dfdtd/module/electromagnetic-variables.f90

@@ -3,6 +3,17 @@
 !Code distribution @ tdem.org or sunhuaifeng.com
 
 MODULE ELECTROMAGNETIC_VARIABLES
-  REAL(KIND=8), DIMENSION(:,:,:), ALLOCATABLE:: EX,EY,EZ     !The x,y and z component of electric field in 3 dimensions
+  REAL(KIND=8), DIMENSION(:,:,:), ALLOCATABLE:: EX,EY,EZ    !The x,y and z component of electric field in 3 dimensions
   REAL(KIND=8), DIMENSION(:,:,:), ALLOCATABLE:: HX,HY,HZ    !The x,y and z component of magnetic field in 3 dimensions
+  !>Memory variables of the CPML absorbing boundary (Roden & Gedney 2000).
+  !! psi_Eab_m: memory variable of the electric field Ea associated with the
+  !! curl term in direction b; psi_Hab_m: the same for the magnetic field.
+  !! _1 / _2 denote the lower/upper (or left/right) boundary of that direction.
+  REAL(KIND=8), DIMENSION(:,:,:), ALLOCATABLE:: psi_Exy_1, psi_Exy_2, psi_Exz_1, psi_Exz_2, &
+                                                psi_Eyx_1, psi_Eyx_2, psi_Eyz_1, psi_Eyz_2, &
+                                                psi_Ezx_1, psi_Ezx_2, psi_Ezy_1, psi_Ezy_2, &
+                                                psi_Hxy_1, psi_Hxy_2, psi_Hxz_1, psi_Hxz_2, &
+                                                psi_Hyx_1, psi_Hyx_2, psi_Hyz_1, psi_Hyz_2, &
+                                                psi_Hzx_1, psi_Hzx_2, psi_Hzy_1, psi_Hzy_2, &
+                                                psi_Hzz_1, psi_Hzz_2
 ENDMODULE ELECTROMAGNETIC_VARIABLES