00001 module interface_helmholtz_solver_vol_int
00002   implicit none
00003   interface 
00004     subroutine helmholtz_solver_vol_int(sou,pot)
00005       real(8), pointer :: sou(:,:,:),pot(:,:,:)
00006     end subroutine helmholtz_solver_vol_int
00007   end interface
00008 end module interface_helmholtz_solver_vol_int