.TH "TESTING/LIN/zlattp.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME TESTING/LIN/zlattp.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBzlattp\fP (imat, uplo, trans, diag, iseed, n, ap, b, work, rwork, info)" .br .RI "\fBZLATTP\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine zlattp (integer imat, character uplo, character trans, character diag, integer, dimension( 4 ) iseed, integer n, complex*16, dimension( * ) ap, complex*16, dimension( * ) b, complex*16, dimension( * ) work, double precision, dimension( * ) rwork, integer info)" .PP \fBZLATTP\fP .PP \fBPurpose:\fP .RS 4 .PP .nf !> !> ZLATTP generates a triangular test matrix in packed storage\&. !> IMAT and UPLO uniquely specify the properties of the test matrix, !> which is returned in the array AP\&. !> .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIIMAT\fP .PP .nf !> IMAT is INTEGER !> An integer key describing which matrix to generate for this !> path\&. !> .fi .PP .br \fIUPLO\fP .PP .nf !> UPLO is CHARACTER*1 !> Specifies whether the matrix A will be upper or lower !> triangular\&. !> = 'U': Upper triangular !> = 'L': Lower triangular !> .fi .PP .br \fITRANS\fP .PP .nf !> TRANS is CHARACTER*1 !> Specifies whether the matrix or its transpose will be used\&. !> = 'N': No transpose !> = 'T': Transpose !> = 'C': Conjugate transpose !> .fi .PP .br \fIDIAG\fP .PP .nf !> DIAG is CHARACTER*1 !> Specifies whether or not the matrix A is unit triangular\&. !> = 'N': Non-unit triangular !> = 'U': Unit triangular !> .fi .PP .br \fIISEED\fP .PP .nf !> ISEED is INTEGER array, dimension (4) !> The seed vector for the random number generator (used in !> ZLATMS)\&. Modified on exit\&. !> .fi .PP .br \fIN\fP .PP .nf !> N is INTEGER !> The order of the matrix to be generated\&. !> .fi .PP .br \fIAP\fP .PP .nf !> AP is COMPLEX*16 array, dimension (N*(N+1)/2) !> The upper or lower triangular matrix A, packed columnwise in !> a linear array\&. The j-th column of A is stored in the array !> AP as follows: !> if UPLO = 'U', AP((j-1)*j/2 + i) = A(i,j) for 1<=i<=j; !> if UPLO = 'L', !> AP((j-1)*(n-j) + j*(j+1)/2 + i-j) = A(i,j) for j<=i<=n\&. !> .fi .PP .br \fIB\fP .PP .nf !> B is COMPLEX*16 array, dimension (N) !> The right hand side vector, if IMAT > 10\&. !> .fi .PP .br \fIWORK\fP .PP .nf !> WORK is COMPLEX*16 array, dimension (2*N) !> .fi .PP .br \fIRWORK\fP .PP .nf !> RWORK is DOUBLE PRECISION array, dimension (N) !> .fi .PP .br \fIINFO\fP .PP .nf !> INFO is INTEGER !> = 0: successful exit !> < 0: if INFO = -i, the i-th argument had an illegal value !> .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 \fB129\fP of file \fBzlattp\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.