Mercurial > hg > octave-avbm
view scripts/control/system/__sysconcat__.m @ 6046:34f96dd5441b
[project @ 2006-10-10 16:10:25 by jwe]
author | jwe |
---|---|
date | Tue, 10 Oct 2006 16:10:31 +0000 |
parents | ec8c33dcd1bf |
children | 6bbf56a9718a |
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(ischar(a)) a = {a}; endif if(ischar(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