Mercurial > hg > octave-max

changeset 3664:d178e2bbd873

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-05-01 19:35:22 by hodelas] Fixed typo in argument dimensions checking. - A S Hodel
author hodelas
date Mon, 01 May 2000 19:35:22 +0000
parents 719cc61d6dc6
children 0689afb1d001
files scripts/control/system/sysmult.m
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/control/system/sysmult.m
+++ b/scripts/control/system/sysmult.m
@@ -56,8 +56,8 @@
   [n,nz,mg,pg,Gyd] = sysdimensions(nth(arglist,1));
   for kk=2:nargin
     [n,nz,mh,ph,Hyd] = sysdimensions(nth(arglist,kk));
-    if(mh != pg)
-      error("arg %d has %d outputs; arg %d has vs %d inputs",kk,ph,kk-1,mg);
+    if(ph != mg)
+      error("arg %d has %d outputs; arg %d has %d inputs",kk,ph,kk-1,mg);
     endif
     [n,nz,mg,pg,Gyd] = sysdimensions(nth(arglist,kk));   # for next iteration
   endfor