文件
tem3dfdtd-open/tem3dfdtd/module/resistivity-model-parameters.f90
T

7 行
373 B
Fortran

!Copyright (c) 2013 by tdem.org under guide of Xiu Li(lixiu@chd.edu.cn)
!written by Huaifeng Sun(sunhuaifeng@gmail.com) and Xushan Lu(luxushan@gmail.com)
!Code distribution @ tdem.org or sunhuaifeng.com
MODULE RES_MODEL_PARAMETER
REAL(KIND=8), DIMENSION(:,:,:), ALLOCATABLE:: CCSIG,CCSIGX,CCSIGY,CCSIGZ !The conductivity in each grid
ENDMODULE RES_MODEL_PARAMETER