.TH "variantsGEcomputational" 3 "Sun Nov 27 2022" "Version 3.11.0" "LAPACK" \" -*- nroff -*-
.ad l
.nh
.SH NAME
variantsGEcomputational \- Variants Computational routines
.SH SYNOPSIS
.br
.PP
.SS "Functions"

.in +1c
.ti -1c
.RI "subroutine \fBcgetrf\fP (M, N, A, LDA, IPIV, INFO)"
.br
.RI "\fBCGETRF\fP VARIANT: Crout Level 3 BLAS version of the algorithm\&. "
.ti -1c
.RI "subroutine \fBdgetrf\fP (M, N, A, LDA, IPIV, INFO)"
.br
.RI "\fBDGETRF\fP VARIANT: Crout Level 3 BLAS version of the algorithm\&. "
.ti -1c
.RI "subroutine \fBsgetrf\fP (M, N, A, LDA, IPIV, INFO)"
.br
.RI "\fBSGETRF\fP VARIANT: Crout Level 3 BLAS version of the algorithm\&. "
.ti -1c
.RI "subroutine \fBzgetrf\fP (M, N, A, LDA, IPIV, INFO)"
.br
.RI "\fBZGETRF\fP VARIANT: Crout Level 3 BLAS version of the algorithm\&. "
.ti -1c
.RI "subroutine \fBcgeqrf\fP (M, N, A, LDA, TAU, WORK, LWORK, INFO)"
.br
.RI "\fBCGEQRF\fP VARIANT: left-looking Level 3 BLAS version of the algorithm\&. "
.ti -1c
.RI "subroutine \fBdgeqrf\fP (M, N, A, LDA, TAU, WORK, LWORK, INFO)"
.br
.RI "\fBDGEQRF\fP VARIANT: left-looking Level 3 BLAS version of the algorithm\&. "
.ti -1c
.RI "subroutine \fBsgeqrf\fP (M, N, A, LDA, TAU, WORK, LWORK, INFO)"
.br
.RI "\fBSGEQRF\fP VARIANT: left-looking Level 3 BLAS version of the algorithm\&. "
.ti -1c
.RI "subroutine \fBzgeqrf\fP (M, N, A, LDA, TAU, WORK, LWORK, INFO)"
.br
.RI "\fBZGEQRF\fP VARIANT: left-looking Level 3 BLAS of the algorithm\&. "
.in -1c
.SH "Detailed Description"
.PP 
This is the group of Variants Computational routines 
.SH "Function Documentation"
.PP 
.SS "subroutine cgeqrf (integer M, integer N, complex, dimension( lda, * ) A, integer LDA, complex, dimension( * ) TAU, complex, dimension( * ) WORK, integer LWORK, integer INFO)"

.PP
\fBCGEQRF\fP VARIANT: left-looking Level 3 BLAS version of the algorithm\&. \fBPurpose:\fP 
.PP
.nf
 CGEQRF computes a QR factorization of a real M-by-N matrix A:
 A = Q * R\&.

 This is the left-looking Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is COMPLEX array, dimension (LDA,N)
          On entry, the M-by-N matrix A\&.
          On exit, the elements on and above the diagonal of the array
          contain the min(M,N)-by-N upper trapezoidal matrix R (R is
          upper triangular if m >= n); the elements below the diagonal,
          with the array TAU, represent the orthogonal matrix Q as a
          product of min(m,n) elementary reflectors (see Further
          Details)\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fITAU\fP 
.PP
.nf
          TAU is COMPLEX array, dimension (min(M,N))
          The scalar factors of the elementary reflectors (see Further
          Details)\&.
.fi
.PP
.br
\fIWORK\fP 
.PP
.nf
          WORK is COMPLEX array, dimension (MAX(1,LWORK))
          On exit, if INFO = 0, WORK(1) returns the optimal LWORK\&.
.fi
.PP
.br
\fILWORK\fP 
.PP
.nf
          LWORK is INTEGER
.fi
.PP
 
.PP
.nf
          The dimension of the array WORK\&. LWORK >= 1 if MIN(M,N) = 0,
          otherwise the dimension can be divided into three parts\&.
.fi
.PP
 
.PP
.nf
          1) The part for the triangular factor T\&. If the very last T is not bigger
             than any of the rest, then this part is NB x ceiling(K/NB), otherwise,
             NB x (K-NT), where K = min(M,N) and NT is the dimension of the very last T
.fi
.PP
 
.PP
.nf
          2) The part for the very last T when T is bigger than any of the rest T\&.
             The size of this part is NT x NT, where NT = K - ceiling ((K-NX)/NB) x NB,
             where K = min(M,N), NX is calculated by
                   NX = MAX( 0, ILAENV( 3, 'CGEQRF', ' ', M, N, -1, -1 ) )
.fi
.PP
 
.PP
.nf
          3) The part for dlarfb is of size max((N-M)*K, (N-M)*NB, K*NB, NB*NB)
.fi
.PP
 
.PP
.nf
          So LWORK = part1 + part2 + part3
.fi
.PP
 
.PP
.nf
          If LWORK = -1, then a workspace query is assumed; the routine
          only calculates the optimal size of the WORK array, returns
          this value as the first entry of the WORK array, and no error
          message related to LWORK is issued by XERBLA\&.
.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
December 2016
.RE
.PP
\fBFurther\fP \fBDetails\fP 
.PP
.nf
  The matrix Q is represented as a product of elementary reflectors

     Q = H(1) H(2) \&. \&. \&. H(k), where k = min(m,n)\&.

  Each H(i) has the form

     H(i) = I - tau * v * v'

  where tau is a real scalar, and v is a real vector with
  v(1:i-1) = 0 and v(i) = 1; v(i+1:m) is stored on exit in A(i+1:m,i),
  and tau in TAU(i)\&.
.fi
.PP
 
.SS "subroutine cgetrf (integer M, integer N, complex, dimension( lda, * ) A, integer LDA, integer, dimension( * ) IPIV, integer INFO)"

.PP
\fBCGETRF\fP VARIANT: Crout Level 3 BLAS version of the algorithm\&. \fBCGETRF\fP VARIANT: iterative version of Sivan Toledo's recursive LU algorithm
.PP
\fBCGETRF\fP VARIANT: left-looking Level 3 BLAS version of the algorithm\&.
.PP
\fBPurpose:\fP 
.PP
.nf
 CGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This is the Crout Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is COMPLEX array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016
.RE
.PP
\fBPurpose:\fP 
.PP
.nf
 CGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This is the left-looking Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is COMPLEX array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016
.RE
.PP
\fBPurpose:\fP 
.PP
.nf
 CGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This code implements an iterative version of Sivan Toledo's recursive
 LU algorithm[1]\&.  For square matrices, this iterative versions should
 be within a factor of two of the optimum number of memory transfers\&.

 The pattern is as follows, with the large blocks of U being updated
 in one call to DTRSM, and the dotted lines denoting sections that
 have had all pending permutations applied:

  1 2 3 4 5 6 7 8
 +-+-+---+-------+------
 | |1|   |       |
 |\&.+-+ 2 |       |
 | | |   |       |
 |\&.|\&.+-+-+   4   |
 | | | |1|       |
 | | |\&.+-+       |
 | | | | |       |
 |\&.|\&.|\&.|\&.+-+-+---+  8
 | | | | | |1|   |
 | | | | |\&.+-+ 2 |
 | | | | | | |   |
 | | | | |\&.|\&.+-+-+
 | | | | | | | |1|
 | | | | | | |\&.+-+
 | | | | | | | | |
 |\&.|\&.|\&.|\&.|\&.|\&.|\&.|\&.+-----
 | | | | | | | | |

 The 1-2-1-4-1-2-1-8-\&.\&.\&. pattern is the position of the last 1 bit in
 the binary expansion of the current column\&.  Each Schur update is
 applied as soon as the necessary portion of U is available\&.

 [1] Toledo, S\&. 1997\&. Locality of Reference in LU Decomposition with
 Partial Pivoting\&. SIAM J\&. Matrix Anal\&. Appl\&. 18, 4 (Oct\&. 1997),
 1065-1081\&. http://dx\&.doi\&.org/10\&.1137/S0895479896297744
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is COMPLEX array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016 
.RE
.PP

.SS "subroutine dgeqrf (integer M, integer N, double precision, dimension( lda, * ) A, integer LDA, double precision, dimension( * ) TAU, double precision, dimension( * ) WORK, integer LWORK, integer INFO)"

.PP
\fBDGEQRF\fP VARIANT: left-looking Level 3 BLAS version of the algorithm\&. \fBPurpose:\fP 
.PP
.nf
 DGEQRF computes a QR factorization of a real M-by-N matrix A:
 A = Q * R\&.

 This is the left-looking Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is DOUBLE PRECISION array, dimension (LDA,N)
          On entry, the M-by-N matrix A\&.
          On exit, the elements on and above the diagonal of the array
          contain the min(M,N)-by-N upper trapezoidal matrix R (R is
          upper triangular if m >= n); the elements below the diagonal,
          with the array TAU, represent the orthogonal matrix Q as a
          product of min(m,n) elementary reflectors (see Further
          Details)\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fITAU\fP 
.PP
.nf
          TAU is DOUBLE PRECISION array, dimension (min(M,N))
          The scalar factors of the elementary reflectors (see Further
          Details)\&.
.fi
.PP
.br
\fIWORK\fP 
.PP
.nf
          WORK is DOUBLE PRECISION array, dimension (MAX(1,LWORK))
          On exit, if INFO = 0, WORK(1) returns the optimal LWORK\&.
.fi
.PP
.br
\fILWORK\fP 
.PP
.nf
          LWORK is INTEGER
.fi
.PP
 
.PP
.nf
          The dimension of the array WORK\&. LWORK >= 1 if MIN(M,N) = 0,
          otherwise the dimension can be divided into three parts\&.
.fi
.PP
 
.PP
.nf
          1) The part for the triangular factor T\&. If the very last T is not bigger
             than any of the rest, then this part is NB x ceiling(K/NB), otherwise,
             NB x (K-NT), where K = min(M,N) and NT is the dimension of the very last T
.fi
.PP
 
.PP
.nf
          2) The part for the very last T when T is bigger than any of the rest T\&.
             The size of this part is NT x NT, where NT = K - ceiling ((K-NX)/NB) x NB,
             where K = min(M,N), NX is calculated by
                   NX = MAX( 0, ILAENV( 3, 'DGEQRF', ' ', M, N, -1, -1 ) )
.fi
.PP
 
.PP
.nf
          3) The part for dlarfb is of size max((N-M)*K, (N-M)*NB, K*NB, NB*NB)
.fi
.PP
 
.PP
.nf
          So LWORK = part1 + part2 + part3
.fi
.PP
 
.PP
.nf
          If LWORK = -1, then a workspace query is assumed; the routine
          only calculates the optimal size of the WORK array, returns
          this value as the first entry of the WORK array, and no error
          message related to LWORK is issued by XERBLA\&.
.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
December 2016
.RE
.PP
\fBFurther\fP \fBDetails\fP 
.PP
.nf
  The matrix Q is represented as a product of elementary reflectors

     Q = H(1) H(2) \&. \&. \&. H(k), where k = min(m,n)\&.

  Each H(i) has the form

     H(i) = I - tau * v * v'

  where tau is a real scalar, and v is a real vector with
  v(1:i-1) = 0 and v(i) = 1; v(i+1:m) is stored on exit in A(i+1:m,i),
  and tau in TAU(i)\&.
.fi
.PP
 
.SS "subroutine dgetrf (integer M, integer N, double precision, dimension( lda, * ) A, integer LDA, integer, dimension( * ) IPIV, integer INFO)"

.PP
\fBDGETRF\fP VARIANT: Crout Level 3 BLAS version of the algorithm\&. \fBDGETRF\fP VARIANT: iterative version of Sivan Toledo's recursive LU algorithm
.PP
\fBDGETRF\fP VARIANT: left-looking Level 3 BLAS version of the algorithm\&.
.PP
\fBPurpose:\fP 
.PP
.nf
 DGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This is the Crout Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is DOUBLE PRECISION array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016
.RE
.PP
\fBPurpose:\fP 
.PP
.nf
 DGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This is the left-looking Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is DOUBLE PRECISION array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016
.RE
.PP
\fBPurpose:\fP 
.PP
.nf
 DGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This code implements an iterative version of Sivan Toledo's recursive
 LU algorithm[1]\&.  For square matrices, this iterative versions should
 be within a factor of two of the optimum number of memory transfers\&.

 The pattern is as follows, with the large blocks of U being updated
 in one call to DTRSM, and the dotted lines denoting sections that
 have had all pending permutations applied:

  1 2 3 4 5 6 7 8
 +-+-+---+-------+------
 | |1|   |       |
 |\&.+-+ 2 |       |
 | | |   |       |
 |\&.|\&.+-+-+   4   |
 | | | |1|       |
 | | |\&.+-+       |
 | | | | |       |
 |\&.|\&.|\&.|\&.+-+-+---+  8
 | | | | | |1|   |
 | | | | |\&.+-+ 2 |
 | | | | | | |   |
 | | | | |\&.|\&.+-+-+
 | | | | | | | |1|
 | | | | | | |\&.+-+
 | | | | | | | | |
 |\&.|\&.|\&.|\&.|\&.|\&.|\&.|\&.+-----
 | | | | | | | | |

 The 1-2-1-4-1-2-1-8-\&.\&.\&. pattern is the position of the last 1 bit in
 the binary expansion of the current column\&.  Each Schur update is
 applied as soon as the necessary portion of U is available\&.

 [1] Toledo, S\&. 1997\&. Locality of Reference in LU Decomposition with
 Partial Pivoting\&. SIAM J\&. Matrix Anal\&. Appl\&. 18, 4 (Oct\&. 1997),
 1065-1081\&. http://dx\&.doi\&.org/10\&.1137/S0895479896297744
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is DOUBLE PRECISION array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016 
.RE
.PP

.SS "subroutine sgeqrf (integer M, integer N, real, dimension( lda, * ) A, integer LDA, real, dimension( * ) TAU, real, dimension( * ) WORK, integer LWORK, integer INFO)"

.PP
\fBSGEQRF\fP VARIANT: left-looking Level 3 BLAS version of the algorithm\&. \fBPurpose:\fP 
.PP
.nf
 SGEQRF computes a QR factorization of a real M-by-N matrix A:
 A = Q * R\&.

 This is the left-looking Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is REAL array, dimension (LDA,N)
          On entry, the M-by-N matrix A\&.
          On exit, the elements on and above the diagonal of the array
          contain the min(M,N)-by-N upper trapezoidal matrix R (R is
          upper triangular if m >= n); the elements below the diagonal,
          with the array TAU, represent the orthogonal matrix Q as a
          product of min(m,n) elementary reflectors (see Further
          Details)\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fITAU\fP 
.PP
.nf
          TAU is REAL array, dimension (min(M,N))
          The scalar factors of the elementary reflectors (see Further
          Details)\&.
.fi
.PP
.br
\fIWORK\fP 
.PP
.nf
          WORK is REAL array, dimension (MAX(1,LWORK))
          On exit, if INFO = 0, WORK(1) returns the optimal LWORK\&.
.fi
.PP
.br
\fILWORK\fP 
.PP
.nf
          LWORK is INTEGER
.fi
.PP
 
.PP
.nf
          The dimension of the array WORK\&. LWORK >= 1 if MIN(M,N) = 0,
          otherwise the dimension can be divided into three parts\&.
.fi
.PP
 
.PP
.nf
          1) The part for the triangular factor T\&. If the very last T is not bigger
             than any of the rest, then this part is NB x ceiling(K/NB), otherwise,
             NB x (K-NT), where K = min(M,N) and NT is the dimension of the very last T
.fi
.PP
 
.PP
.nf
          2) The part for the very last T when T is bigger than any of the rest T\&.
             The size of this part is NT x NT, where NT = K - ceiling ((K-NX)/NB) x NB,
             where K = min(M,N), NX is calculated by
                   NX = MAX( 0, ILAENV( 3, 'SGEQRF', ' ', M, N, -1, -1 ) )
.fi
.PP
 
.PP
.nf
          3) The part for dlarfb is of size max((N-M)*K, (N-M)*NB, K*NB, NB*NB)
.fi
.PP
 
.PP
.nf
          So LWORK = part1 + part2 + part3
.fi
.PP
 
.PP
.nf
          If LWORK = -1, then a workspace query is assumed; the routine
          only calculates the optimal size of the WORK array, returns
          this value as the first entry of the WORK array, and no error
          message related to LWORK is issued by XERBLA\&.
.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
December 2016
.RE
.PP
\fBFurther\fP \fBDetails\fP 
.PP
.nf
  The matrix Q is represented as a product of elementary reflectors

     Q = H(1) H(2) \&. \&. \&. H(k), where k = min(m,n)\&.

  Each H(i) has the form

     H(i) = I - tau * v * v'

  where tau is a real scalar, and v is a real vector with
  v(1:i-1) = 0 and v(i) = 1; v(i+1:m) is stored on exit in A(i+1:m,i),
  and tau in TAU(i)\&.
.fi
.PP
 
.SS "subroutine sgetrf (integer M, integer N, real, dimension( lda, * ) A, integer LDA, integer, dimension( * ) IPIV, integer INFO)"

.PP
\fBSGETRF\fP VARIANT: Crout Level 3 BLAS version of the algorithm\&. \fBSGETRF\fP VARIANT: iterative version of Sivan Toledo's recursive LU algorithm
.PP
\fBSGETRF\fP VARIANT: left-looking Level 3 BLAS version of the algorithm\&.
.PP
\fBPurpose:\fP 
.PP
.nf
 SGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This is the Crout Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is REAL array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016
.RE
.PP
\fBPurpose:\fP 
.PP
.nf
 SGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This is the left-looking Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is REAL array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016
.RE
.PP
\fBPurpose:\fP 
.PP
.nf
 SGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This code implements an iterative version of Sivan Toledo's recursive
 LU algorithm[1]\&.  For square matrices, this iterative versions should
 be within a factor of two of the optimum number of memory transfers\&.

 The pattern is as follows, with the large blocks of U being updated
 in one call to STRSM, and the dotted lines denoting sections that
 have had all pending permutations applied:

  1 2 3 4 5 6 7 8
 +-+-+---+-------+------
 | |1|   |       |
 |\&.+-+ 2 |       |
 | | |   |       |
 |\&.|\&.+-+-+   4   |
 | | | |1|       |
 | | |\&.+-+       |
 | | | | |       |
 |\&.|\&.|\&.|\&.+-+-+---+  8
 | | | | | |1|   |
 | | | | |\&.+-+ 2 |
 | | | | | | |   |
 | | | | |\&.|\&.+-+-+
 | | | | | | | |1|
 | | | | | | |\&.+-+
 | | | | | | | | |
 |\&.|\&.|\&.|\&.|\&.|\&.|\&.|\&.+-----
 | | | | | | | | |

 The 1-2-1-4-1-2-1-8-\&.\&.\&. pattern is the position of the last 1 bit in
 the binary expansion of the current column\&.  Each Schur update is
 applied as soon as the necessary portion of U is available\&.

 [1] Toledo, S\&. 1997\&. Locality of Reference in LU Decomposition with
 Partial Pivoting\&. SIAM J\&. Matrix Anal\&. Appl\&. 18, 4 (Oct\&. 1997),
 1065-1081\&. http://dx\&.doi\&.org/10\&.1137/S0895479896297744
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is REAL array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016 
.RE
.PP

.SS "subroutine zgeqrf (integer M, integer N, complex*16, dimension( lda, * ) A, integer LDA, complex*16, dimension( * ) TAU, complex*16, dimension( * ) WORK, integer LWORK, integer INFO)"

.PP
\fBZGEQRF\fP VARIANT: left-looking Level 3 BLAS of the algorithm\&. \fBPurpose:\fP 
.PP
.nf
 ZGEQRF computes a QR factorization of a real M-by-N matrix A:
 A = Q * R\&.

 This is the left-looking Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is COMPLEX*16 array, dimension (LDA,N)
          On entry, the M-by-N matrix A\&.
          On exit, the elements on and above the diagonal of the array
          contain the min(M,N)-by-N upper trapezoidal matrix R (R is
          upper triangular if m >= n); the elements below the diagonal,
          with the array TAU, represent the orthogonal matrix Q as a
          product of min(m,n) elementary reflectors (see Further
          Details)\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fITAU\fP 
.PP
.nf
          TAU is COMPLEX*16 array, dimension (min(M,N))
          The scalar factors of the elementary reflectors (see Further
          Details)\&.
.fi
.PP
.br
\fIWORK\fP 
.PP
.nf
          WORK is COMPLEX*16 array, dimension (MAX(1,LWORK))
          On exit, if INFO = 0, WORK(1) returns the optimal LWORK\&.
.fi
.PP
.br
\fILWORK\fP 
.PP
.nf
          LWORK is INTEGER
.fi
.PP
 
.PP
.nf
          The dimension of the array WORK\&. LWORK >= 1 if MIN(M,N) = 0,
          otherwise the dimension can be divided into three parts\&.
.fi
.PP
 
.PP
.nf
          1) The part for the triangular factor T\&. If the very last T is not bigger
             than any of the rest, then this part is NB x ceiling(K/NB), otherwise,
             NB x (K-NT), where K = min(M,N) and NT is the dimension of the very last T
.fi
.PP
 
.PP
.nf
          2) The part for the very last T when T is bigger than any of the rest T\&.
             The size of this part is NT x NT, where NT = K - ceiling ((K-NX)/NB) x NB,
             where K = min(M,N), NX is calculated by
                   NX = MAX( 0, ILAENV( 3, 'ZGEQRF', ' ', M, N, -1, -1 ) )
.fi
.PP
 
.PP
.nf
          3) The part for dlarfb is of size max((N-M)*K, (N-M)*NB, K*NB, NB*NB)
.fi
.PP
 
.PP
.nf
          So LWORK = part1 + part2 + part3
.fi
.PP
 
.PP
.nf
          If LWORK = -1, then a workspace query is assumed; the routine
          only calculates the optimal size of the WORK array, returns
          this value as the first entry of the WORK array, and no error
          message related to LWORK is issued by XERBLA\&.
.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
December 2016
.RE
.PP
\fBFurther\fP \fBDetails\fP 
.PP
.nf
  The matrix Q is represented as a product of elementary reflectors

     Q = H(1) H(2) \&. \&. \&. H(k), where k = min(m,n)\&.

  Each H(i) has the form

     H(i) = I - tau * v * v'

  where tau is a real scalar, and v is a real vector with
  v(1:i-1) = 0 and v(i) = 1; v(i+1:m) is stored on exit in A(i+1:m,i),
  and tau in TAU(i)\&.
.fi
.PP
 
.SS "subroutine zgetrf (integer M, integer N, complex*16, dimension( lda, * ) A, integer LDA, integer, dimension( * ) IPIV, integer INFO)"

.PP
\fBZGETRF\fP VARIANT: Crout Level 3 BLAS version of the algorithm\&. \fBZGETRF\fP VARIANT: iterative version of Sivan Toledo's recursive LU algorithm
.PP
\fBZGETRF\fP VARIANT: left-looking Level 3 BLAS version of the algorithm\&.
.PP
\fBPurpose:\fP 
.PP
.nf
 ZGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This is the Crout Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is COMPLEX*16 array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016
.RE
.PP
\fBPurpose:\fP 
.PP
.nf
 ZGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This is the left-looking Level 3 BLAS version of the algorithm\&.
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is COMPLEX*16 array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016
.RE
.PP
\fBPurpose:\fP 
.PP
.nf
 ZGETRF computes an LU factorization of a general M-by-N matrix A
 using partial pivoting with row interchanges\&.

 The factorization has the form
    A = P * L * U
 where P is a permutation matrix, L is lower triangular with unit
 diagonal elements (lower trapezoidal if m > n), and U is upper
 triangular (upper trapezoidal if m < n)\&.

 This code implements an iterative version of Sivan Toledo's recursive
 LU algorithm[1]\&.  For square matrices, this iterative versions should
 be within a factor of two of the optimum number of memory transfers\&.

 The pattern is as follows, with the large blocks of U being updated
 in one call to DTRSM, and the dotted lines denoting sections that
 have had all pending permutations applied:

  1 2 3 4 5 6 7 8
 +-+-+---+-------+------
 | |1|   |       |
 |\&.+-+ 2 |       |
 | | |   |       |
 |\&.|\&.+-+-+   4   |
 | | | |1|       |
 | | |\&.+-+       |
 | | | | |       |
 |\&.|\&.|\&.|\&.+-+-+---+  8
 | | | | | |1|   |
 | | | | |\&.+-+ 2 |
 | | | | | | |   |
 | | | | |\&.|\&.+-+-+
 | | | | | | | |1|
 | | | | | | |\&.+-+
 | | | | | | | | |
 |\&.|\&.|\&.|\&.|\&.|\&.|\&.|\&.+-----
 | | | | | | | | |

 The 1-2-1-4-1-2-1-8-\&.\&.\&. pattern is the position of the last 1 bit in
 the binary expansion of the current column\&.  Each Schur update is
 applied as soon as the necessary portion of U is available\&.

 [1] Toledo, S\&. 1997\&. Locality of Reference in LU Decomposition with
 Partial Pivoting\&. SIAM J\&. Matrix Anal\&. Appl\&. 18, 4 (Oct\&. 1997),
 1065-1081\&. http://dx\&.doi\&.org/10\&.1137/S0895479896297744
.fi
.PP
 
.PP
\fBParameters\fP
.RS 4
\fIM\fP 
.PP
.nf
          M is INTEGER
          The number of rows of the matrix A\&.  M >= 0\&.
.fi
.PP
.br
\fIN\fP 
.PP
.nf
          N is INTEGER
          The number of columns of the matrix A\&.  N >= 0\&.
.fi
.PP
.br
\fIA\fP 
.PP
.nf
          A is COMPLEX*16 array, dimension (LDA,N)
          On entry, the M-by-N matrix to be factored\&.
          On exit, the factors L and U from the factorization
          A = P*L*U; the unit diagonal elements of L are not stored\&.
.fi
.PP
.br
\fILDA\fP 
.PP
.nf
          LDA is INTEGER
          The leading dimension of the array A\&.  LDA >= max(1,M)\&.
.fi
.PP
.br
\fIIPIV\fP 
.PP
.nf
          IPIV is INTEGER array, dimension (min(M,N))
          The pivot indices; for 1 <= i <= min(M,N), row i of the
          matrix was interchanged with row IPIV(i)\&.
.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
          > 0:  if INFO = i, U(i,i) is exactly zero\&. The factorization
                has been completed, but the factor U is exactly
                singular, and division by zero will occur if it is used
                to solve a system of equations\&.
.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
December 2016 
.RE
.PP

.SH "Author"
.PP 
Generated automatically by Doxygen for LAPACK from the source code\&.