Mercurial > hg > octave-lyh

diff liboctave/dRowVector.cc @ 1678:1ef83ee34815

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-12-29 00:41:30 by jwe]
author jwe
date Fri, 29 Dec 1995 00:42:16 +0000
parents ef7f804cb722
children 0c6d3b73bf69
line wrap: on
line diff
--- a/liboctave/dRowVector.cc
+++ b/liboctave/dRowVector.cc
@@ -232,7 +232,7 @@
 
   double *y = new double [a_nc];
 
-  F77_FCN (dgemv, DGEMV) ("T", a_nc, a_nr, 1.0, a.data (), ld,
+  F77_FCN (dgemv, DGEMV) ("T", a_nr, a_nc, 1.0, a.data (), ld,
 			  v.data (), 1, 0.0, y, 1, 1L);
 
   return RowVector (y, a_nc);