Index: mttroot/mtt/bin/trans/lang_header
==================================================================
--- mttroot/mtt/bin/trans/lang_header
+++ mttroot/mtt/bin/trans/lang_header
@@ -6,10 +6,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.1  1998/05/23 16:17:40  peterg
+## Initial revision
+##
 ###############################################################
 
 
 # Set up the language specific stuff
 system=$1
@@ -70,34 +73,38 @@
 $MATRIX -q  <<EOF 
   %System structure
   [nx,ny,nu,nz,nyz] = $1_def;
 
   printf("$Lc Declare standard arrays $Rc\n");
-  printf("  extern double y[%i]; \t $Lc $1_ode output $Rc\n", ny+1);
-  printf("  extern double dx[%i]; \t $Lc $1_ode state derivative $Rc\n", nx+1);
-  printf("  extern double x[%i]; \t $Lc $1_ode state $Rc\n", nx+1);
-  printf("  extern double u[%i]; \t $Lc $1_ode input $Rc\n\n", nu+1);
+  printf("  extern double mtty[%i]; \t $Lc $1_ode output $Rc\n", ny+1);
+  printf("  extern double mttdx[%i]; \t $Lc $1_ode state derivative $Rc\n", nx+1);
+  printf("  extern double mttx[%i]; \t $Lc $1_ode state $Rc\n", nx+1);
+  printf("  extern double mttu[%i]; \t $Lc $1_ode input $Rc\n\n", nu+1);
 
   printf("$Lc Dummy variable list $Rc\n");
   printf("  double t0;\n\n");
 
 
   printf("$Lc State variable list $Rc\n");
   for i = 1:nx
-    printf("  double mttx%i\n",i);
+    printf("  double mttx%i;\n",i);
   end;
 printf("\n");
 
 printf("$Lc State variable input list $Rc\n");
 for i = 1:nu
-  printf("  double mttu%i\n",i);
+  printf("  double mttu%i;\n",i);
 end;
 printf("\n");
 
 printf("$Lc Counter $Rc\n");
 printf("  int i;\n");
 printf("\n");
+
+printf("$Lc Time $Rc\n");
+printf("  double t;\n");
+printf("\n");
 
 EOF
 
 fi
 
@@ -118,11 +125,11 @@
   %System structure
   [nx,ny,nu,nz,nyz] = $1_def;
 
 
 printf("$Lc======  Read in the input ======$Rc\n");
-printf("mttu = $1_input(mttx,t)\n");
+printf("mttu = $1_input(mttx,t);\n");
 printf("\n");
 
 
 printf("$Lc====== Set up the state variables ======$Rc\n");
 for i = 1:nx