diff --git a/lapack-netlib/SRC/zcposv.f b/lapack-netlib/SRC/zcposv.f index 9b1940d60..649d2c049 100644 --- a/lapack-netlib/SRC/zcposv.f +++ b/lapack-netlib/SRC/zcposv.f @@ -187,10 +187,10 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, the leading minor of order i of -*> (COMPLEX*16) A is not positive definite, so the -*> factorization could not be completed, and the solution -*> has not been computed. +*> > 0: if INFO = i, the leading principal minor of order i +*> of (COMPLEX*16) A is not positive, so the factorization +*> could not be completed, and the solution has not been +*> computed. *> \endverbatim * * Authors: diff --git a/lapack-netlib/SRC/zhegv.f b/lapack-netlib/SRC/zhegv.f index 41657e3be..c973bd0fc 100644 --- a/lapack-netlib/SRC/zhegv.f +++ b/lapack-netlib/SRC/zhegv.f @@ -160,7 +160,7 @@ *> i off-diagonal elements of an intermediate *> tridiagonal form did not converge to zero; *> > N: if INFO = N + i, for 1 <= i <= N, then the leading -*> minor of order i of B is not positive definite. +*> principal minor of order i of B is not positive. *> The factorization of B could not be completed and *> no eigenvalues or eigenvectors were computed. *> \endverbatim diff --git a/lapack-netlib/SRC/zhegv_2stage.f b/lapack-netlib/SRC/zhegv_2stage.f index fda651e5e..91ac09311 100644 --- a/lapack-netlib/SRC/zhegv_2stage.f +++ b/lapack-netlib/SRC/zhegv_2stage.f @@ -179,7 +179,7 @@ *> i off-diagonal elements of an intermediate *> tridiagonal form did not converge to zero; *> > N: if INFO = N + i, for 1 <= i <= N, then the leading -*> minor of order i of B is not positive definite. +*> principal minor of order i of B is not positive. *> The factorization of B could not be completed and *> no eigenvalues or eigenvectors were computed. *> \endverbatim diff --git a/lapack-netlib/SRC/zhegvd.f b/lapack-netlib/SRC/zhegvd.f index eeda656ad..2c3586517 100644 --- a/lapack-netlib/SRC/zhegvd.f +++ b/lapack-netlib/SRC/zhegvd.f @@ -212,7 +212,7 @@ *> the submatrix lying in rows and columns INFO/(N+1) *> through mod(INFO,N+1); *> > N: if INFO = N + i, for 1 <= i <= N, then the leading -*> minor of order i of B is not positive definite. +*> principal minor of order i of B is not positive. *> The factorization of B could not be completed and *> no eigenvalues or eigenvectors were computed. *> \endverbatim diff --git a/lapack-netlib/SRC/zhegvx.f b/lapack-netlib/SRC/zhegvx.f index ac9f9ef1a..71ed1c4ca 100644 --- a/lapack-netlib/SRC/zhegvx.f +++ b/lapack-netlib/SRC/zhegvx.f @@ -280,7 +280,7 @@ *> i eigenvectors failed to converge. Their indices *> are stored in array IFAIL. *> > N: if INFO = N + i, for 1 <= i <= N, then the leading -*> minor of order i of B is not positive definite. +*> principal minor of order i of B is not positive. *> The factorization of B could not be completed and *> no eigenvalues or eigenvectors were computed. *> \endverbatim diff --git a/lapack-netlib/SRC/zhpgv.f b/lapack-netlib/SRC/zhpgv.f index 72876b6e4..b92168555 100644 --- a/lapack-netlib/SRC/zhpgv.f +++ b/lapack-netlib/SRC/zhpgv.f @@ -144,7 +144,7 @@ *> i off-diagonal elements of an intermediate *> tridiagonal form did not convergeto zero; *> > N: if INFO = N + i, for 1 <= i <= n, then the leading -*> minor of order i of B is not positive definite. +*> principal minor of order i of B is not positive. *> The factorization of B could not be completed and *> no eigenvalues or eigenvectors were computed. *> \endverbatim diff --git a/lapack-netlib/SRC/zhpgvd.f b/lapack-netlib/SRC/zhpgvd.f index e96e39738..e9688f0c7 100644 --- a/lapack-netlib/SRC/zhpgvd.f +++ b/lapack-netlib/SRC/zhpgvd.f @@ -205,7 +205,7 @@ *> i off-diagonal elements of an intermediate *> tridiagonal form did not convergeto zero; *> > N: if INFO = N + i, for 1 <= i <= n, then the leading -*> minor of order i of B is not positive definite. +*> principal minor of order i of B is not positive. *> The factorization of B could not be completed and *> no eigenvalues or eigenvectors were computed. *> \endverbatim diff --git a/lapack-netlib/SRC/zhpgvx.f b/lapack-netlib/SRC/zhpgvx.f index 94d7f7733..de75b486b 100644 --- a/lapack-netlib/SRC/zhpgvx.f +++ b/lapack-netlib/SRC/zhpgvx.f @@ -250,7 +250,7 @@ *> i eigenvectors failed to converge. Their indices *> are stored in array IFAIL. *> > N: if INFO = N + i, for 1 <= i <= n, then the leading -*> minor of order i of B is not positive definite. +*> principal minor of order i of B is not positive. *> The factorization of B could not be completed and *> no eigenvalues or eigenvectors were computed. *> \endverbatim diff --git a/lapack-netlib/SRC/zla_porpvgrw.f b/lapack-netlib/SRC/zla_porpvgrw.f index 9b381a072..897589aa0 100644 --- a/lapack-netlib/SRC/zla_porpvgrw.f +++ b/lapack-netlib/SRC/zla_porpvgrw.f @@ -142,9 +142,9 @@ * .. Executable Statements .. UPPER = LSAME( 'Upper', UPLO ) * -* DPOTRF will have factored only the NCOLSxNCOLS leading minor, so -* we restrict the growth search to that minor and use only the first -* 2*NCOLS workspace entries. +* DPOTRF will have factored only the NCOLSxNCOLS leading submatrix, +* so we restrict the growth search to that submatrix and use only +* the first 2*NCOLS workspace entries. * RPVGRW = 1.0D+0 DO I = 1, 2*NCOLS diff --git a/lapack-netlib/SRC/zpbsv.f b/lapack-netlib/SRC/zpbsv.f index fe6baf8b5..ef212bbc3 100644 --- a/lapack-netlib/SRC/zpbsv.f +++ b/lapack-netlib/SRC/zpbsv.f @@ -119,9 +119,9 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, the leading minor of order i of A is not -*> positive definite, so the factorization could not be -*> completed, and the solution has not been computed. +*> > 0: if INFO = i, the leading principal minor of order i +*> of A is not positive, so the factorization could not +*> be completed, and the solution has not been computed. *> \endverbatim * * Authors: diff --git a/lapack-netlib/SRC/zpbsvx.f b/lapack-netlib/SRC/zpbsvx.f index 1efd2fd1e..724102376 100644 --- a/lapack-netlib/SRC/zpbsvx.f +++ b/lapack-netlib/SRC/zpbsvx.f @@ -70,7 +70,7 @@ *> where U is an upper triangular band matrix, and L is a lower *> triangular band matrix. *> -*> 3. If the leading i-by-i principal minor is not positive definite, +*> 3. If the leading principal minor of order i is not positive, *> then the routine returns with INFO = i. Otherwise, the factored *> form of A is used to estimate the condition number of the matrix *> A. If the reciprocal of the condition number is less than machine @@ -280,10 +280,10 @@ *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value *> > 0: if INFO = i, and i is -*> <= N: the leading minor of order i of A is -*> not positive definite, so the factorization -*> could not be completed, and the solution has not -*> been computed. RCOND = 0 is returned. +*> <= N: the leading principal minor of order i of A +*> is not positive, so the factorization could not +*> be completed, and the solution has not been +*> computed. RCOND = 0 is returned. *> = N+1: U is nonsingular, but RCOND is less than machine *> precision, meaning that the matrix is singular *> to working precision. Nevertheless, the diff --git a/lapack-netlib/SRC/zpbtf2.f b/lapack-netlib/SRC/zpbtf2.f index 7b90af47e..39bf6c3fa 100644 --- a/lapack-netlib/SRC/zpbtf2.f +++ b/lapack-netlib/SRC/zpbtf2.f @@ -97,8 +97,8 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -k, the k-th argument had an illegal value -*> > 0: if INFO = k, the leading minor of order k is not -*> positive definite, and the factorization could not be +*> > 0: if INFO = k, the leading principal minor of order k +*> is not positive, and the factorization could not be *> completed. *> \endverbatim * diff --git a/lapack-netlib/SRC/zpbtrf.f b/lapack-netlib/SRC/zpbtrf.f index 61cd1d434..80afb0836 100644 --- a/lapack-netlib/SRC/zpbtrf.f +++ b/lapack-netlib/SRC/zpbtrf.f @@ -92,8 +92,8 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, the leading minor of order i is not -*> positive definite, and the factorization could not be +*> > 0: if INFO = i, the leading principal minor of order i +*> is not positive, and the factorization could not be *> completed. *> \endverbatim * diff --git a/lapack-netlib/SRC/zpftrf.f b/lapack-netlib/SRC/zpftrf.f index 6d18f2cb3..4d4a5116e 100644 --- a/lapack-netlib/SRC/zpftrf.f +++ b/lapack-netlib/SRC/zpftrf.f @@ -91,8 +91,8 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, the leading minor of order i is not -*> positive definite, and the factorization could not be +*> > 0: if INFO = i, the leading principal minor of order i +*> is not positive, and the factorization could not be *> completed. *> *> Further Notes on RFP Format: diff --git a/lapack-netlib/SRC/zposv.f b/lapack-netlib/SRC/zposv.f index 3bb625876..0e91cde2f 100644 --- a/lapack-netlib/SRC/zposv.f +++ b/lapack-netlib/SRC/zposv.f @@ -110,9 +110,9 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, the leading minor of order i of A is not -*> positive definite, so the factorization could not be -*> completed, and the solution has not been computed. +*> > 0: if INFO = i, the leading principal minor of order i +*> of A is not positive, so the factorization could not +*> be completed, and the solution has not been computed. *> \endverbatim * * Authors: diff --git a/lapack-netlib/SRC/zposvx.f b/lapack-netlib/SRC/zposvx.f index f9e9b1d5f..6c06dbd57 100644 --- a/lapack-netlib/SRC/zposvx.f +++ b/lapack-netlib/SRC/zposvx.f @@ -70,7 +70,7 @@ *> where U is an upper triangular matrix and L is a lower triangular *> matrix. *> -*> 3. If the leading i-by-i principal minor is not positive definite, +*> 3. If the leading principal minor of order i is not positive, *> then the routine returns with INFO = i. Otherwise, the factored *> form of A is used to estimate the condition number of the matrix *> A. If the reciprocal of the condition number is less than machine @@ -276,10 +276,10 @@ *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value *> > 0: if INFO = i, and i is -*> <= N: the leading minor of order i of A is -*> not positive definite, so the factorization -*> could not be completed, and the solution has not -*> been computed. RCOND = 0 is returned. +*> <= N: the leading principal minor of order i of A +*> is not positive, so the factorization could not +*> be completed, and the solution has not been +*> computed. RCOND = 0 is returned. *> = N+1: U is nonsingular, but RCOND is less than machine *> precision, meaning that the matrix is singular *> to working precision. Nevertheless, the diff --git a/lapack-netlib/SRC/zposvxx.f b/lapack-netlib/SRC/zposvxx.f index 6735fab71..3886c66f0 100644 --- a/lapack-netlib/SRC/zposvxx.f +++ b/lapack-netlib/SRC/zposvxx.f @@ -87,7 +87,7 @@ *> where U is an upper triangular matrix and L is a lower triangular *> matrix. *> -*> 3. If the leading i-by-i principal minor is not positive definite, +*> 3. If the leading principal minor of order i is not positive, *> then the routine returns with INFO = i. Otherwise, the factored *> form of A is used to estimate the condition number of the matrix *> A (see argument RCOND). If the reciprocal of the condition number diff --git a/lapack-netlib/SRC/zpotf2.f b/lapack-netlib/SRC/zpotf2.f index eb88d617c..b48f3d654 100644 --- a/lapack-netlib/SRC/zpotf2.f +++ b/lapack-netlib/SRC/zpotf2.f @@ -89,8 +89,8 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -k, the k-th argument had an illegal value -*> > 0: if INFO = k, the leading minor of order k is not -*> positive definite, and the factorization could not be +*> > 0: if INFO = k, the leading principal minor of order k +*> is not positive, and the factorization could not be *> completed. *> \endverbatim * diff --git a/lapack-netlib/SRC/zpotrf.f b/lapack-netlib/SRC/zpotrf.f index 3b7018276..3edae84fb 100644 --- a/lapack-netlib/SRC/zpotrf.f +++ b/lapack-netlib/SRC/zpotrf.f @@ -87,8 +87,8 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, the leading minor of order i is not -*> positive definite, and the factorization could not be +*> > 0: if INFO = i, the leading principal minor of order i +*> is not positive, and the factorization could not be *> completed. *> \endverbatim * diff --git a/lapack-netlib/SRC/zpotrf2.f b/lapack-netlib/SRC/zpotrf2.f index 859ddc75f..67430f231 100644 --- a/lapack-netlib/SRC/zpotrf2.f +++ b/lapack-netlib/SRC/zpotrf2.f @@ -86,8 +86,8 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, the leading minor of order i is not -*> positive definite, and the factorization could not be +*> > 0: if INFO = i, the leading principal minor of order i +*> is not positive, and the factorization could not be *> completed. *> \endverbatim * diff --git a/lapack-netlib/SRC/zppsv.f b/lapack-netlib/SRC/zppsv.f index 19536e204..f466266e4 100644 --- a/lapack-netlib/SRC/zppsv.f +++ b/lapack-netlib/SRC/zppsv.f @@ -104,9 +104,9 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, the leading minor of order i of A is not -*> positive definite, so the factorization could not be -*> completed, and the solution has not been computed. +*> > 0: if INFO = i, the leading principal minor of order i +*> of A is not positive, so the factorization could not +*> be completed, and the solution has not been computed. *> \endverbatim * * Authors: diff --git a/lapack-netlib/SRC/zppsvx.f b/lapack-netlib/SRC/zppsvx.f index f94badf78..60d07cbc7 100644 --- a/lapack-netlib/SRC/zppsvx.f +++ b/lapack-netlib/SRC/zppsvx.f @@ -69,7 +69,7 @@ *> where U is an upper triangular matrix, L is a lower triangular *> matrix, and **H indicates conjugate transpose. *> -*> 3. If the leading i-by-i principal minor is not positive definite, +*> 3. If the leading principal minor of order i is not positive, *> then the routine returns with INFO = i. Otherwise, the factored *> form of A is used to estimate the condition number of the matrix *> A. If the reciprocal of the condition number is less than machine @@ -262,10 +262,10 @@ *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value *> > 0: if INFO = i, and i is -*> <= N: the leading minor of order i of A is -*> not positive definite, so the factorization -*> could not be completed, and the solution has not -*> been computed. RCOND = 0 is returned. +*> <= N: the leading principal minor of order i of A +*> is not positive, so the factorization could not +*> be completed, and the solution has not been +*> computed. RCOND = 0 is returned. *> = N+1: U is nonsingular, but RCOND is less than machine *> precision, meaning that the matrix is singular *> to working precision. Nevertheless, the diff --git a/lapack-netlib/SRC/zpptrf.f b/lapack-netlib/SRC/zpptrf.f index a34d63913..a103e5eca 100644 --- a/lapack-netlib/SRC/zpptrf.f +++ b/lapack-netlib/SRC/zpptrf.f @@ -79,8 +79,8 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, the leading minor of order i is not -*> positive definite, and the factorization could not be +*> > 0: if INFO = i, the leading principal minor of order i +*> is not positive, and the factorization could not be *> completed. *> \endverbatim * diff --git a/lapack-netlib/SRC/zpteqr.f b/lapack-netlib/SRC/zpteqr.f index a81a6ad94..897136c76 100644 --- a/lapack-netlib/SRC/zpteqr.f +++ b/lapack-netlib/SRC/zpteqr.f @@ -123,8 +123,8 @@ *> < 0: if INFO = -i, the i-th argument had an illegal value. *> > 0: if INFO = i, and i is: *> <= N the Cholesky factorization of the matrix could -*> not be performed because the i-th principal minor -*> was not positive definite. +*> not be performed because the leading principal +*> minor of order i was not positive. *> > N the SVD algorithm failed to converge; *> if INFO = N+i, i off-diagonal elements of the *> bidiagonal factor did not converge to zero. diff --git a/lapack-netlib/SRC/zptsv.f b/lapack-netlib/SRC/zptsv.f index d53e17a34..191adaff6 100644 --- a/lapack-netlib/SRC/zptsv.f +++ b/lapack-netlib/SRC/zptsv.f @@ -94,8 +94,8 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, the leading minor of order i is not -*> positive definite, and the solution has not been +*> > 0: if INFO = i, the leading principal minor of order i +*> is not positive, and the solution has not been *> computed. The factorization has not been completed *> unless i = N. *> \endverbatim diff --git a/lapack-netlib/SRC/zptsvx.f b/lapack-netlib/SRC/zptsvx.f index 4a40768f1..94409a7a1 100644 --- a/lapack-netlib/SRC/zptsvx.f +++ b/lapack-netlib/SRC/zptsvx.f @@ -60,7 +60,7 @@ *> factorization can also be regarded as having the form *> A = U**H*D*U. *> -*> 2. If the leading i-by-i principal minor is not positive definite, +*> 2. If the leading principal minor of order i is not positive, *> then the routine returns with INFO = i. Otherwise, the factored *> form of A is used to estimate the condition number of the matrix *> A. If the reciprocal of the condition number is less than machine @@ -205,10 +205,10 @@ *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value *> > 0: if INFO = i, and i is -*> <= N: the leading minor of order i of A is -*> not positive definite, so the factorization -*> could not be completed, and the solution has not -*> been computed. RCOND = 0 is returned. +*> <= N: the leading principal minor of order i of A +*> is not positive, so the factorization could not +*> be completed, and the solution has not been +*> computed. RCOND = 0 is returned. *> = N+1: U is nonsingular, but RCOND is less than machine *> precision, meaning that the matrix is singular *> to working precision. Nevertheless, the diff --git a/lapack-netlib/SRC/zpttrf.f b/lapack-netlib/SRC/zpttrf.f index a106ec419..75ef847c4 100644 --- a/lapack-netlib/SRC/zpttrf.f +++ b/lapack-netlib/SRC/zpttrf.f @@ -71,8 +71,8 @@ *> INFO is INTEGER *> = 0: successful exit *> < 0: if INFO = -k, the k-th argument had an illegal value -*> > 0: if INFO = k, the leading minor of order k is not -*> positive definite; if k < N, the factorization could not +*> > 0: if INFO = k, the leading principal minor of order k +*> is not positive; if k < N, the factorization could not *> be completed, while if k = N, the factorization was *> completed, but D(N) <= 0. *> \endverbatim