Index: mttroot/mtt/bin/trans/cse2csm_r
==================================================================
--- mttroot/mtt/bin/trans/cse2csm_r
+++ mttroot/mtt/bin/trans/cse2csm_r
@@ -12,10 +12,14 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.3  1999/11/22 23:38:51  peterg
+## Now does scse 2 scsm as well.
+## Uses mkid.
+##
 ## Revision 1.2  1998/07/13 09:56:31  peterg
 ## Back under RCS for major revision
 ##
 # Revision 1.1  1996/08/25  10:13:37  peter
 # Initial revision
@@ -100,10 +104,17 @@
 %Substitute the ss values
 in "$1_sspar.r";
 
 %Create the output file
 OUT "$1_$2.r";
+
+% Constants
+
+write "% New constants";
+write "MTTNx := ", MTTNx, ";";
+write "MTTNy := ", MTTNy, ";";
+
 
 %Write out the matrices.
 IF MTTNx>0 THEN
 BEGIN
   write "matrix MTTE(", MTTNx, ",", MTTNx, ");";