# claipd.f - Man Page

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.

## Referenced By

The man page claipd(3) is an alias of claipd.f(3).

Tue Nov 28 2023 12:08:42 Version 3.12.0 LAPACK