12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
# Copyright (c) P.J.Gawthrop, 1997.
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.7 1998/04/14 17:46:28 peterg
## To avoid clashes when creating for more thsan one top level file, adds
## _lower attribute to lower lecel constitutive relationship files.
## .constitutive relationship files only in top level _constitutive
## relationship files.
##
## Revision 1.6 1998/04/14 13:54:15 peterg
|
>
>
>
|
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
# Copyright (c) P.J.Gawthrop, 1997.
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.8 1998/11/20 09:48:31 peterg
## Remove the _lower stuff -- see idf this works now.
##
## Revision 1.7 1998/04/14 17:46:28 peterg
## To avoid clashes when creating for more thsan one top level file, adds
## _lower attribute to lower lecel constitutive relationship files.
## .constitutive relationship files only in top level _constitutive
## relationship files.
##
## Revision 1.6 1998/04/14 13:54:15 peterg
|
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
|
#
# Revision 1.1 1997/04/09 09:08:12 peterg
# Initial revision
#
###############################################################
# The level of the recursion null at top level; _lower at lower levels.
level=$2
crfile=$1_cr.r
CRFILE=$1_cr.r
if [ -f "$crfile" ]; then
echo "Using $crfile"
else
|
>
|
|
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
|
#
# Revision 1.1 1997/04/09 09:08:12 peterg
# Initial revision
#
###############################################################
# The level of the recursion null at top level; _lower at lower levels.
level='' ## Used to be $2 - now set to null.
crfile=$1_cr.r
CRFILE=$1_cr.r
if [ -f "$crfile" ]; then
echo "Using $crfile"
else
|
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
awk '{
if (NF>0) {
print "mtt -q -u crcopy " $1;
}
}' $1_cr.txt | sh
# Include the .cr files
awk '{
if (NF>0) {
print "in \"" $1 ".cr\";"
}
}' $1_cr.txt >> $crfile
fi
echo 'END;' >> $crfile
fi
# Now invoke the standard error handling.
#mtt_error mtt_error.txt
|
|
|
|
<
>
|
>
>
>
>
>
>
>
>
>
>
|
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
|
awk '{
if (NF>0) {
print "mtt -q -u crcopy " $1;
}
}' $1_cr.txt | sh
# Include the .cr files
# awk '{
# if (NF>0) {
# print "in \"" $1 ".cr\";"
# }
# }' $1_cr.txt >> $crfile
## list of the crs
crs=`cat $1_cr.txt`
for cr in $crs; do
crf=$cr'_cr.r'
if [ -e "$crf" ]; then
printf "\045 (%s exists)\n" $crf >> $crfile
else
printf 'in "%s.cr";\n' $cr >> $crfile
fi
done
fi
echo 'END;' >> $crfile
fi
# Now invoke the standard error handling.
#mtt_error mtt_error.txt
|