icmax1()

integer function icmax1	(	integer	n,
		complex, dimension(*)	cx,
		integer	incx )

ICMAX1 finds the index of the first vector element of maximum absolute value.

Download ICMAX1 + dependencies [TGZ] [ZIP] [TXT]

Purpose:

!>
!> ICMAX1 finds the index of the first vector element of maximum absolute value.
!>
!> Based on ICAMAX from Level 1 BLAS.
!> The change is to use the 'genuine' absolute value.
!> 

Parameters

[in]	N	!> N is INTEGER !> The number of elements in the vector CX. !>
[in]	CX	!> CX is COMPLEX array, dimension (N) !> The vector CX. The ICMAX1 function returns the index of its first !> element of maximum absolute value. !>
[in]	INCX	!> INCX is INTEGER !> The spacing between successive values of CX. INCX >= 1. !>

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Contributors:

Nick Higham for use with CLACON.