.TH "SRC/crscl.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME SRC/crscl.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBcrscl\fP (n, a, x, incx)" .br .RI "\fBCRSCL\fP multiplies a vector by the reciprocal of a real scalar\&. " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine crscl (integer n, complex a, complex, dimension( * ) x, integer incx)" .PP \fBCRSCL\fP multiplies a vector by the reciprocal of a real scalar\&. .PP \fBPurpose:\fP .RS 4 .PP .nf CRSCL multiplies an n-element complex vector x by the complex scalar 1/a\&. This is done without overflow or underflow as long as the final result x/a does not overflow or underflow\&. .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIN\fP .PP .nf N is INTEGER The number of components of the vector x\&. .fi .PP .br \fIA\fP .PP .nf A is COMPLEX The scalar a which is used to divide each component of x\&. A must not be 0, or the subroutine will divide by zero\&. .fi .PP .br \fIX\fP .PP .nf X is COMPLEX array, dimension (1+(N-1)*abs(INCX)) The n-element vector x\&. .fi .PP .br \fIINCX\fP .PP .nf INCX is INTEGER The increment between successive values of the vector X\&. > 0: X(1) = X(1) and X(1+(i-1)*INCX) = x(i), 1< i<= n .fi .PP .RE .PP \fBAuthor\fP .RS 4 Univ\&. of Tennessee .PP Univ\&. of California Berkeley .PP Univ\&. of Colorado Denver .PP NAG Ltd\&. .RE .PP .PP Definition at line \fB83\fP of file \fBcrscl\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.