10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
+
+
+
|
# Copyright (c) P.J.Gawthrop, 1991, 1994, 1996
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.3 2000/09/02 15:55:11 peterg
## Now doesn't include def files in da files
##
## Revision 1.2 2000/09/01 13:36:15 peterg
## Added -partition option
##
## Revision 1.1 2000/09/01 12:14:44 peterg
## Initial revision
##
## Revision 1.3 1998/03/07 12:57:19 peterg
|
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
|
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
|
-
+
|
EOF
if [ -n "$partition" ]; then
rm -f mtt_junk
# Now for the subsystems
# Find subsystems
subsystems=`sh rc2_type.sh 'echo ' ' ' | awk '{if (NR>1) print $2}'`
subsystems=`mtt_get_subsystems $1`
for subsystem in $subsystems; do
echo Doing $subsystem
ucname="MTT_"$subsystem"_uc"
Nu=`mtt_getsize -internal $subsystem"_1" u`
echo Nu $Nu
|
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
|
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
|
+
+
|
MTT_Matrix_m := 1$
Reduce_Matrix()$
shut "mtt_junk";
EOF
echo >> $1_dae.r
echo %Connections for subsystem $subsystem >> $1_dae.r
echo >> $1_dae.r
cat mtt_junk >> $1_dae.r
rm -rf mtt_junk
done
fi
echo "END;" >> $1_dae.r
# Now invoke the standard error handling.
mtt_error_r $logname
|