00001 module interface_surf_int_grav_solidangle 00002 implicit none 00003 interface 00004 subroutine surf_int_grav_solidangle(sousf,surf) 00005 real(8), pointer :: sousf(:,:) 00006 real(8), intent(out) :: surf 00007 end subroutine surf_int_grav_solidangle 00008 end interface 00009 end module interface_surf_int_grav_solidangle