.TH "zunmr3.f" 3 "Wed Oct 15 2014" "Version 3.4.2" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME zunmr3.f \- .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBzunmr3\fP (SIDE, TRANS, M, N, K, L, A, LDA, TAU, C, LDC, WORK, INFO)" .br .RI "\fI\fBZUNMR3\fP multiplies a general matrix by the unitary matrix from a RZ factorization determined by ctzrzf (unblocked algorithm)\&. \fP" .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine zunmr3 (characterSIDE, characterTRANS, integerM, integerN, integerK, integerL, complex*16, dimension( lda, * )A, integerLDA, complex*16, dimension( * )TAU, complex*16, dimension( ldc, * )C, integerLDC, complex*16, dimension( * )WORK, integerINFO)" .PP \fBZUNMR3\fP multiplies a general matrix by the unitary matrix from a RZ factorization determined by ctzrzf (unblocked algorithm)\&. .PP \fBPurpose: \fP .RS 4 .PP .nf ZUNMR3 overwrites the general complex m by n matrix C with Q * C if SIDE = 'L' and TRANS = 'N', or Q**H* C if SIDE = 'L' and TRANS = 'C', or C * Q if SIDE = 'R' and TRANS = 'N', or C * Q**H if SIDE = 'R' and TRANS = 'C', where Q is a complex unitary matrix defined as the product of k elementary reflectors Q = H(1) H(2) . . . H(k) as returned by ZTZRZF. Q is of order m if SIDE = 'L' and of order n if SIDE = 'R'. .fi .PP .RE .PP \fBParameters:\fP .RS 4 \fISIDE\fP .PP .nf SIDE is CHARACTER*1 = 'L': apply Q or Q**H from the Left = 'R': apply Q or Q**H from the Right .fi .PP .br \fITRANS\fP .PP .nf TRANS is CHARACTER*1 = 'N': apply Q (No transpose) = 'C': apply Q**H (Conjugate transpose) .fi .PP .br \fIM\fP .PP .nf M is INTEGER The number of rows of the matrix C. M >= 0. .fi .PP .br \fIN\fP .PP .nf N is INTEGER The number of columns of the matrix C. N >= 0. .fi .PP .br \fIK\fP .PP .nf K is INTEGER The number of elementary reflectors whose product defines the matrix Q. If SIDE = 'L', M >= K >= 0; if SIDE = 'R', N >= K >= 0. .fi .PP .br \fIL\fP .PP .nf L is INTEGER The number of columns of the matrix A containing the meaningful part of the Householder reflectors. If SIDE = 'L', M >= L >= 0, if SIDE = 'R', N >= L >= 0. .fi .PP .br \fIA\fP .PP .nf A is COMPLEX*16 array, dimension (LDA,M) if SIDE = 'L', (LDA,N) if SIDE = 'R' The i-th row must contain the vector which defines the elementary reflector H(i), for i = 1,2,...,k, as returned by ZTZRZF in the last k rows of its array argument A. A is modified by the routine but restored on exit. .fi .PP .br \fILDA\fP .PP .nf LDA is INTEGER The leading dimension of the array A. LDA >= max(1,K). .fi .PP .br \fITAU\fP .PP .nf TAU is COMPLEX*16 array, dimension (K) TAU(i) must contain the scalar factor of the elementary reflector H(i), as returned by ZTZRZF. .fi .PP .br \fIC\fP .PP .nf C is COMPLEX*16 array, dimension (LDC,N) On entry, the m-by-n matrix C. On exit, C is overwritten by Q*C or Q**H*C or C*Q**H or C*Q. .fi .PP .br \fILDC\fP .PP .nf LDC is INTEGER The leading dimension of the array C. LDC >= max(1,M). .fi .PP .br \fIWORK\fP .PP .nf WORK is COMPLEX*16 array, dimension (N) if SIDE = 'L', (M) if SIDE = 'R' .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 \fBDate:\fP .RS 4 September 2012 .RE .PP \fBContributors: \fP .RS 4 A\&. Petitet, Computer Science Dept\&., Univ\&. of Tenn\&., Knoxville, USA .RE .PP \fBFurther Details: \fP .RS 4 .PP .nf .fi .PP .RE .PP .PP Definition at line 178 of file zunmr3\&.f\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.