Mercurial > hg > octave-lyh
view scripts/control/system/__sysconcat__.m @ 4844:9f7ef92b50b0
[project @ 2004-04-02 17:26:53 by jwe]
author | jwe |
---|---|
date | Fri, 02 Apr 2004 17:26:54 +0000 |
parents | f105000ab25c |
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