diff options
author | jofret | 2009-01-29 09:35:28 +0000 |
---|---|---|
committer | jofret | 2009-01-29 09:35:28 +0000 |
commit | fe69bed57f418892b670c250bd0436fcd39cf666 (patch) | |
tree | d3e26c6a651a24f25e8911b57db511deb0008d78 /src/matrixOperations/multiplication | |
parent | 191cedfb25904c4d3a33dd27413f89870f2624ef (diff) | |
download | scilab2c-fe69bed57f418892b670c250bd0436fcd39cf666.tar.gz scilab2c-fe69bed57f418892b670c250bd0436fcd39cf666.tar.bz2 scilab2c-fe69bed57f418892b670c250bd0436fcd39cf666.zip |
Correct dgemm_ wrong args sequence
Diffstat (limited to 'src/matrixOperations/multiplication')
-rw-r--r-- | src/matrixOperations/multiplication/dmulma.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/matrixOperations/multiplication/dmulma.c b/src/matrixOperations/multiplication/dmulma.c index 8c20960a..41e61535 100644 --- a/src/matrixOperations/multiplication/dmulma.c +++ b/src/matrixOperations/multiplication/dmulma.c @@ -37,8 +37,8 @@ void dmulma(double *in1, int lines1, int columns1, double Zero = 0; /* Cr <- 1*Ar*Br + 0*Cr */ - dgemm_("N","N", &columns2, &columns2, &columns1, &One, - in1 , &lines1, in2, &lines2, &Zero, out, &columns2); + dgemm_("N","N", &lines1, &columns2, &columns1, &One, + in1 , &lines1, in2, &lines2, &Zero, out, &lines1); #else /* ** DO NOT USE ANY BLAS FUNCTION. |