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