zlatrz - formations
SUBROUTINE ZLATRZ( M, N, L, A, LDA, TAU, WORK ) INTEGER L, LDA, M, N DOUBLE COMPLEX A(LDA,*), TAU(*),WORK(*) SUBROUTINE ZLATRZ_64( M, N, L, A, LDA, TAU, WORK ) INTEGER*8 L, LDA, M, N DOUBLE COMPLEX A(LDA,*), TAU(*),WORK(*) F95 INTERFACE SUBROUTINE LATRZ( M, N, L, A, LDA, TAU, WORK ) INTEGER :: M, N, L, LDA COMPLEX(8), DIMENSION(:,:) :: A COMPLEX(8), DIMENSION(:) :: TAU, WORK SUBROUTINE LATRZ_64( M, N, L, A, LDA, TAU, WORK ) INTEGER(8) :: M, N, L, LDA COMPLEX(8), DIMENSION(:,:) :: A COMPLEX(8), DIMENSION(:) :: TAU, WORK C INTERFACE #include <sunperf.h> void zlatrz (int m, int n, int l, doublecomplex *a, int lda, doublecom- plex *tau); void zlatrz_64 (long m, long n, long l, doublecomplex *a, long lda, doublecomplex *tau);
Oracle Solaris Studio Performance Library zlatrz(3P)
NAME
zlatrz - factor an upper trapezoidal matrix by means of unitary trans-
formations
SYNOPSIS
SUBROUTINE ZLATRZ( M, N, L, A, LDA, TAU, WORK )
INTEGER L, LDA, M, N
DOUBLE COMPLEX A(LDA,*), TAU(*),WORK(*)
SUBROUTINE ZLATRZ_64( M, N, L, A, LDA, TAU, WORK )
INTEGER*8 L, LDA, M, N
DOUBLE COMPLEX A(LDA,*), TAU(*),WORK(*)
F95 INTERFACE
SUBROUTINE LATRZ( M, N, L, A, LDA, TAU, WORK )
INTEGER :: M, N, L, LDA
COMPLEX(8), DIMENSION(:,:) :: A
COMPLEX(8), DIMENSION(:) :: TAU, WORK
SUBROUTINE LATRZ_64( M, N, L, A, LDA, TAU, WORK )
INTEGER(8) :: M, N, L, LDA
COMPLEX(8), DIMENSION(:,:) :: A
COMPLEX(8), DIMENSION(:) :: TAU, WORK
C INTERFACE
#include <sunperf.h>
void zlatrz (int m, int n, int l, doublecomplex *a, int lda, doublecom-
plex *tau);
void zlatrz_64 (long m, long n, long l, doublecomplex *a, long lda,
doublecomplex *tau);
PURPOSE
zlatrz factors the M-by-(M+L) complex upper trapezoidal matrix [ A1 A2
] = [ A(1:M,1:M) A(1:M,N-L+1:N) ] as ( R 0 ) * Z by means of unitary
transformations, where Z is an (M+L)-by-(M+L) unitary matrix and, R
and A1 are M-by-M upper triangular matrices.
ARGUMENTS
M (input)
M is INTEGER
The number of rows of the matrix A. M >= 0.
N (input)
N is INTEGER
The number of columns of the matrix A. N >= 0.
L (input)
L is INTEGER
The number of columns of the matrix A containing the
meaningful part of the Householder vectors. N-M >= L >= 0.
A (input/output)
A is COMPLEX*16 array, dimension (LDA,N)
On entry, the leading M-by-N upper trapezoidal part of the
array A must contain the matrix to be factorized.
On exit, the leading M-by-M upper triangular part of A
contains the upper triangular matrix R, and elements N-L+1 to
N of the first M rows of A, with the array TAU, represent the
unitary matrix Z as a product of M elementary reflectors.
LDA (input)
LDA is INTEGER
The leading dimension of the array A. LDA >= max(1,M).
TAU (output)
TAU is COMPLEX*16 array, dimension (M)
The scalar factors of the elementary reflectors.
WORK (output)
WORK is COMPLEX*16 array, dimension (M)
7 Nov 2015 zlatrz(3P)