Applies a plane rotation, where the cos and sin (c and s) are real
 and the vectors cx and cy are complex.
 jack dongarra, linpack, 3/11/78.

N

          N is INTEGER
           On entry, N specifies the order of the vectors cx and cy.
           N must be at least zero.

ZX

          ZX is COMPLEX*16 array, dimension at least
           ( 1 + ( N - 1 )*abs( INCX ) ).
           Before entry, the incremented array ZX must contain the n
           element vector cx. On exit, ZX is overwritten by the updated
           vector cx.

INCX

          INCX is INTEGER
           On entry, INCX specifies the increment for the elements of
           ZX. INCX must not be zero.

ZY

          ZY is COMPLEX*16 array, dimension at least
           ( 1 + ( N - 1 )*abs( INCY ) ).
           Before entry, the incremented array ZY must contain the n
           element vector cy. On exit, ZY is overwritten by the updated
           vector cy.

INCY

          INCY is INTEGER
           On entry, INCY specifies the increment for the elements of
           ZY. INCY must not be zero.

C

          C is DOUBLE PRECISION
           On entry, C specifies the cosine, cos.

S

          S is DOUBLE PRECISION
           On entry, S specifies the sine, sin.

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.