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.9 1997/03/22 15:50:59 peterg +% %% Changed %1.0f to %d format. +% %% % %% Revision 1.8 1996/12/10 16:52:29 peterg % %% Detect null string using strcmp, not length. % %% Put filnum argument to mtt_info. % %% % %% Revision 1.7 1996/12/07 17:17:40 peterg @@ -75,11 +78,12 @@ outputs = structure(4); zero_outputs = structure(5); if strcmp(effort_attribute, 'MTT_port') % Its a numbered port % Convert string to number - port_number = abs(flow_attribute)-abs('0'); + % port_number = abs(flow_attribute)-abs('0'); + port_number = str2num(flow_attribute); % Effort if bonds(1,1)==-1 % Source fprintf(filenum, '%s := %s_MTTu%d;\n', ... varname(name, bond_number,1), name, port_number); @@ -156,5 +160,9 @@ mtt_info([effort_attribute, ' not appropriate for an output '], STDerr); end; end; end; + +structure(3) = inputs; +structure(4) = outputs; +structure(5) = zero_outputs;