.TH "TESTING/LIN/cqrt14.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME TESTING/LIN/cqrt14.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "real function \fBcqrt14\fP (trans, m, n, nrhs, a, lda, x, ldx, work, lwork)" .br .RI "\fBCQRT14\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "real function cqrt14 (character trans, integer m, integer n, integer nrhs, complex, dimension( lda, * ) a, integer lda, complex, dimension( ldx, * ) x, integer ldx, complex, dimension( lwork ) work, integer lwork)" .PP \fBCQRT14\fP .PP \fBPurpose:\fP .RS 4 .PP .nf !> !> CQRT14 checks whether X is in the row space of A or A'\&. It does so !> by scaling both X and A such that their norms are in the range !> [sqrt(eps), 1/sqrt(eps)], then computing a QR factorization of [A,X] !> (if TRANS = 'C') or an LQ factorization of [A',X]' (if TRANS = 'N'), !> and returning the norm of the trailing triangle, scaled by !> MAX(M,N,NRHS)*eps\&. !> .fi .PP .RE .PP \fBParameters\fP .RS 4 \fITRANS\fP .PP .nf !> TRANS is CHARACTER*1 !> = 'N': No transpose, check for X in the row space of A !> = 'C': Conjugate transpose, check for X in row space of A'\&. !> .fi .PP .br \fIM\fP .PP .nf !> M is INTEGER !> The number of rows of the matrix A\&. !> .fi .PP .br \fIN\fP .PP .nf !> N is INTEGER !> The number of columns of the matrix A\&. !> .fi .PP .br \fINRHS\fP .PP .nf !> NRHS is INTEGER !> The number of right hand sides, i\&.e\&., the number of columns !> of X\&. !> .fi .PP .br \fIA\fP .PP .nf !> A is COMPLEX array, dimension (LDA,N) !> The M-by-N matrix A\&. !> .fi .PP .br \fILDA\fP .PP .nf !> LDA is INTEGER !> The leading dimension of the array A\&. !> .fi .PP .br \fIX\fP .PP .nf !> X is COMPLEX array, dimension (LDX,NRHS) !> If TRANS = 'N', the N-by-NRHS matrix X\&. !> IF TRANS = 'C', the M-by-NRHS matrix X\&. !> .fi .PP .br \fILDX\fP .PP .nf !> LDX is INTEGER !> The leading dimension of the array X\&. !> .fi .PP .br \fIWORK\fP .PP .nf !> WORK is COMPLEX array dimension (LWORK) !> .fi .PP .br \fILWORK\fP .PP .nf !> LWORK is INTEGER !> length of workspace array required !> If TRANS = 'N', LWORK >= (M+NRHS)*(N+2); !> if TRANS = 'C', LWORK >= (N+NRHS)*(M+2)\&. !> .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 \fB114\fP of file \fBcqrt14\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.