Index: mttroot/mtt/bin/trans/sympar_txt2r ================================================================== --- mttroot/mtt/bin/trans/sympar_txt2r +++ mttroot/mtt/bin/trans/sympar_txt2r @@ -8,23 +8,38 @@ # Label file to symbolic parameters conversion # P.J.Gawthrop August 1996 # Copyright (c) P.J.Gawthrop, 1996. +############################################################### +## Version control history +############################################################### +## $Id$ +## $Log$ +############################################################### + # Inform user echo "Creating $1_sympar.r" rm -f mtt_error #Write some file headers -echo "%% Symbolic parameter file ($1_sympar.r)" > $1_sympar.r -echo "%% Generated by MTT at `date`" >> $1_sympar.r +echo "%% Symbolic parameter file ($1_sympar.r)" > $1_sympar.r +echo "%% Generated by MTT at `date`" >> $1_sympar.r +echo >> $1_sympar.r + +#Count the lines in the file +lines=`grep -c '.' $1_sympar.txt` +echo "MATRIX MTTVAR($lines,1);" >> $1_sympar.r +echo "MTTNVAR = $lines;" >> $1_sympar.r +echo >> $1_sympar.r + +#Write out the variables in reduce format. +awk '{i++; print "MTTVAR(" i ",1) := " $1 ";"}' $1_sympar.txt >> $1_sympar.r -# This is the main transformation using gawk -tr ';' ',' < $1_lbl.txt | \ -gawk -f $MTTPATH/trans/awk/sympar.awk | sort >> $1_sympar.r 2>mtt_error.txt +echo 'END;' >> $1_sympar.r # Now invoke the standard error handling. -mtt_error mtt_error.txt +# mtt_error mtt_error.txt