Overview
Comment:Replaces:
euler by 1
implicitl by 1
implicit by 3
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 340f22cfacf28689b6cf5aecc1b71cbf8530b464f45640e0bcdfe99f766ce710
User & Date: gawthrop@users.sourceforge.net on 1998-07-30 09:32:33
Other Links: branch diff | manifest | tags
Context
1998-07-30
10:44:37
INcluded othe integration methods. check-in: 6ce2193e91 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:32:33
Replaces:
euler by 1
implicitl by 1
implicit by 3 check-in: 340f22cfac user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1998-07-29
14:18:34
Reorganised rep dependednt output check-in: c93d6bd13c user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/txt2m from [9bedd963a9] to [9e1e3147dd].

︙
11
12
13
14
15
16
17



18
19
20
21
22
23
24

11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27








+
+
+










# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% Version control history
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% $Id$
# %% $Log$
# %% Revision 1.6  1998/07/27 18:59:11  peterg
# %% Added WMIN etc
# %%
# %% Revision 1.5  1998/07/26 11:54:20  peterg
# %% Added  mtt to variables
# %%
# %% Revision 1.4  1998/07/26 09:50:12  peterg
# %% More forgiving of txt sytax.
# %%
# %% -- can use () or ()
︙
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


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








+
+
+
+
+
+
+
+
+
+
+
+
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+

+



+

    echo 'global ...' >>  $1_$2.m
    echo 'mtt_dummy_global;' >>  $1_$2.m
fi


#Write out the variables in m format.
awk -F#  '{
  N=split($1,a,"=");
  if (N==2) {
    LHS = a[1];
    RHS = tolower(a[2]);
    sub(/"*euler"*/, 1, RHS);   
    sub(/"*implicitl"*/, 2, RHS);   
    sub(/"*implicit"*/, 3, RHS);  
    statement = sprintf("%s=%s",LHS,RHS);
  }
  else
    statement = $1;

  if (NF<2) print $1
  if (NF>1)  print $1 "# " $2
}' $1_$2.txt  | \
sed 's/\[\([0-9]*\)\]/(\1)/g' |\
sed 's/\([^a-zA-Z]\)t\([^a-zA-Z]\)/\1mttt\2/g' |\
sed 's/LAST/mttLAST/g' |\
sed 's/DT/mttDT/g' |\
sed 's/STEPFACTOR/mttSTEPFACTOR/g' |\
sed 's/METHOD/mttMETHOD/g' |\
sed 's/WMIN/mttWMIN/g' |\
sed 's/WMAX/mttWMAX/g' |\
sed 's/WSTEPS/mttWSTEPS/g' |\
sed 's/x(/mttx(/g' | sed 's/u(/mttu(/g'  |\
sed 's/mttmtt/mtt/g' >> $1_$2.m
  if (NF<2) print statement
  if (NF>1)  print statement " # " $2
}' $1_$2.txt  | sed\
     -e 's/\[\([0-9]*\)\]/(\1)/g' \
     -e 's/\([^a-zA-Z]\)t\([^a-zA-Z]\)/\1mttt\2/g' \
     -e 's/LAST/mttLAST/g' \
     -e 's/DT/mttDT/g' \
     -e 's/STEPFACTOR/mttSTEPFACTOR/g' \
     -e 's/METHOD/mttMETHOD/g' \
     -e 's/WMIN/mttWMIN/g' \
     -e 's/WMAX/mttWMAX/g' \
     -e 's/WSTEPS/mttWSTEPS/g' \
     -e 's/x(/mttx(/g' \
     -e 's/u(/mttu(/g' \
     -e 's/mttmtt/mtt/g' \

#>> $1_$2m

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