8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
# Copyright (C) 2000 by Peter J. Gawthrop
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.17 2000/12/01 20:55:01 peterg
## Added Geraint's fix for zeroing matrices
##
## Revision 1.16 2000/12/01 17:56:30 peterg
## Removed spurious echo '## Set matrices to zero' - thanks Geraint
##
## Revision 1.15 2000/11/29 21:06:16 peterg
|
>
>
>
>
|
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
# Copyright (C) 2000 by Peter J. Gawthrop
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.18 2000/12/03 16:06:22 peterg
## Fixed bug in generating dummies
## Added logic declarations
##
## Revision 1.17 2000/12/01 20:55:01 peterg
## Added Geraint's fix for zeroing matrices
##
## Revision 1.16 2000/12/01 17:56:30 peterg
## Removed spurious echo '## Set matrices to zero' - thanks Geraint
##
## Revision 1.15 2000/11/29 21:06:16 peterg
|
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
|
$Lc Parameters $Rc
EOF
sympar2par_txt2m ${system} "" "$constant_declaration" "$minusone"
cat <<EOF
$Lc Switches $Rc
EOF
strip_comments <${system}_logic.txt | awk '{printf(" int %s = 0;\n", tolower($1))}'
fi
# States
if [ "$states" = "yes" ]; then
cat <<EOF
|
|
|
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
|
$Lc Parameters $Rc
EOF
sympar2par_txt2m ${system} "" "$constant_declaration" "$minusone"
cat <<EOF
$Lc Switches $Rc
EOF
strip_comments <${system}_switch.txt | awk '{printf(" int %s = 0;\n", tolower($1))}'
fi
# States
if [ "$states" = "yes" ]; then
cat <<EOF
|