| ︙ | | | ︙ | |
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
# Copyright (C) 2000 by Peter J. Gawthrop
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.8 2000/10/13 09:28:16 peterg
## Changed regexp to /\(.*$old.*=\)/
##
## Revision 1.7 2000/10/13 08:56:51 peterg
## Output variables as column, not row.
##
## Revision 1.6 2000/10/13 08:07:24 peterg
|
>
>
>
|
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.9 2000/10/13 09:55:09 peterg
## Changed state/input name to $4_$3
##
## Revision 1.8 2000/10/13 09:28:16 peterg
## Changed regexp to /\(.*$old.*=\)/
##
## Revision 1.7 2000/10/13 08:56:51 peterg
## Output variables as column, not row.
##
## Revision 1.6 2000/10/13 08:07:24 peterg
|
| ︙ | | | ︙ | |
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
|
;;
state|input)
ext=txt
textfile=$1_$2.$ext
infofile=mtt_list.$ext
moreinfofile=mtt_list_numpar.$ext
grep "$rep" <$1_struc.txt |\
awk '{printf("%s_%s\n", $4,$3)}' \
> $infofile
cat $infofile $1_sympar.$ext> $moreinfofile
default='0.0'
;;
*)
echo Representation $rep not implemented
exit
|
|
|
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
|
;;
state|input)
ext=txt
textfile=$1_$2.$ext
infofile=mtt_list.$ext
moreinfofile=mtt_list_numpar.$ext
grep "$rep" <$1_struc.txt |\
awk '{printf("%s\n", $4)}' \
> $infofile
cat $infofile $1_sympar.$ext> $moreinfofile
default='0.0'
;;
*)
echo Representation $rep not implemented
exit
|
| ︙ | | | ︙ | |
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
|
while [ -z "$answered" ]; do
echo "Update $textfile (y/n)?"
read answer < /dev/tty
case $answer in
y)
answered=yes
for old in $in_text; do
echo $old
sed "s/\(.*$old.*=\)/## Removed by MTT on `date`: \1/"\
<$textfile > mtt_tmp
mv mtt_tmp $textfile
changed=yes
done
;;
n)
|
|
|
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
|
while [ -z "$answered" ]; do
echo "Update $textfile (y/n)?"
read answer < /dev/tty
case $answer in
y)
answered=yes
for old in $in_text; do
echo Commenting out $old
sed "s/\(.*$old.*=\)/## Removed by MTT on `date`: \1/"\
<$textfile > mtt_tmp
mv mtt_tmp $textfile
changed=yes
done
;;
n)
|
| ︙ | | | ︙ | |
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
|
while [ -z "$answered" ]; do
echo "Update $textfile (y/n)?"
read answer < /dev/tty
case $answer in
y)
answered=yes
for new in $in_info; do
echo "$new = $default; # Added by MTT on `date`" >> $textfile
changed=yes
done
;;
n)
answered=yes
;;
*)
esac
done
fi
|
>
|
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
|
while [ -z "$answered" ]; do
echo "Update $textfile (y/n)?"
read answer < /dev/tty
case $answer in
y)
answered=yes
for new in $in_info; do
echo Adding $new
echo "$new = $default; # Added by MTT on `date`" >> $textfile
changed=yes
done
;;
n)
answered=yes
;;
*)
esac
done
fi
|