diff options
author | cnlohr <lohr85@gmail.com> | 2018-03-17 01:34:36 -0400 |
---|---|---|
committer | cnlohr <lohr85@gmail.com> | 2018-03-17 01:34:36 -0400 |
commit | dbe5808f70e1e088e311697e102ff60a6b07a7c6 (patch) | |
tree | 7fd77e6273e60f2933194b2d9cbae42b191f328e /redist | |
parent | 0529854c1f0fc3756cb93db839b83055b681ebc2 (diff) | |
download | libsurvive-dbe5808f70e1e088e311697e102ff60a6b07a7c6.tar.gz libsurvive-dbe5808f70e1e088e311697e102ff60a6b07a7c6.tar.bz2 |
Fix comments in dclapack code to reflect current behavior
Diffstat (limited to 'redist')
-rw-r--r-- | redist/dclapack.h | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/redist/dclapack.h b/redist/dclapack.h index 5aba214..bebda2d 100644 --- a/redist/dclapack.h +++ b/redist/dclapack.h @@ -181,10 +181,10 @@ PRINT(Ainv,n,n); \ */ /* - * Matrix Multiply C = A * B + * Matrix Multiply R = A * B + * R (n by p) * A (n by m) * B (m by p) - * C (n by p) */ #define MUL(R,A,B,n,m,p) { \ int i,j,k; \ @@ -199,11 +199,11 @@ PRINT(Ainv,n,n); \ } /* - * Matrix Multiply D = A * B + C + * Matrix Multiply R = A * B + C + * R (n by p) * A (n by m) * B (m by p) * C (n by p) - * D (n by p) */ #define MULADD(R,A,B,C,n,m,p) { \ int i,j,k; \ @@ -218,11 +218,11 @@ PRINT(Ainv,n,n); \ } /* - * Matrix Multiply D = alpha * A * B + beta * C + * Matrix Multiply R = alpha * A * B + beta * C + * R (n by p) * A (n by m) * B (m by p) * C (n by p) - * D (n by p) */ #define GMULADD(R,A,B,C,alpha,beta,n,m,p) { \ int i,j,k; \ |