zdrot(3f) - [BLAS:COMPLEX16_BLAS_LEVEL1]
subroutine zdrot( n, zx, incx, zy, incy, c, s )
.. Scalar Arguments ..
integer,intent(in) :: incx, incy, n
double precision,intent(in) :: c, s
..
.. Array Arguments ..
complex(kind=real64),intent(inout) :: zx( * ), zy( * )
..
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(kind=real64) 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(kind=real64) 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.
date:December 2016
Online html documentation available at
http://www.netlib.org/lapack/explore-html/
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | n | |||
complex(kind=real64), | intent(inout) | :: | zx(*) | |||
integer, | intent(in) | :: | incx | |||
complex(kind=real64), | intent(inout) | :: | zy(*) | |||
integer, | intent(in) | :: | incy | |||
double precision, | intent(in) | :: | c | |||
double precision, | intent(in) | :: | s |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
complex(kind=real64), | public | :: | ctemp | ||||
integer, | public | :: | i | ||||
integer, | public | :: | ix | ||||
integer, | public | :: | iy |