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.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
 ##
 ###############################################################
 
@@ -35,19 +38,26 @@
 	Lc='/*';
 	Rc='*/';
 	Lb='[';
 	Rb=']';
 	;;
+    java)
+	ext='java';
+	Lc='/*';
+	Rc='*/';
+	Lb='[';
+	Rb=']';
+	;;
     *)
 	echo Language $language not supported - sorry; exit 1
 esac
 
 ######### Octave (matlab) code
 if [ "$language" = m ]; then
 cat <<EOF
 function $output = $1_$rep($args);
-% $output = $1_ode($args);
+% $output = $1_$rep($args);
 %System $system, representation $rep, language $language;
 %File $1_$rep.$ext;
 %Generated by MTT on `date`;
 %
 EOF
@@ -105,10 +115,22 @@
 printf("\n");
 
 EOF
 
 fi
+
+if [ "$language" = "java" ]; then
+cat <<EOF
+public class $1_ode{
+/*
+System $system, representation $rep, language $language;
+File $1_$rep.$ext;
+Generated by MTT on `date`;
+*/
+
+EOF
+fi
 
 # Any extra bits ..
 if [ -n "$extras" ]; then
 cat <<EOF
 $Lc Extra bits here $Rc
@@ -117,20 +139,21 @@
 fi
 
 # Globals
 sympar2global_txt2lang $1 $language
 
-# Common part - ode
+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======  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);
@@ -142,5 +165,15 @@
   printf("  mttu%i = mttu$Lb%i$Rb;\n",i,i);
 end;
 printf("\n");
 
 EOF
+fi
+
+#if [ "$language" = "java" ]; then
+
+#$MATRIX -q <<EOF   
+#    printf("JAVA\n");
+#EOF
+
+#fi
+