Index: mttroot/mtt/lib/comp/simple/comp_ports.m ================================================================== --- mttroot/mtt/lib/comp/simple/comp_ports.m +++ mttroot/mtt/lib/comp/simple/comp_ports.m @@ -12,10 +12,13 @@ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ +% %% Revision 1.3 1997/11/21 11:32:57 peterg +% %% N ports numbered 1..N +% %% % %% Revision 1.2 1997/08/28 08:08:24 peterg % %% Added RS component to the two-port list % %% % %% Revision 1.1 1997/08/02 19:35:47 peterg % %% Initial revision @@ -23,11 +26,11 @@ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% junctions = '-zero-one-'; one_ports = '-SS-'; -two_ports = '-TF-GY-AE-AF-FMR-RS-'; +two_ports = '-TF-GY-AE-AF-FMR-RS-EBTF-'; N_ports = '-R-C-I-'; comp_type = ['-', comp_type, '-']; if length(findstr(comp_type,junctions))==1 ports = ['undefined]']; @@ -37,10 +40,12 @@ ports = ['in';'out']; elseif length(findstr(comp_type,'[-EMTF-]'))==1 ports = ['in';'out';'mod']; elseif length(findstr(comp_type,'[-ES-]'))==1 ports = ['e';'s']; +elseif length(findstr(comp_type,'[-PS-]'))==1 + ports = ['in';'out';'power']; elseif length(findstr(comp_type,N_ports))==1 if N==1 ports = ['in']; elseif N==2 ports = ['in';'out'];