subroutine zlacgv	(	integer	N,
		complex16, dimension( )	X,
		integer	INCX
	)

ZLACGV conjugates a complex vector.

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

Purpose:

 ZLACGV conjugates a complex vector of length N.

Parameters

[in]

N

          N is INTEGER
          The length of the vector X.  N >= 0.

[in,out]

X

          X is COMPLEX*16 array, dimension
                         (1+(N-1)*abs(INCX))
          On entry, the vector of length N to be conjugated.
          On exit, X is overwritten with conjg(X).

[in]

INCX

          INCX is INTEGER
          The spacing between successive elements of X.

Author: Univ. of Tennessee; Univ. of California Berkeley; Univ. of Colorado Denver; NAG Ltd.

Date: September 2012

Definition at line 76 of file zlacgv.f.

 *
 *  -- LAPACK auxiliary routine (version 3.4.2) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
 *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
 *     September 2012
 *
 *     .. Scalar Arguments ..
       INTEGER            incx, n
 *     ..
 *     .. Array Arguments ..
       COMPLEX*16         x( * )
 *     ..
 *
 * =====================================================================
 *
 *     .. Local Scalars ..
       INTEGER            i, ioff
 *     ..
 *     .. Intrinsic Functions ..
       INTRINSIC          dconjg
 *     ..
 *     .. Executable Statements ..
 *
       IF( incx.EQ.1 ) THEN
          DO 10 i = 1, n
             x( i ) = dconjg( x( i ) )
    10    CONTINUE
       ELSE
          ioff = 1
          IF( incx.LT.0 )
      $      ioff = 1 - ( n-1 )*incx
          DO 20 i = 1, n
             x( ioff ) = dconjg( x( ioff ) )
             ioff = ioff + incx
    20    CONTINUE
       END IF
       RETURN
 *
 *     End of ZLACGV
 *

Here is the caller graph for this function: