.TH "SRC/DEPRECATED/clahrd.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME SRC/DEPRECATED/clahrd.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBclahrd\fP (n, k, nb, a, lda, tau, t, ldt, y, ldy)" .br .RI "\fBCLAHRD\fP reduces the first nb columns of a general rectangular matrix A so that elements below the k-th subdiagonal are zero, and returns auxiliary matrices which are needed to apply the transformation to the unreduced part of A\&. " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine clahrd (integer n, integer k, integer nb, complex, dimension( lda, * ) a, integer lda, complex, dimension( nb ) tau, complex, dimension( ldt, nb ) t, integer ldt, complex, dimension( ldy, nb ) y, integer ldy)" .PP \fBCLAHRD\fP reduces the first nb columns of a general rectangular matrix A so that elements below the k-th subdiagonal are zero, and returns auxiliary matrices which are needed to apply the transformation to the unreduced part of A\&. .PP \fBPurpose:\fP .RS 4 .PP .nf This routine is deprecated and has been replaced by routine CLAHR2\&. CLAHRD reduces the first NB columns of a complex general n-by-(n-k+1) matrix A so that elements below the k-th subdiagonal are zero\&. The reduction is performed by a unitary similarity transformation Q**H * A * Q\&. The routine returns the matrices V and T which determine Q as a block reflector I - V*T*V**H, and also the matrix Y = A * V * T\&. .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIN\fP .PP .nf N is INTEGER The order of the matrix A\&. .fi .PP .br \fIK\fP .PP .nf K is INTEGER The offset for the reduction\&. Elements below the k-th subdiagonal in the first NB columns are reduced to zero\&. .fi .PP .br \fINB\fP .PP .nf NB is INTEGER The number of columns to be reduced\&. .fi .PP .br \fIA\fP .PP .nf A is COMPLEX array, dimension (LDA,N-K+1) On entry, the n-by-(n-k+1) general matrix A\&. On exit, the elements on and above the k-th subdiagonal in the first NB columns are overwritten with the corresponding elements of the reduced matrix; the elements below the k-th subdiagonal, with the array TAU, represent the matrix Q as a product of elementary reflectors\&. The other columns of A are unchanged\&. See Further Details\&. .fi .PP .br \fILDA\fP .PP .nf LDA is INTEGER The leading dimension of the array A\&. LDA >= max(1,N)\&. .fi .PP .br \fITAU\fP .PP .nf TAU is COMPLEX array, dimension (NB) The scalar factors of the elementary reflectors\&. See Further Details\&. .fi .PP .br \fIT\fP .PP .nf T is COMPLEX array, dimension (LDT,NB) The upper triangular matrix T\&. .fi .PP .br \fILDT\fP .PP .nf LDT is INTEGER The leading dimension of the array T\&. LDT >= NB\&. .fi .PP .br \fIY\fP .PP .nf Y is COMPLEX array, dimension (LDY,NB) The n-by-nb matrix Y\&. .fi .PP .br \fILDY\fP .PP .nf LDY is INTEGER The leading dimension of the array Y\&. LDY >= max(1,N)\&. .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 \fBFurther Details:\fP .RS 4 .PP .nf The matrix Q is represented as a product of nb elementary reflectors Q = H(1) H(2) \&. \&. \&. H(nb)\&. Each H(i) has the form H(i) = I - tau * v * v**H where tau is a complex scalar, and v is a complex vector with v(1:i+k-1) = 0, v(i+k) = 1; v(i+k+1:n) is stored on exit in A(i+k+1:n,i), and tau in TAU(i)\&. The elements of the vectors v together form the (n-k+1)-by-nb matrix V which is needed, with T and Y, to apply the transformation to the unreduced part of the matrix, using an update of the form: A := (I - V*T*V**H) * (A - Y*V**H)\&. The contents of A on exit are illustrated by the following example with n = 7, k = 3 and nb = 2: ( a h a a a ) ( a h a a a ) ( a h a a a ) ( h h a a a ) ( v1 h a a a ) ( v1 v2 a a a ) ( v1 v2 a a a ) where a denotes an element of the original matrix A, h denotes a modified element of the upper Hessenberg matrix H, and vi denotes an element of the vector defining H(i)\&. .fi .PP .RE .PP .PP Definition at line \fB166\fP of file \fBclahrd\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.