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