Index: mttroot/mtt/bin/trans/cse2csm_r
==================================================================
--- mttroot/mtt/bin/trans/cse2csm_r
+++ mttroot/mtt/bin/trans/cse2csm_r
@@ -12,10 +12,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.4  1999/11/22 23:49:50  peterg
+## Writes out the new MTTNx and MTTNy
+##
 ## 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
@@ -94,11 +97,11 @@
 matrix MTTD(MTTNy,MTTNu);
 
   FOR i := 1:MTTNy DO
     FOR j := 1:MTTNu DO
     BEGIN
-      uj := MTTU(j,1);
+      %uj := MTTU(j,1);
       uj := mkid(MTTu,j);
       MTTD(i,j) := df(MTTY(i,1), uj, 1);
     END;
 
 %Substitute the ss values