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