/home/uryu/Cocal_svn_checkinout/Cocal/code/Module_interface/interface_helmholtz_solver_asymptotic_patch_homosol.f90
Go to the documentation of this file.00001 module interface_helmholtz_solver_asymptotic_patch_homosol 00002 implicit none 00003 interface 00004 subroutine helmholtz_solver_asymptotic_patch_homosol & 00005 & (sou,sou_insurf,dsou_insurf,pot) 00006 real(8), pointer :: pot(:,:,:), sou(:,:,:) 00007 real(8), pointer :: sou_insurf(:,:), dsou_insurf(:,:) 00008 end subroutine helmholtz_solver_asymptotic_patch_homosol 00009 end interface 00010 end module interface_helmholtz_solver_asymptotic_patch_homosol
