Index: mttroot/mtt/lib/comp/simple/SS_eqn.m
==================================================================
--- mttroot/mtt/lib/comp/simple/SS_eqn.m
+++ mttroot/mtt/lib/comp/simple/SS_eqn.m
@@ -17,10 +17,13 @@
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% Version control history
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% $Id$
 % %% $Log$
+% %% Revision 1.7  1996/12/07 17:17:40  peterg
+% %% Added some ;
+% %%
 % %% Revision 1.6  1996/12/05 09:49:09  peterg
 % %% Explicit computation of port number from string.
 % %%
 % %% Revision 1.5  1996/12/04 21:27:53  peterg
 % %% Replaced str2num by sprintf
@@ -51,15 +54,15 @@
 %     arg contains port number
 
 effort_attribute = cr;
 flow_attribute = args;
 
-if length(effort_attribute)==0
+if strcmp(effort_attribute,'')
   effort_attribute = 'external';
 end;
 
-if length(flow_attribute)==0
+if strcmp(flow_attribute,'')
   flow_attribute = 'external';
 end;
 
 
 inputs = structure(3);
@@ -113,11 +116,11 @@
       fprintf(filenum, 'MTTyz%1.0f := %s;\n', ...
 	  zero_outputs, varname(name, bond_number,1));
       fprintf(filenum, '%s := MTTUi%1.0f;\n', ...
 	  varname(name, bond_number,-1), zero_outputs);
     else
-      mtt_info([effort_attribute, ' not appropriate for an output ']);
+      mtt_info([effort_attribute, ' not appropriate for an output '],filenum);
     end;
   end;
 end;
 
 % Flow
@@ -142,11 +145,11 @@
       fprintf(filenum, 'MTTyz%1.0f := %s;\n', ...
 	  zero_outputs, varname(name, bond_number,-1));
       fprintf(filenum, '%s := MTTUi%1.0f;\n', ...
 	  varname(name, bond_number,1), zero_outputs);
     else
-      mtt_info([effort_attribute, ' not appropriate for an output ']);
+      mtt_info([effort_attribute, ' not appropriate for an output '], filenum);
     end;
   end;
 end;