15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.5 1996/12/04 21:27:53 peterg
% %% Replaced str2num by sprintf
% %%
% %% Revision 1.4 1996/08/18 20:06:21 peter
% %% Included zero outputs.
% %%
% %% Revision 1.3 1996/08/09 14:08:04 peter
|
>
>
>
|
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.6 1996/12/05 09:49:09 peterg
% %% Explicit computation of port number from string.
% %%
% %% Revision 1.5 1996/12/04 21:27:53 peterg
% %% Replaced str2num by sprintf
% %%
% %% Revision 1.4 1996/08/18 20:06:21 peter
% %% Included zero outputs.
% %%
% %% Revision 1.3 1996/08/09 14:08:04 peter
|
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
% internal indicates an internal variable
% anything else is the name of a constant.
% Blank is taken to be external
% If its a numbered port:
% cr contains 'MTT_port'
% arg contains port number
effort_attribute = cr
flow_attribute = args
if length(effort_attribute)==0
effort_attribute = 'external';
end;
if length(flow_attribute)==0
flow_attribute = 'external';
|
|
|
|
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
|
% internal indicates an internal variable
% anything else is the name of a constant.
% Blank is taken to be external
% If its a numbered port:
% cr contains 'MTT_port'
% arg contains port number
effort_attribute = cr;
flow_attribute = args;
if length(effort_attribute)==0
effort_attribute = 'external';
end;
if length(flow_attribute)==0
flow_attribute = 'external';
|