Ignore:
Timestamp:
Jan 29, 2007, 6:25:50 PM (17 years ago)
Author:
gerson bicca
Message:

updated Mheatex model for the new language

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/newlanguage/eml/heat_exchangers/Mheatex.mso

    r139 r140  
    4343PARAMETERS
    4444
    45         Ncold   as Integer      (Brief="Number of Inlet Cold Streams",Lower=1);
    46         Nhot    as Integer      (Brief="Number of Inlet Hot Streams",Lower=1);
    47        
     45outer   Ncold   as Integer      (Brief="Number of Inlet Cold Streams",Lower=1);
     46outer   Nhot    as Integer      (Brief="Number of Inlet Hot Streams",Lower=1);
     47
    4848VARIABLES
    4949
    … …  
    6363PARAMETERS
    6464
    65         Ncold   as Integer      (Brief="Number of Outlet Cold Streams",Lower=1);
    66         Nhot    as Integer      (Brief="Number of Outlet Hot Streams",Lower=1);
    67        
     65outer   Ncold   as Integer      (Brief="Number of Outlet Cold Streams",Lower=1);
     66outer   Nhot    as Integer      (Brief="Number of Outlet Hot Streams",Lower=1);
     67
    6868VARIABLES
    6969# Must be streamPH
    … …  
    8585outer PP                as Plugin       (Brief="Physical Properties");
    8686outer   NComp   as Integer      (Brief="Number of Components");
    87         HE                      as Plugin       (Brief="Cold Box Calculations",File="heatex");
    88         Side                    as Integer      (Brief="Flow Direction",Lower=0,Upper=1);
     87        Side                    as Switcher(Brief="Flow Direction",Valid=["counter","cocurrent"],Default="cocurrent");
    8988        Ncold                   as Integer      (Brief="Number of Inlet Cold Streams",Lower=1);
    9089        Nhot                    as Integer      (Brief="Number of Inlet Hot Streams",Lower=1);
    … …  
    101100        DTL             as temp_delta   (Brief="Temperature Difference at Outlet",Lower=1);
    102101       
    103 SET
    104 
    105 # Flow Direction
    106         Side = HE.FlowDir();
    107 
    108102EQUATIONS
    109103
    … …  
    153147
    154148
    155 if Side equal 0
     149switch Side
    156150       
    157         then
    158        
     151case    "cocurrent":
     152
    159153"Temperature Difference at Inlet"
    160154        DT0 = max(Inlet.Hot.T) - min(Inlet.Cold.T);
    … …  
    163157        DTL = min(Outlet.Hot.T) - max(Outlet.Cold.T);
    164158       
    165         else
     159case "counter":
    166160       
    167161"Temperature Difference at Inlet"
Note: See TracChangeset for help on using the changeset viewer.