view scripts/control/system/__sysconcat__.m @ 5443:ec8c33dcd1bf

[project @ 2005-09-08 01:40:57 by jwe]
author jwe
date Thu, 08 Sep 2005 01:40:58 +0000
parents f105000ab25c
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