Index: mttroot/mtt/lib/comp/simple/FP_eqn.m
==================================================================
--- mttroot/mtt/lib/comp/simple/FP_eqn.m
+++ mttroot/mtt/lib/comp/simple/FP_eqn.m
@@ -1,24 +1,27 @@
-function  structure = ES_eqn(name,bond_number,bonds,direction,cr,args, ...
+function  structure = FP_eqn(name,bond_number,bonds,direction,cr,args, ...
     structure,eqnfile);
-% ES_eqn - equations for ES component
+% FP_eqn - equations for FP component
 % 
 %     %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
 %     %%%%% Model Transformation Tools %%%%%
 %     %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % 
-% Matlab function  ES_eqn
-% ES_eqn(name,bond_number,bonds,direction,cr,args, ...
+% Matlab function  FP_eqn
+% FP_eqn(name,bond_number,bonds,direction,cr,args, ...
 %    structure,eqnfile);
 
 
 
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% Version control history
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% $Id$
 % %% $Log$
+% %% Revision 1.1  1998/06/29 09:53:22  peterg
+% %% Initial revision
+% %%
 % %% Revision 1.3  1998/03/27 10:59:43  peterg
 % %% Zapped t_0 again ...
 % %%
 % %% Revision 1.2  1998/02/25 16:59:56  peterg
 % %% Corrected enthalpy-entropy conversion -- use temp on the entropy side.
@@ -36,11 +39,11 @@
   eqnfile = 'stdout';
 end;
 
 % Check that there are exactly two bonds.
 ports = 2;
-if check_bonds(bonds,ports,'ES')==0
+if check_bonds(bonds,ports,'FP')==0
   return
 end
 
 
 % There are 2 ports; extract the information