summaryrefslogtreecommitdiff
path: root/src/matrixOperations/multiplication
diff options
context:
space:
mode:
authorjofret2009-01-29 09:35:28 +0000
committerjofret2009-01-29 09:35:28 +0000
commitfe69bed57f418892b670c250bd0436fcd39cf666 (patch)
treed3e26c6a651a24f25e8911b57db511deb0008d78 /src/matrixOperations/multiplication
parent191cedfb25904c4d3a33dd27413f89870f2624ef (diff)
downloadscilab2c-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.c4
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.