00001 module interface_hydrostatic_eq_WL_MHD 00002 implicit none 00003 interface 00004 subroutine hydrostatic_eq_WL_MHD(emd,utf,uxf,uyf,uzf) 00005 real(8), pointer :: emd(:,:,:) 00006 real(8), pointer :: utf(:,:,:), uxf(:,:,:), uyf(:,:,:), uzf(:,:,:) 00007 end subroutine hydrostatic_eq_WL_MHD 00008 end interface 00009 end module interface_hydrostatic_eq_WL_MHD