10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
# Copyright (c) P.J.Gawthrop 1997
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.4 1998/02/04 11:45:05 peterg
## Less verbose comments.
##
## Revision 1.3 1998/01/29 17:06:21 peterg
## Better annotation of each input
##
## Revision 1.2 1997/05/15 09:44:12 peterg
|
>
>
>
|
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
# Copyright (c) P.J.Gawthrop 1997
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.5 1998/02/04 12:26:47 peterg
## Simplified output format
##
## Revision 1.4 1998/02/04 11:45:05 peterg
## Less verbose comments.
##
## Revision 1.3 1998/01/29 17:06:21 peterg
## Better annotation of each input
##
## Revision 1.2 1997/05/15 09:44:12 peterg
|
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
|
echo Creating $1_input.txt
#Create the input file complete with headers.
echo "# Numerical parameter file ($1_input.txt)" > $1_input.txt
echo "# Generated by MTT at `date`" >> $1_input.txt
cat $MTTPATH/trans/rcs_header.txt >> $1_input.txt
#Write out the defaults -- inputs
echo "# Set the inputs" >> $1_input.txt
awk '{
i++;
if($1=="input") print "u(" i ") =\t1.0; \# " $4 " (" $3 ")"
}' $1_struc.txt >> $1_input.txt
#Set some switches
if [ "$switches" = "yes" ]; then
echo >> $1_input.txt
echo "# Set the switches" >> $1_input.txt
awk '{print tolower($1) "= (t>=0);"}'< $1_switch.txt >> $1_input.txt
fi
|
|
>
>
>
>
>
>
>
|
|
>
|
|
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
echo Creating $1_input.txt
#Create the input file complete with headers.
echo "# Numerical parameter file ($1_input.txt)" > $1_input.txt
echo "# Generated by MTT at `date`" >> $1_input.txt
cat $MTTPATH/trans/rcs_header.txt >> $1_input.txt
#Write out the defaults -- inputs to steady-state values
echo "# Set the inputs" >> $1_input.txt
cat $1_ss.r $1_struc.txt | sed 's/\$//' |\
awk '{
if(match($1,"MTTu")) {
j++
u[j]=$3;
}
if($1=="input") {
i++;
print "u(" i ") =\t", u[i], "; \# " $4 " (" $3 ")"
}
}' >> $1_input.txt
#Set some switches
if [ "$switches" = "yes" ]; then
echo >> $1_input.txt
echo "# Set the switches" >> $1_input.txt
awk '{print tolower($1) "= (t>=0);"}'< $1_switch.txt >> $1_input.txt
fi
|