diff options
author | luszczek <luszczek@8a072113-8704-0410-8d35-dd094bca7971> | 2015-12-10 00:19:18 +0000 |
---|---|---|
committer | luszczek <luszczek@8a072113-8704-0410-8d35-dd094bca7971> | 2015-12-10 00:19:18 +0000 |
commit | 63f6a1729d61504687b48481c1f5e065af897fa4 (patch) | |
tree | f3f5292e30e461250bdff9791100577eac97e7af | |
parent | f95d1a44b3fafd953b84e4957a29854ca7fb0509 (diff) | |
download | lapack-63f6a1729d61504687b48481c1f5e065af897fa4.tar.gz lapack-63f6a1729d61504687b48481c1f5e065af897fa4.tar.bz2 lapack-63f6a1729d61504687b48481c1f5e065af897fa4.zip |
Fix comment to match the code.
-rw-r--r-- | SRC/cgetrf2.f | 2 | ||||
-rw-r--r-- | SRC/dgetrf2.f | 2 | ||||
-rw-r--r-- | SRC/sgetrf2.f | 2 | ||||
-rw-r--r-- | SRC/zgetrf2.f | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/SRC/cgetrf2.f b/SRC/cgetrf2.f index 9e985d0e..574445df 100644 --- a/SRC/cgetrf2.f +++ b/SRC/cgetrf2.f @@ -37,7 +37,7 @@ *> the matrix into four submatrices: *> *> [ A11 | A12 ] where A11 is n1 by n1 and A22 is n2 by n2 -*> A = [ -----|----- ] with n1 = min(m,n) +*> A = [ -----|----- ] with n1 = min(m,n)/2 *> [ A21 | A22 ] n2 = n-n1 *> *> [ A11 ] diff --git a/SRC/dgetrf2.f b/SRC/dgetrf2.f index b1871b5d..2f3f96af 100644 --- a/SRC/dgetrf2.f +++ b/SRC/dgetrf2.f @@ -37,7 +37,7 @@ *> the matrix into four submatrices: *> *> [ A11 | A12 ] where A11 is n1 by n1 and A22 is n2 by n2 -*> A = [ -----|----- ] with n1 = min(m,n) +*> A = [ -----|----- ] with n1 = min(m,n)/2 *> [ A21 | A22 ] n2 = n-n1 *> *> [ A11 ] diff --git a/SRC/sgetrf2.f b/SRC/sgetrf2.f index 068710b7..cb145a1f 100644 --- a/SRC/sgetrf2.f +++ b/SRC/sgetrf2.f @@ -37,7 +37,7 @@ *> the matrix into four submatrices: *> *> [ A11 | A12 ] where A11 is n1 by n1 and A22 is n2 by n2 -*> A = [ -----|----- ] with n1 = min(m,n) +*> A = [ -----|----- ] with n1 = min(m,n)/2 * [ A21 | A22 ] n2 = n-n1 *> *> [ A11 ] diff --git a/SRC/zgetrf2.f b/SRC/zgetrf2.f index 7d28b581..01d281b2 100644 --- a/SRC/zgetrf2.f +++ b/SRC/zgetrf2.f @@ -37,7 +37,7 @@ *> the matrix into four submatrices: *> *> [ A11 | A12 ] where A11 is n1 by n1 and A22 is n2 by n2 -*> A = [ -----|----- ] with n1 = min(m,n) +*> A = [ -----|----- ] with n1 = min(m,n)/2 *> [ A21 | A22 ] n2 = n-n1 *> *> [ A11 ] |