Mercurial > hg > octave-nkf
diff scripts/control/sysgroup.m @ 3398:0f515bc98460
[project @ 1999-12-18 04:21:28 by jwe]
author | jwe |
---|---|
date | Sat, 18 Dec 1999 04:21:52 +0000 |
parents | 1a8e2c0d627a |
children | 8625164a0a39 |
line wrap: on
line diff
--- a/scripts/control/sysgroup.m +++ b/scripts/control/sysgroup.m @@ -46,15 +46,15 @@ ## ## @end deftypefn -function sys = sysgroup (...) +## Author: A. S. Hodel <a.s.hodel@eng.auburn.edu> +## Created: August 1995 +## modified by John Ingram July 1996 +## A. S. Hodel: modified for variable number of arguments 1999 - ## A. S. Hodel August 1995 - ## modified by John Ingram July 1996 - ## A. S. Hodel: modified for variable number of arguments 1999 +function sys = sysgroup (...) save_emp = empty_list_elements_ok; empty_list_elements_ok = 1; - if(nargin < 1) usage("sys = sysgroup(Asys{,Bsys,...})");