CSCAL(3) BLAS routine CSCAL(3)NAME
CSCAL - scales a vector by a constant.
SYNOPSIS
subroutine cscal(n,ca,cx,incx)
c scales a vector by a constant.
c jack dongarra, linpack, 3/11/78.
c modified to correct problem with negative increment, 8/21/90.
complex ca,cx(1)
integer i,incx,ix,n
if(n.le.0)return
if(incx.eq.1)go to 20
c code for increment not equal to 1
ix = 1
if(incx.lt.0)ix = (-n+1)*incx + 1
do 10 i = 1,n
cx(ix) = ca*cx(ix)
ix = ix + incx
10 continue
return
c code for increment equal to 1
20 do 30 i = 1,n
cx(i) = ca*cx(i)
30 continue
return
end
PURPOSE BLAS routine 16 October 1992 CSCAL(3)
Check Out this Related Man Page
zdrot.f(3) LAPACK zdrot.f(3)NAME
zdrot.f -
SYNOPSIS
Functions/Subroutines
subroutine zdrot (N, CX, INCX, CY, INCY, C, S)
ZDROT
Function/Subroutine Documentation
subroutine zdrot (integerN, complex*16, dimension( * )CX, integerINCX, complex*16, dimension( * )CY, integerINCY, double precisionC, double
precisionS)
ZDROT Purpose:
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.
Parameters:
N
N is INTEGER
On entry, N specifies the order of the vectors cx and cy.
N must be at least zero.
CX
CX is COMPLEX*16 array, dimension at least
( 1 + ( N - 1 )*abs( INCX ) ).
Before entry, the incremented array CX must contain the n
element vector cx. On exit, CX is overwritten by the updated
vector cx.
INCX
INCX is INTEGER
On entry, INCX specifies the increment for the elements of
CX. INCX must not be zero.
CY
CY is COMPLEX*16 array, dimension at least
( 1 + ( N - 1 )*abs( INCY ) ).
Before entry, the incremented array CY must contain the n
element vector cy. On exit, CY is overwritten by the updated
vector cy.
INCY
INCY is INTEGER
On entry, INCY specifies the increment for the elements of
CY. 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.
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
November 2011
Definition at line 99 of file zdrot.f.
Author
Generated automatically by Doxygen for LAPACK from the source code.
Version 3.4.2 Tue Sep 25 2012 zdrot.f(3)