27
28
29
30
31
32
33
34
35
36
37
38
39
40
|
## ###############################################################
## ### Version control history
## ###############################################################
## ### $Id$
## ### $Log$
## ### Revision 1.26 2004/08/29 13:11:21 geraint
## ### Writes MTTyz vector in the same format as MTTx and MTTy: MTTyz($d,1)
## ##
## ### Revision 1.25 2003/01/07 18:09:21 geraint
## ### More informative error message.
## ##
## ### Revision 1.24 1999/10/22 02:20:32 peterg
|
>
>
>
|
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
## ###############################################################
## ### Version control history
## ###############################################################
## ### $Id$
## ### $Log$
## ### Revision 1.27 2005/03/21 10:34:47 gawthrop
## ### Tidied.
## ###
## ### Revision 1.26 2004/08/29 13:11:21 geraint
## ### Writes MTTyz vector in the same format as MTTx and MTTy: MTTyz($d,1)
## ##
## ### Revision 1.25 2003/01/07 18:09:21 geraint
## ### More informative error message.
## ##
## ### Revision 1.24 1999/10/22 02:20:32 peterg
|
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
|
## 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
if (strcmp(cr,"SS")) # Then its the standard file
a = split(args,",")
[N,M]=size(a);
if (N~=2) # Must have 2 arguments
mtt_error(sprintf("SS should have 2 args not %i", N));
endif
effort_attribute = deblank(a(1,:));
flow_attribute = deblank(a(2,:));
else # Old style file
|
|
|
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
|
## 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
if (strcmp(cr,"SS")) # Then its the standard file
a = char(strsplit(args,","))
[N,M]=size(a);
if (N~=2) # Must have 2 arguments
mtt_error(sprintf("SS should have 2 args not %i", N));
endif
effort_attribute = deblank(a(1,:));
flow_attribute = deblank(a(2,:));
else # Old style file
|