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
|
function structure = SS_eqn(name,bond_number,bonds,direction,cr,args, ...
structure,filenum);
% Set up globals to count the component inputs and outputs. This relies on
% the named SS (the ports) being in the correct order. Using globals here
% avoids changing the common argument list for all _eqn files for something
% which is only used for named SS components.
global local_u_index
global local_y_index
% SS_eqn - equations for SS component
%
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %%%%% Model Transformation Tools %%%%%
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% Matlab function SS_eqn
% structure = SS_eqn(name,bond_number,bonds,direction,cr,args, ...
% structure,filenum);
% Copyright (c) P.J. Gawthrop, 1996.
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.14 1997/12/16 18:25:19 peterg
% %% Added unknown_input attribure to flow -- effort still needs doing
% %%
% %% Revision 1.13 1997/09/18 13:15:15 peterg
% %% Fixed incorrect error message flagging inappropriate flow outputs
% %% -- used to give the effort rather than the flow in the error message.
% %%
|
>
>
>
>
|
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
|
function structure = SS_eqn(name,bond_number,bonds,direction,cr,args, ...
structure,filenum);
% Set up globals to count the component inputs and outputs. This relies on
% the named SS (the ports) being in the correct order. Using globals here
% avoids changing the common argument list for all _eqn files for something
% which is only used for named SS components.
global local_u_index
global local_y_index
global at_top_level
% SS_eqn - equations for SS component
%
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %%%%% Model Transformation Tools %%%%%
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% Matlab function SS_eqn
% structure = SS_eqn(name,bond_number,bonds,direction,cr,args, ...
% structure,filenum);
% Copyright (c) P.J. Gawthrop, 1996.
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.15 1997/12/16 19:16:07 peterg
% %% Added unknown input to the effort part.
% %%
% %% Revision 1.14 1997/12/16 18:25:19 peterg
% %% Added unknown_input attribure to flow -- effort still needs doing
% %%
% %% Revision 1.13 1997/09/18 13:15:15 peterg
% %% Fixed incorrect error message flagging inappropriate flow outputs
% %% -- used to give the effort rather than the flow in the error message.
% %%
|
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
inputs = structure(3);
outputs = structure(4);
zero_outputs = structure(5);
unknown_inputs = structure(6);
if strcmp(effort_attribute, 'MTT_port') % Its a named port
% Note: we don't have numbered ports now, so the correct indices are deduced
% by incrementing the two globals: local_u_index and local_y_index
% $$$ % Convert string to number
% $$$ % port_number = abs(flow_attribute)-abs('0');
% $$$ % port_number = str2num(flow_attribute);
|
|
|
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
|
inputs = structure(3);
outputs = structure(4);
zero_outputs = structure(5);
unknown_inputs = structure(6);
if strcmp(effort_attribute, 'MTT_port')&&~at_top_level % It's a named port
% Note: we don't have numbered ports now, so the correct indices are deduced
% by incrementing the two globals: local_u_index and local_y_index
% $$$ % Convert string to number
% $$$ % port_number = abs(flow_attribute)-abs('0');
% $$$ % port_number = str2num(flow_attribute);
|