###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.5  1998/07/26 11:00:18  peterg
## Put in exits-- this all needs a good clean
##
## Revision 1.4  1998/07/26 10:50:30  peterg
## Corrected bug.
##
## Revision 1.3  1998/07/26 10:48:18  peterg
## Now strips comments
##
## Revision 1.2  1998/07/25 18:49:00  peterg

cat <<EOF

$Lc====== Set up the global variables ======$Rc
EOF
# Matlab bit
#Write out the variables in matlab global format
if [ "$language" = "m" ]; then
 strip_comments <$1_sympars.txt  |\
  awk '
  BEGIN{
    var = "foobar";
    print "global ..."
  sympar2global_txt2m $1
  }
  {i++; print tolower($1), "..."; var = $1}
  END{
  print var ";" # Repeat the last variable to avoid the trailing ...
  }'
exit
fi

if [ "$language" = "c" ]; then
  strip_comments <$1_sympars.txt  |\
    awk '{
      i++; print "extern double", tolower($1) ";";