00001 module def_faraday_tensor_cartesian
00002 use phys_constant, only : long
00003 implicit none
00004 real(long), pointer :: fxdca(:,:,:), fydca(:,:,:), fzdca(:,:,:)
00005 real(long), pointer :: fxuca(:,:,:), fyuca(:,:,:), fzuca(:,:,:)
00006 real(long), pointer :: fijdca(:,:,:,:),fijuca(:,:,:,:)
00007 real(long), pointer :: fijduca(:,:,:,:,:),fidfiuca(:,:,:),fijfijca(:,:,:)
00008 real(long), pointer :: fxd_gridca(:,:,:),fyd_gridca(:,:,:),fzd_gridca(:,:,:)
00009 real(long), pointer :: fxu_gridca(:,:,:),fyu_gridca(:,:,:),fzu_gridca(:,:,:)
00010 real(long), pointer :: fijd_gridca(:,:,:,:), fiju_gridca(:,:,:,:)
00011 real(long), pointer :: Lie_bFxdca(:,:,:),Lie_bFydca(:,:,:),Lie_bFzdca(:,:,:)
00012 end module def_faraday_tensor_cartesian