indir_mod.f90

module indir_mod
interface
	subroutine indir(a, b)
	implicit none
	real(8), intent (out) :: a(:,:)
	real(8), intent (out) :: b(:)
	end subroutine indir
end interface
end module indir_mod