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.10 1998/07/27 11:10:38 peterg
## Put in octave-mode line for Emacs
##
## Revision 1.9 1998/07/25 20:10:37 peterg
## lower case mttu
##
## Revision 1.8 1998/07/25 09:42:09 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.11 1998/08/10 14:23:58 peterg
## Added -ss option
##
## Revision 1.10 1998/07/27 11:10:38 peterg
## Put in octave-mode line for Emacs
##
## Revision 1.9 1998/07/25 20:10:37 peterg
## lower case mttu
##
## Revision 1.8 1998/07/25 09:42:09 peterg
|
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
# Initial revision
#
###############################################################
#Look for a command line argument
# By default, don't look for BG switches
switches=no
-s )
switches=yes ;;
|
<
<
<
|
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
# Initial revision
#
###############################################################
#Look for a command line argument
# By default, don't look for BG switches
while [ -n "`echo $1 | grep '-'`" ]; do
case $1 in
-ss )
steadystate_computation=yes ;;
*)
echo "$1 is an invalid argument - ignoring" ;;
esac
shift
done
|
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
else
printf("mttu(%s) = 0.0; \t\# %s (%s)\n", $2,$3,$4)
}
}' Nu=$Nu <$1_struc.txt >> $1_input.txt
fi
#Set some switches
if [ "$switches" = "yes" ]; then
awk '{print tolower($1) "= (t>=0);"}'< $1_switch.txt >> $1_input.txt
fi
|
<
>
|
<
|
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
else
printf("mttu(%s) = 0.0; \t\# %s (%s)\n", $2,$3,$4)
}
}' Nu=$Nu <$1_struc.txt >> $1_input.txt
fi
#Set some switches
echo >> $1_input.txt
echo "# Set the switches" >> $1_input.txt
strip_comments<$1_switch.txt |\
awk '{if (length($1)>0) print tolower($1) "= (t>=0);"}'
|