Skip to content

Commit b733521

Browse files
author
GYT
committed
Add notes to *GGLSE about how only exact rank-deficiency is checked
1 parent 3ed4768 commit b733521

File tree

4 files changed

+48
-8
lines changed

4 files changed

+48
-8
lines changed

SRC/cgglse.f

Lines changed: 12 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -52,6 +52,16 @@
5252
*> matrices (B, A) given by
5353
*>
5454
*> B = (0 R)*Q, A = Z*T*Q.
55+
*>
56+
*> Callers of this subroutine should note that the singularity/rank-deficiency checks
57+
*> implemented in this subroutine are rudimentary. The CTRTRS subroutine called by this
58+
*> subroutine only signals a failure due to singularity if the problem is exactly singular.
59+
*>
60+
*> It is conceivable for one (or more) of the factors involved in the generalized RQ
61+
*> factorization of the pair (B, A) to be subnormally close to singularity without this
62+
*> subroutine signalling an error. The solutions computed for such almost-rank-deficient
63+
*> problems may be less accurate due to a loss of numerical precision.
64+
*>
5565
*> \endverbatim
5666
*
5767
* Arguments:
@@ -153,12 +163,12 @@
153163
*> = 0: successful exit.
154164
*> < 0: if INFO = -i, the i-th argument had an illegal value.
155165
*> = 1: the upper triangular factor R associated with B in the
156-
*> generalized RQ factorization of the pair (B, A) is
166+
*> generalized RQ factorization of the pair (B, A) is exactly
157167
*> singular, so that rank(B) < P; the least squares
158168
*> solution could not be computed.
159169
*> = 2: the (N-P) by (N-P) part of the upper trapezoidal factor
160170
*> T associated with A in the generalized RQ factorization
161-
*> of the pair (B, A) is singular, so that
171+
*> of the pair (B, A) is exactly singular, so that
162172
*> rank( (A) ) < N; the least squares solution could not
163173
*> ( (B) )
164174
*> be computed.

SRC/dgglse.f

Lines changed: 12 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -52,6 +52,16 @@
5252
*> matrices (B, A) given by
5353
*>
5454
*> B = (0 R)*Q, A = Z*T*Q.
55+
*>
56+
*> Callers of this subroutine should note that the singularity/rank-deficiency checks
57+
*> implemented in this subroutine are rudimentary. The DTRTRS subroutine called by this
58+
*> subroutine only signals a failure due to singularity if the problem is exactly singular.
59+
*>
60+
*> It is conceivable for one (or more) of the factors involved in the generalized RQ
61+
*> factorization of the pair (B, A) to be subnormally close to singularity without this
62+
*> subroutine signalling an error. The solutions computed for such almost-rank-deficient
63+
*> problems may be less accurate due to a loss of numerical precision.
64+
*>
5565
*> \endverbatim
5666
*
5767
* Arguments:
@@ -153,12 +163,12 @@
153163
*> = 0: successful exit.
154164
*> < 0: if INFO = -i, the i-th argument had an illegal value.
155165
*> = 1: the upper triangular factor R associated with B in the
156-
*> generalized RQ factorization of the pair (B, A) is
166+
*> generalized RQ factorization of the pair (B, A) is exactly
157167
*> singular, so that rank(B) < P; the least squares
158168
*> solution could not be computed.
159169
*> = 2: the (N-P) by (N-P) part of the upper trapezoidal factor
160170
*> T associated with A in the generalized RQ factorization
161-
*> of the pair (B, A) is singular, so that
171+
*> of the pair (B, A) is exactly singular, so that
162172
*> rank( (A) ) < N; the least squares solution could not
163173
*> ( (B) )
164174
*> be computed.

SRC/sgglse.f

Lines changed: 12 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -52,6 +52,16 @@
5252
*> matrices (B, A) given by
5353
*>
5454
*> B = (0 R)*Q, A = Z*T*Q.
55+
*>
56+
*> Callers of this subroutine should note that the singularity/rank-deficiency checks
57+
*> implemented in this subroutine are rudimentary. The STRTRS subroutine called by this
58+
*> subroutine only signals a failure due to singularity if the problem is exactly singular.
59+
*>
60+
*> It is conceivable for one (or more) of the factors involved in the generalized RQ
61+
*> factorization of the pair (B, A) to be subnormally close to singularity without this
62+
*> subroutine signalling an error. The solutions computed for such almost-rank-deficient
63+
*> problems may be less accurate due to a loss of numerical precision.
64+
*>
5565
*> \endverbatim
5666
*
5767
* Arguments:
@@ -153,12 +163,12 @@
153163
*> = 0: successful exit.
154164
*> < 0: if INFO = -i, the i-th argument had an illegal value.
155165
*> = 1: the upper triangular factor R associated with B in the
156-
*> generalized RQ factorization of the pair (B, A) is
166+
*> generalized RQ factorization of the pair (B, A) is exactly
157167
*> singular, so that rank(B) < P; the least squares
158168
*> solution could not be computed.
159169
*> = 2: the (N-P) by (N-P) part of the upper trapezoidal factor
160170
*> T associated with A in the generalized RQ factorization
161-
*> of the pair (B, A) is singular, so that
171+
*> of the pair (B, A) is exactly singular, so that
162172
*> rank( (A) ) < N; the least squares solution could not
163173
*> ( (B) )
164174
*> be computed.

SRC/zgglse.f

Lines changed: 12 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -52,6 +52,16 @@
5252
*> matrices (B, A) given by
5353
*>
5454
*> B = (0 R)*Q, A = Z*T*Q.
55+
*>
56+
*> Callers of this subroutine should note that the singularity/rank-deficiency checks
57+
*> implemented in this subroutine are rudimentary. The ZTRTRS subroutine called by this
58+
*> subroutine only signals a failure due to singularity if the problem is exactly singular.
59+
*>
60+
*> It is conceivable for one (or more) of the factors involved in the generalized RQ
61+
*> factorization of the pair (B, A) to be subnormally close to singularity without this
62+
*> subroutine signalling an error. The solutions computed for such almost-rank-deficient
63+
*> problems may be less accurate due to a loss of numerical precision.
64+
*>
5565
*> \endverbatim
5666
*
5767
* Arguments:
@@ -153,12 +163,12 @@
153163
*> = 0: successful exit.
154164
*> < 0: if INFO = -i, the i-th argument had an illegal value.
155165
*> = 1: the upper triangular factor R associated with B in the
156-
*> generalized RQ factorization of the pair (B, A) is
166+
*> generalized RQ factorization of the pair (B, A) is exactly
157167
*> singular, so that rank(B) < P; the least squares
158168
*> solution could not be computed.
159169
*> = 2: the (N-P) by (N-P) part of the upper trapezoidal factor
160170
*> T associated with A in the generalized RQ factorization
161-
*> of the pair (B, A) is singular, so that
171+
*> of the pair (B, A) is exactly singular, so that
162172
*> rank( (A) ) < N; the least squares solution could not
163173
*> ( (B) )
164174
*> be computed.

0 commit comments

Comments
 (0)