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