00001 module def_emfield_derivatives
00002 use phys_constant, only : long
00003 implicit none
00004 real(long), pointer :: Lie_bAxd(:,:,:), Lie_bAyd(:,:,:), Lie_bAzd(:,:,:)
00005 real(long), pointer :: Lie_bAxd_grid(:,:,:), gLie_bAxu_grid(:,:,:),
00006 Lie_bAyd_grid(:,:,:), gLie_bAyu_grid(:,:,:), &
00007 Lie_bAzd_grid(:,:,:), gLie_bAzu_grid(:,:,:)
00008 real(long), pointer :: cdvaxd(:,:,:,:), cdvayd(:,:,:,:), cdvazd(:,:,:,:)
00009 real(long), pointer :: pdvaxd(:,:,:,:), pdvayd(:,:,:,:), pdvazd(:,:,:,:)
00010 end module def_emfield_derivatives