12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
###############################################################
## Version control history
###############################################################
## $Id$
##
## $Log$
## Revision 1.15 1998/07/08 14:43:12 peterg
## Restored inforfile
##
## Revision 1.14 1998/07/08 08:26:26 peterg
## Added -I option -- if set prints out the information messages
##
## Revision 1.13 1998/05/12 14:49:10 peterg
|
>
>
>
|
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
###############################################################
## Version control history
###############################################################
## $Id$
##
## $Log$
## Revision 1.16 2000/09/02 15:55:51 peterg
## *** empty log message ***
##
## Revision 1.15 1998/07/08 14:43:12 peterg
## Restored inforfile
##
## Revision 1.14 1998/07/08 08:26:26 peterg
## Added -I option -- if set prints out the information messages
##
## Revision 1.13 1998/05/12 14:49:10 peterg
|
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
|
rm -f $1_*_ese.r
else # Partition the system
# Find subsystems
subsystems=`mtt_get_subsystems $1`
# Top level
# The top-level definition file
Nx=`mtt_getsize -external $1 x`
Nz=`mtt_getsize -external $1 z`
Ny=`mtt_getsize -external $1 y`
Nu=`mtt_getsize -external $1 u`
Nui=`mtt_getsize -external $1 ui`
Nuc=`mtt_getsize -internal $1 u`
echo Ny $Ny Nu $Nu Nx $Nx Nui $Nui Nuc $Nuc
|
|
|
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
|
rm -f $1_*_ese.r
else # Partition the system
# Find subsystems
subsystems=`mtt_get_subsystems $1`
# Top level
# The top-level definition file
Nx=`mtt_getsize -external $1 dX`
Nz=`mtt_getsize -external $1 z`
Ny=`mtt_getsize -external $1 y`
Nu=`mtt_getsize -external $1 u`
Nui=`mtt_getsize -external $1 ui`
Nuc=`mtt_getsize -internal $1 u`
echo Ny $Ny Nu $Nu Nx $Nx Nui $Nui Nuc $Nuc
|
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
|
EOF
## Extra bits for the ese file to define connections
for subsystem in $subsystems; do
echo Doing $subsystem
Ny=`mtt_getsize -internal $subsystem"_1" y`
Nu=`mtt_getsize -internal $subsystem"_1" u`
echo Ny $Ny Nu $Nu Nx $Nx
echo MATRIX "MTT_"$subsystem"_uc("$Nu",1);" >> $1_def.r
echo %Subsystem input connections for $subsystem >> $1_ese.r
octave -q <<EOF >> $1_ese.r
for i=1:$Nu
printf("MTT_%s_uc(%i,1) := %s_1_MTTu%i;\n", "$subsystem", i, "$subsystem", i);
endfor;
EOF
done
|
|
>
>
|
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
|
EOF
## Extra bits for the ese file to define connections
for subsystem in $subsystems; do
echo Doing $subsystem
Ny=`mtt_getsize -internal $subsystem"_1" y`
Nu=`mtt_getsize -internal $subsystem"_1" u`
# echo Ny $Ny Nu $Nu Nx $Nx
echo MATRIX "MTT_"$subsystem"_uc("$Nu",1);" >> $1_def.r
echo >> $1_ese.r
echo %Subsystem input connections for $subsystem >> $1_ese.r
octave -q <<EOF >> $1_ese.r
for i=1:$Nu
printf("MTT_%s_uc(%i,1) := %s_1_MTTu%i;\n", "$subsystem", i, "$subsystem", i);
endfor;
EOF
done
|