TESTING/LIN/claipd.f(3) Library Functions Manual TESTING/LIN/claipd.f(3) NAME TESTING/LIN/claipd.f SYNOPSIS Functions/Subroutines subroutine claipd (n, a, inda, vinda) CLAIPD Function/Subroutine Documentation subroutine claipd (integer n, complex, dimension( * ) a, integer inda, integer vinda) CLAIPD Purpose: 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. Parameters N N is INTEGER The number of diagonal elements of A. A 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. INDA 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) VINDA 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 Author Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd. Definition at line 82 of file claipd.f. Author Generated automatically by Doxygen for LAPACK from the source code. LAPACK Version 3.12.0 TESTING/LIN/claipd.f(3)