Index: mttroot/mtt/bin/trans/cse_r2tex
==================================================================
--- mttroot/mtt/bin/trans/cse_r2tex
+++ mttroot/mtt/bin/trans/cse_r2tex
@@ -12,10 +12,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+# Revision 1.3  1996/11/12  09:53:59  peterg
+# Reads in the params.r file now.
+#
 # Revision 1.2  1996/11/12  09:11:20  peterg
 # Removed all the hoorrible name changes
 #
 # Revision 1.1  1996/11/05  09:19:28  peterg
 # Initial revision
@@ -62,12 +65,12 @@
 
 write "%constrained-state equations";
 	IF MTTNx>0 THEN
 	FOR Row := 1:MTTNx DO
 	BEGIN
-		write"\begin{equation} \label{eq_$1_cse_X", Row, "}";
-		write "\dot MTTEX_{", Row, "} = ";
+	        write"\begin{equation}";
+		write "\dot MTTEX", Row, " = ";
 		write "{";
 		write MTTEdX(Row,1);
 		write "}";
 		write"\end{equation}";
 	END;
@@ -75,12 +78,12 @@
 
 
 	IF MTTNy>0 THEN
 	FOR Row := 1:MTTNy DO
 	BEGIN
-		write"\begin{equation} \label{eq_$1_cse_y", Row, "}";
-		write "MTTy_{", Row, "} = ";
+		write"\begin{equation}";
+		write "MTTy", Row, " = ";
 		write "{";
 		write MTTy(Row,1);
 		write "}";
 		write"\end{equation}";
 	END;
@@ -87,12 +90,12 @@
 
 
 IF MTTNx NEQ 0 THEN
 BEGIN
 write "%  - E matrix";
-write "\begin{equation} \label{eq_$1_cse_E}";
-write "MTTE = \left \matrix {";
+write "\begin{equation}";
+write "MTTE = \begin{pmatrix}";
 	FOR Row := 1:MTTNx DO
 	BEGIN
 		FOR Col := 1:MTTNx DO
 		BEGIN
 			Write "{", MTTE(Row,Col), "}";
@@ -99,27 +102,27 @@
 			IF Col<MTTNx THEN Write "&"
 		END;
 
 	IF Row<MTTNx THEN Write "\cr";
 	END;
-	Write "} \right";
+	Write "\end{pmatrix}";
 write "\end{equation}";
 END;
 
 
 
 %write "%  - E matrix";
-%write "\begin{eqnarray} \label{eq_$1_cse_Ea}";
+%write "\begin{eqnarray}";
 %	FOR Row := 1:MTTNx DO
 %	BEGIN
 %	  FOR Col := 1:MTTNx DO %IF MTTE(Row,Col) NEQ 0 THEN
 %	  BEGIN
-%	      Write "MTTE_{", Row, Col, "} &=& {", MTTE(Row,Col), "}";
+%	      Write "MTTE", Row, Col, " &=& {", MTTE(Row,Col), "}";
 % 	      IF Row<MTTNx OR Col<MTTNx THEN Write "\cr";
 %	  END;   
 %	END;
 %write "\end{eqnarray}";
 
 
 SHUT "$1_cse.tex";
 quit;
 EOF