File mttroot/mtt/bin/trans/numpar_txt2m artifact 75ecd9e390 part of check-in d25a7dca7a

#! /bin/sh

     ###################################### 
     ##### Model Transformation Tools #####
     ######################################

# Bourne shell script: numpar_txt2m
# Creates the deafault numerical parameters file for the system (txt)

# Copyright (c) P.J.Gawthrop 1996

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
# Revision 1.1  1997/05/01  07:45:17  peterg
# Initial revision
#
###############################################################

# Inform user
echo Creating $1_numpar.m

#Create the numpar file complete with headers.
echo "%% Numerical parameter file ($1_numpar.m)" > $1_numpar.m
echo "%% Generated by MTT at `date`" >> $1_numpar.m

# Global variable list
echo  >>  $1_numpar.m
echo "% Global variable list" >>  $1_numpar.m
sympar2global_txt2m $1 >> $1_numpar.m

#Write out the variables in m format.
awk -F#  '{
  if (NF<2) print $1
  if (NF>1)  print $1 "% " $2
}' $1_numpar.txt  >> $1_numpar.m