zswap()

subroutine zswap	(	integer	N,
		complex*16, dimension(*)	ZX,
		integer	INCX,
		complex*16, dimension(*)	ZY,
		integer	INCY
	)

ZSWAP

Purpose:

    ZSWAP interchanges two vectors.

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Date

December 2016

Further Details:

     jack dongarra, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)