diff options
author | Julien Langou <julien.langou@ucdenver.edu> | 2016-11-26 09:29:22 +0100 |
---|---|---|
committer | Julien Langou <julien.langou@ucdenver.edu> | 2016-11-26 09:29:22 +0100 |
commit | cad7bf5a44d6a69e4708a0f26a9d62c2e882caae (patch) | |
tree | 469a81ce5169da290dc8972a4b0bd080e6a87569 | |
parent | 3f23bd5d53b33149118886201b01042edab3b5dc (diff) |
Correct typos. See email from Berend Hasselman.
-rw-r--r-- | SRC/cgels.f | 4 | ||||
-rw-r--r-- | SRC/dgels.f | 4 | ||||
-rw-r--r-- | SRC/sgels.f | 4 | ||||
-rw-r--r-- | SRC/zgels.f | 4 |
4 files changed, 8 insertions, 8 deletions
diff --git a/SRC/cgels.f b/SRC/cgels.f index 05447cb3..17a8c341 100644 --- a/SRC/cgels.f +++ b/SRC/cgels.f @@ -49,7 +49,7 @@ *> an underdetermined system A * X = B. *> *> 3. If TRANS = 'C' and m >= n: find the minimum norm solution of -*> an undetermined system A**H * X = B. +*> an underdetermined system A**H * X = B. *> *> 4. If TRANS = 'C' and m < n: find the least squares solution of *> an overdetermined system, i.e., solve the least squares problem @@ -380,7 +380,7 @@ * ELSE * -* Overdetermined system of equations A**H * X = B +* Underdetermined system of equations A**T * X = B * * B(1:N,1:NRHS) := inv(R**H) * B(1:N,1:NRHS) * diff --git a/SRC/dgels.f b/SRC/dgels.f index e3206f12..d5c9287e 100644 --- a/SRC/dgels.f +++ b/SRC/dgels.f @@ -49,7 +49,7 @@ *> an underdetermined system A * X = B. *> *> 3. If TRANS = 'T' and m >= n: find the minimum norm solution of -*> an undetermined system A**T * X = B. +*> an underdetermined system A**T * X = B. *> *> 4. If TRANS = 'T' and m < n: find the least squares solution of *> an overdetermined system, i.e., solve the least squares problem @@ -379,7 +379,7 @@ * ELSE * -* Overdetermined system of equations A**T * X = B +* Underdetermined system of equations A**T * X = B * * B(1:N,1:NRHS) := inv(R**T) * B(1:N,1:NRHS) * diff --git a/SRC/sgels.f b/SRC/sgels.f index 08881b55..514d3c91 100644 --- a/SRC/sgels.f +++ b/SRC/sgels.f @@ -49,7 +49,7 @@ *> an underdetermined system A * X = B. *> *> 3. If TRANS = 'T' and m >= n: find the minimum norm solution of -*> an undetermined system A**T * X = B. +*> an underdetermined system A**T * X = B. *> *> 4. If TRANS = 'T' and m < n: find the least squares solution of *> an overdetermined system, i.e., solve the least squares problem @@ -379,7 +379,7 @@ * ELSE * -* Overdetermined system of equations A**T * X = B +* Underdetermined system of equations A**T * X = B * * B(1:N,1:NRHS) := inv(R**T) * B(1:N,1:NRHS) * diff --git a/SRC/zgels.f b/SRC/zgels.f index 6814f222..2e0ebc9f 100644 --- a/SRC/zgels.f +++ b/SRC/zgels.f @@ -49,7 +49,7 @@ *> an underdetermined system A * X = B. *> *> 3. If TRANS = 'C' and m >= n: find the minimum norm solution of -*> an undetermined system A**H * X = B. +*> an underdetermined system A**H * X = B. *> *> 4. If TRANS = 'C' and m < n: find the least squares solution of *> an overdetermined system, i.e., solve the least squares problem @@ -380,7 +380,7 @@ * ELSE * -* Overdetermined system of equations A**H * X = B +* Underdetermined system of equations A**T * X = B * * B(1:N,1:NRHS) := inv(R**H) * B(1:N,1:NRHS) * |