00001 module def_SEM_tensor_EMF
00002 use phys_constant, only : long
00003 implicit none
00004 real(long), pointer :: rhoH_EMF(:,:,:)
00005 real(long), pointer :: jmd_EMF(:,:,:,:), jmu_EMF(:,:,:,:)
00006 real(long), pointer :: smijd_EMF(:,:,:,:,:), smiju_EMF(:,:,:,:,:)
00007 real(long), pointer :: trsm_EMF(:,:,:)
00008 real(long), pointer :: rhoH_EMF_grid(:,:,:)
00009 real(long), pointer :: jmd_EMF_grid(:,:,:,:), jmu_EMF_grid(:,:,:,:)
00010 real(long), pointer :: smijd_EMF_grid(:,:,:,:,:), smiju_EMF_grid(:,:,:,:,:)
00011 real(long), pointer :: trsm_EMF_grid(:,:,:)
00012 end module def_SEM_tensor_EMF
