Contents


NAME

     zdrot - Apply a plane rotation.

SYNOPSIS

     SUBROUTINE ZDROT(N, X, INCX, Y, INCY, C, S)

     DOUBLE PRECISION C, S
     DOUBLE COMPLEX X(*), Y(*)
     INTEGER N, INCX, INCY

     SUBROUTINE ZDROT_64(N, X, INCX, Y, INCY, C, S)

     DOUBLE PRECISION C, S
     DOUBLE COMPLEX X(*), Y(*)
     INTEGER*8 N, INCX, INCY

  F95 INTERFACE
     SUBROUTINE ROT([N], X, [INCX], Y, [INCY], C, S)

     REAL(8) :: C, S
     COMPLEX(8), DIMENSION(:) :: X, Y
     INTEGER :: N, INCX, INCY

     SUBROUTINE ROT_64([N], X, [INCX], Y, [INCY], C, S)

     REAL(8) :: C, S
     COMPLEX(8), DIMENSION(:) :: X, Y
     INTEGER(8) :: N, INCX, INCY

  C INTERFACE
     #include <sunperf.h>

     void zdrot(int n, doublecomplex *x, int incx,  doublecomplex
               *y, int incy, double c, double s);

     void zdrot_64(long n, doublecomplex  *x,  long  incx,  doub-
               lecomplex *y, long incy, double c, double s);

PURPOSE

     zdrot Apply a plane rotation, where the cos and sin  (c  and
     s) are real and the vectors x and y are complex.

ARGUMENTS

     N (input)
               On entry, N specifies the number  of  elements  in
               the   vector.  N must be at least one for the sub-
               routine to have any visible effect.  Unchanged  on
               exit.

     X (input/output)
               Before entry,  the incremented   array   CX   must
               contain the vector x.  Unchanged on exit.

     INCX (input)
               On entry, INCX specifies  the  increment  for  the
               elements    of    CX.   INCX  must  not  be  zero.
               Unchanged on exit.

     Y (input/output)
               On  entry,  the incremented  array CY must contain
               the  vector  y.  On exit, CY is overwritten by the
               updated vector y.

     INCY (input)
               On entry, INCY specifies  the  increment  for  the
               elements    of    CY.   INCY  must  not  be  zero.
               Unchanged on exit.

     C (input)
               On entry, the cosine.  Unchanged on exit.

     S (input)
               On entry, the sin.  Unchanged on exit.