Index: mttroot/mtt/bin/trans/ssk2ctf_r
==================================================================
--- mttroot/mtt/bin/trans/ssk2ctf_r
+++ mttroot/mtt/bin/trans/ssk2ctf_r
@@ -11,10 +11,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.1  1998/02/09 13:54:34  peterg
+## Initial revision
+##
 ###############################################################
 
 
 # Inform user
 echo Creating $1_ctf.r
@@ -51,12 +54,12 @@
 %Create the output file
 OUT "$1_ctf.r"; 
 %Write out the matrices.
 
 write "%  - Compensator TF";
-MTT_Matrix := MTTGc$
-MTT_Matrix_name := "MTTGc"$
+MTT_Matrix := MTTcTF$
+MTT_Matrix_name := "MTTcTF"$
 MTT_Matrix_n := MTTNu$
 MTT_Matrix_m := MTTNy$
 Reduce_Matrix()$