Index: mttroot/mtt/lib/comp/simple/R_eqn.m
==================================================================
--- mttroot/mtt/lib/comp/simple/R_eqn.m
+++ mttroot/mtt/lib/comp/simple/R_eqn.m
@@ -13,10 +13,13 @@
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% Version control history
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% $Id$
 % %% $Log$
+% %% Revision 1.1  1996/09/12 11:00:56  peter
+% %% Initial revision
+% %%
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 
 % Copyright (c) P.J. Gawthrop, 1996.
 
@@ -30,13 +33,12 @@
 
 
 for outport = 1:ports
   outcause = -bonds(outport,1);
   outnumber = bond_number(outport);
-  fprintf(eqnfile, '%s\t:= ', varname(name,outnumber, outcause));
   incause = bonds(:,1);
   eqn =  equation(name,cr,args,outnumber,outcause,outport, ...
                                bond_number,incause,1:ports);
   fprintf(eqnfile, '%s',eqn);
 end;