Index: mttroot/mtt/bin/trans/txt2m
==================================================================
--- mttroot/mtt/bin/trans/txt2m
+++ mttroot/mtt/bin/trans/txt2m
@@ -13,10 +13,13 @@
 # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 # %% Version control history
 # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 # %% $Id$
 # %% $Log$
+# %% Revision 1.11  1998/08/14 10:43:44  peterg
+# %% Added ImplicitS - sparse integration
+# %%
 # %% Revision 1.10  1998/08/11 13:27:51  peterg
 # %% Lowercase mttLAST etc
 # %%
 # %% Revision 1.9  1998/07/30 15:07:17  peterg
 # %% Added _ to the disallowed chars around t
@@ -107,12 +110,12 @@
     sub(/^WSTEPS/, "mttWSTEPS", LHS);
     LHS = tolower(LHS);
     RHS = tolower(RHS);
     sub(/["]*euler["]*/, 1, RHS);   
     sub(/["]*implicitl["]*/, 2, RHS);   
-    sub(/["]*implicit["]*/, 3, RHS);  
     sub(/["]*implicits["]*/, 4, RHS);  
+    sub(/["]*implicit["]*/, 3, RHS);  
     statement = sprintf("%s= %s",LHS,RHS);
     if ( (match(statement,";")==0)&&\
          ((match(statement,"if ")==0))&&\
          ((match(statement,"for ")==0)) )
       statement = sprintf("%s;", statement);