Index: mttroot/mtt/bin/trans/struc2input_txt2txt
==================================================================
--- mttroot/mtt/bin/trans/struc2input_txt2txt
+++ mttroot/mtt/bin/trans/struc2input_txt2txt
@@ -12,10 +12,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.9  1998/07/25 20:10:37  peterg
+## lower case mttu
+##
 ## Revision 1.8  1998/07/25 09:42:09  peterg
 ## Just sets finrst input to 1 - rest to zero
 ##
 ## Revision 1.7  1998/07/25 08:05:41  peterg
 ## Reverted to original default - not using SS mechanism
@@ -56,11 +59,12 @@
 
 # Inform user
 echo Creating $1_input.txt
 
 #Create the input file complete with headers.
-echo "# Numerical parameter file ($1_input.txt)" > $1_input.txt
+echo '# -*-octave-*- Put Emacs into octave-mode' > $1_input.txt
+echo "# Numerical parameter file ($1_input.txt)" >> $1_input.txt
 echo "# Generated by MTT at `date`" >> $1_input.txt
 cat $MTTPATH/trans/rcs_header.sh  >> $1_input.txt
 
 #Write out the defaults -- inputs to steady-state values
 #echo "# Set the inputs"  >> $1_input.txt