12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
+
+
+
+
|
# Copyright (c) P.J.Gawthrop, 1997.
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.13 2002/04/28 18:41:26 geraint
## Fixed [ 549658 ] awk should be gawk.
## Replaced calls to awk with call to gawk.
##
## Revision 1.12 2002/04/08 17:04:21 geraint
## Removed spurious "\n" from output.
##
## Revision 1.11 2000/08/01 07:34:33 peterg
## Replaced printf by echo
##
## Revision 1.10 2000/02/25 09:10:12 peterg
|
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
|
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
|
+
-
+
|
#
###############################################################
# The level of the recursion null at top level; _lower at lower levels.
level='' ## Used to be $2 - now set to null.
abgfile=$1_abg.m
crfile=$1_cr.r
CRFILE=$1_cr.r
if [ -f "$crfile" ]; then
if [ "$crfile" -nt "$abgfile" ]; then
echo "Using $crfile"
else
# Inform user
echo "Creating $crfile"
echo "% Constitutive relation file for $1 ($crfile)" > $crfile
echo "% Generated by MTT at `date`" >> $crfile
|