ADDED mttroot/mtt/bin/trans/numpar_txt2c Index: mttroot/mtt/bin/trans/numpar_txt2c ================================================================== --- /dev/null +++ mttroot/mtt/bin/trans/numpar_txt2c @@ -0,0 +1,50 @@ +#! /bin/sh + + ###################################### + ##### Model Transformation Tools ##### + ###################################### + +# Bourne shell script: numpar_txt2c + +# Numerical parameters to c format +# P.J.Gawthrop May 1997 +# Copyright (c) P.J.Gawthrop, 1997. + +c############################################################### +## Version control history +############################################################### +## $Id$ +## $Log$ +############################################################### + + + +# Inform user +echo "Creating $1_numpar.c" + +rm -f mtt_error + +#Write some file headers +echo '/*' > $1_numpar.c +echo "Parameter file for system $1 ($1_numpar.c)" >> $1_numpar.c +echo "This file provides the system numerical parameters in c form" >> $1_numpar.c +echo "Generated by MTT at `date`" >> $1_numpar.c +echo '*/' >> $1_numpar.c +echo >> $1_numpar.c + + +cat $MTTPATH/trans/rcs_header.c >> $1_numpar.c +echo >> $1_numpar.c + + +echo "#include \"$1_sympar.c\"" >> $1_numpar.c +echo "$1_numpar()" >> $1_numpar.c +echo '{' >> $1_numpar.c + +#Write out the variables in c format. +awk -F# '{ + if (NF<2) print $1 + if (NF>1) print $1 "/* " $2 " */" +}' $1_numpar.txt >> $1_numpar.c +echo '}' >> $1_numpar.c +