Differences From Artifact [5285512dcf]:
- Executable file
mttroot/mtt/bin/trans/txt2m
— part of check-in
[33db0d0c43]
at
1998-07-26 09:50:12
on branch origin/master
— More forgiving of txt sytax.
-- can use () or ()
-- can use mttx() or x()
-- can use mttu() or u() (user: gawthrop@users.sourceforge.net, size: 1606) [annotate] [blame] [check-ins using]
To Artifact [a3d5bd2dca]:
- Executable file mttroot/mtt/bin/trans/txt2m — part of check-in [280bacb8c8] at 1998-07-26 11:54:20 on branch origin/master — Added mtt to variables (user: gawthrop@users.sourceforge.net, size: 1882) [annotate] [blame] [check-ins using]
| ︙ | ︙ | |||
11 12 13 14 15 16 17 18 19 20 21 22 23 24 | # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% Version control history # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% $Id$ # %% $Log$ # %% Revision 1.3 1998/07/25 20:40:35 peterg # %% All vars in lower case now # %% # %% Revision 1.2 1998/07/25 09:48:31 peterg # %% Tidied up for Pascal version # %% # %% Revision 1.1 1998/02/25 22:10:25 peterg | > > > > > > > | 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 | # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% Version control history # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% $Id$ # %% $Log$ # %% Revision 1.4 1998/07/26 09:50:12 peterg # %% More forgiving of txt sytax. # %% # %% -- can use () or () # %% -- can use mttx() or x() # %% -- can use mttu() or u() # %% # %% Revision 1.3 1998/07/25 20:40:35 peterg # %% All vars in lower case now # %% # %% Revision 1.2 1998/07/25 09:48:31 peterg # %% Tidied up for Pascal version # %% # %% Revision 1.1 1998/02/25 22:10:25 peterg |
| ︙ | ︙ | |||
33 34 35 36 37 38 39 40 41 42 |
name='mttx';
arg='';
fi
if [ "$representation" = "input" ]; then
name='mttu';
arg='(mttx,mttt)'
fi
# Inform user
echo Creating $1_$2.m
| > > > | | | | < < < < < | | > > > | > > > > | 40 41 42 43 44 45 46 47 48 49 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 |
name='mttx';
arg='';
fi
if [ "$representation" = "input" ]; then
name='mttu';
arg='(mttx,mttt)'
fi
# Inform user
echo Creating $1_$2.m
if [ "$representation" != "simpar" ]; then
#Create the $2 file complete with headers.
echo "function $name = $1_$2$arg" > $1_$2.m
echo "%% $2 file ($1_$2.m)" >> $1_$2.m
echo "%% Generated by MTT at `date`" >> $1_$2.m
echo "% Global variable list" >> $1_$2.m
sympar2global_txt2m $1 >> $1_$2.m
else
echo "% Script file $1_$2.m" > $1_$2.m
fi
#Write out the variables in m format.
awk -F# '{
if (NF<2) print $1
if (NF>1) print $1 "# " $2
}' $1_$2.txt | \
sed 's/\[\([0-9]*\)\]/(\1)/g' |\
sed 's/LAST/mttLAST/g' |\
sed 's/DT/mttDT/g' |\
sed 's/STEPFACTOR/mttSTEPFACTOR/g' |\
sed 's/METHOD/mttMETHOD/g' |\
sed 's/x(/mttx(/g' | sed 's/u(/mttu(/g' |\
sed 's/mttmtt/mtt/g' >> $1_$2.m
|