Mercurial > hg > octave-lyh
view scripts/control/system/__sysconcat__.m @ 4779:f105000ab25c
[project @ 2004-02-17 02:34:33 by jwe]
author | jwe |
---|---|
date | Tue, 17 Feb 2004 02:34:33 +0000 |
parents | |
children | ec8c33dcd1bf |
line wrap: on
line source
function c = __sysconcat__(a,b) # c = __sysconcat__(a,b) # cell array replacement for append, used by control systems toolbox if(isstr(a)) a = {a}; endif if(isstr(b)) b = {b}; endif if ( ! ( is_signal_list(a) && is_signal_list(b) ) ) error("need cell arrays of strings"); endif c = a; la = length(a); for ii=1:length(b) c{la+ii} = b{ii}; endfor endfunction