Overview
Comment:Remove the _lower stuff -- see idf this works now.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 6ca7e84e06c5b9fc9214379b3cda24375ea783fc95773f3df0395687533f2303
User & Date: gawthrop@users.sourceforge.net on 1998-11-20 09:48:31
Other Links: branch diff | manifest | tags
Context
1998-11-20
10:07:14
Initial revision check-in: d0a11aa4e1 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:48:31
Remove the _lower stuff -- see idf this works now. check-in: 6ca7e84e06 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:46:34
Modernised lbl syntax check-in: eb55eea029 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/cr_txt2r from [7b281e063b] to [0caeae9d1b].

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
30
31







+
+
+
+
+
+







# 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
## Uses the _sub.sh rep to recursively generate and include sub systems.
##
## Revision 1.5  1998/03/09 13:36:00  peterg
## Cosmetic change
##
## Revision 1.4  1998/03/06 15:54:41  peterg
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
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96


97
98
99
100
101
102
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

81
82
83
84
85

86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101


102
103
104
105
106
107
108
109







-
+
+










-
+





-
+




-
+















-
-
+
+






# Initial revision
#
###############################################################

# The level of the recursion null at top level; _lower at lower levels.
level=$2

crfile=$1_cr$level.r
crfile=$1_cr.r
CRFILE=$1_cr.r

if [ -f "$crfile" ]; 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

echo  >> $crfile
    echo  >> $crfile

    # Recursively create subsystem CR files -- at lower level
    sh $1_sub.sh 'cr_txt2r ' ' _lower' 
    
    # Include subsystem CR files
    sh $1_sub.sh 'echo ' '_cr_lower.r' |\
    sh $1_sub.sh 'echo ' "_cr.r" |\
    awk '{
      print "in \"" $1 "\";"
    }'  >> $crfile

if [ -z "$level" ]; then
  if [ -z "$level" ]; then

    # Copy .cr files
    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

    echo 'END;' >> $crfile
fi
  fi
echo 'END;' >> $crfile

fi
# Now invoke the standard error handling.
#mtt_error mtt_error.txt



MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]