Mercurial > hg > octave-lyh

diff scripts/control/system/sysmult.m @ 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 b5238ac1dca9
children e0b7a493e5a8
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