Artifact 07ce2338e2164dc0e02efe39d12e0ce7fa14bedffb103a8c1aa5e7f66e5e1483:

• File mttroot/mtt/bin/trans/m/mtt_is_external.m — part of check-in [0e41d1033c] at 2003-03-13 15:32:37 on branch origin/master — Octave m files for generating sorted equations _sese.r (user: gawthrop@users.sourceforge.net, size: 349) [annotate] [blame] [check-ins using] [more...]

function is_external = mtt_is_external (comp_type,outsig, insigs, is_port)

  ## usage:  is_external = mtt_is_external (comp_type,outsig, insigs)
  ##
  ## 

  if nargin<4
    is_port = 0;
  endif

  is_external = 0;			# Default

  if strcmp(comp_type,"SS");
    is_external = insigs(1,2)!=outsig(2);
  else
    is_external = 0;
  endif

endfunction