Overview
Comment: | N ports numbered 1..N |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | origin/master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
ba0a092889222e1c7b9d54a6526234a2 |
User & Date: | gawthrop@users.sourceforge.net on 1997-11-21 11:32:57 |
Other Links: | branch diff | manifest | tags |
Context
1997-11-21
| ||
16:31:17 | Initial revision check-in: 83af693f41 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
11:32:57 | N ports numbered 1..N check-in: ba0a092889 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
10:59:00 | Initial revision check-in: 41eaa14586 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/lib/comp/simple/comp_ports.m from [572f781925] to [cd96cecaee].
|
| | > > > | | > > > > > > > > > > > | | > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 | function ports = comp_ports(comp_type,N) % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %%%%% Model Transformation Tools %%%%% % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % Matlab function comp_ports % ports = comp_ports(comp_type) % Returns the port list for simple components % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %% 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 % %% % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% junctions = '-zero-one-'; one_ports = '-SS-'; two_ports = '-TF-GY-AE-AF-FMR-RS-'; N_ports = '-R-C-I-'; comp_type = ['-', comp_type, '-']; if length(findstr(comp_type,junctions))==1 ports = ['undefined]']; elseif length(findstr(comp_type,one_ports))==1 ports = ['in']; elseif length(findstr(comp_type,two_ports))==1 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,N_ports))==1 if N==1 ports = ['in']; elseif N==2 ports = ['in';'out']; elseif N>2 ports = '1'; for i=2:N ports = [ports; sprintf("%i",i)]; end; end; end; |