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.3  1998/07/19 15:52:15  peterg
+## Don't call the _input function - make it external from now on ...
+##
 ## Revision 1.2  1998/05/24 12:47:39  peterg
 ## This still needs worjk doing for c generation!!
 ##
 ## Revision 1.1  1998/05/23 16:17:40  peterg
 ## Initial revision
@@ -140,40 +143,35 @@
 
 # Globals
 sympar2global_txt2lang $1 $language
 
 if [ "$language" = "c" ] || [ "$language" = "m" ]; then
-# Common part - ode (c and m)
-# Use octave for this bit - needs the definition file
-$MATRIX -q  <<EOF 
-  %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("\n");
-
-
-printf("$Lc====== Set up the state variables ======$Rc\n");
-for i = 1:nx
-  printf("  mttx%i = mttx$Lb%i$Rb;\n",i,i);
-end;
-printf("\n");
-
-printf("$Lc====== Set up the input variables ======$Rc\n");
-for i = 1:nu
-  printf("  mttu%i = mttu$Lb%i$Rb;\n",i,i);
-end;
-printf("\n");
+  if [ "$rep" != "sm" ]; then
+  # Common part - ode (c and m)
+  # Use octave for this bit - needs the definition file
+  $MATRIX -q  <<EOF 
+    %System structure
+    [nx,ny,nu,nz,nyz] = $1_def;
+
+  printf("$Lc====== Set up the state variables ======$Rc\n");
+  for i = 1:nx
+    printf("  mttx%i = mttx$Lb%i$Rb;\n",i,i);
+  end;
+  printf("\n");
+
+  printf("$Lc====== Set up the input variables ======$Rc\n");
+  for i = 1:nu
+  printf("  mttu%i = mttu$Lb%i$Rb;\n",i,i);
+  end;
+  printf("\n");
 
 EOF
+ fi
 fi
-
 #if [ "$language" = "java" ]; then
 
 #$MATRIX -q <<EOF   
 #    printf("JAVA\n");
 #EOF
 
 #fi