subroutine isamaxsub	(	integer	n,
		real, dimension(*)	x,
		integer	incx,
		integer	iamax
	)

Definition at line 7 of file isamaxsub.f.

c
      external isamax
      integer  isamax,iamax
      integer n,incx
      real x(*)
c
      iamax=isamax(n,x,incx)
      return

Here is the call graph for this function: