.TH "TESTING/LIN/claipd.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME TESTING/LIN/claipd.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBclaipd\fP (n, a, inda, vinda)" .br .RI "\fBCLAIPD\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine claipd (integer n, complex, dimension( * ) a, integer inda, integer vinda)" .PP \fBCLAIPD\fP .PP \fBPurpose:\fP .RS 4 .PP .nf CLAIPD sets the imaginary part of the diagonal elements of a complex matrix A to a large value\&. This is used to test LAPACK routines for complex Hermitian matrices, which are not supposed to access or use the imaginary parts of the diagonals\&. .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIN\fP .PP .nf N is INTEGER The number of diagonal elements of A\&. .fi .PP .br \fIA\fP .PP .nf A is COMPLEX array, dimension (1+(N-1)*INDA+(N-2)*VINDA) On entry, the complex (Hermitian) matrix A\&. On exit, the imaginary parts of the diagonal elements are set to BIGNUM = EPS / SAFMIN, where EPS is the machine epsilon and SAFMIN is the safe minimum\&. .fi .PP .br \fIINDA\fP .PP .nf INDA is INTEGER The increment between A(1) and the next diagonal element of A\&. Typical values are = LDA+1: square matrices with leading dimension LDA = 2: packed upper triangular matrix, starting at A(1,1) = N: packed lower triangular matrix, starting at A(1,1) .fi .PP .br \fIVINDA\fP .PP .nf VINDA is INTEGER The change in the diagonal increment between columns of A\&. Typical values are = 0: no change, the row and column increments in A are fixed = 1: packed upper triangular matrix = -1: packed lower triangular matrix .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 \fB82\fP of file \fBclaipd\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.