source: mso/sample/heat_exchangers/sampleLMTD.mso @ 69

using "Heat_exchangers/HeatExchangerSimplified.mso";

FlowSheet LMTD_Method

PARAMETERS

PP               as CalcObject (Brief="Physical Properties",File="vrpp");
NComp   as Integer;
        

        
DEVICES
exchanger       as HeatExchanger_LMTD;
streamhot       as streamTP;
streamcold  as streamTP;
SET

PP.LiquidModel          = "PR";
PP.VapourModel          = "PR";
PP.Components           = ["water","n-butane", "benzene", "n-octane" ];
NComp                           = PP.NumberOfComponents;
exchanger.HE.FlowDirection    = "Cocurrent";    
CONNECTIONS

streamhot       to exchanger.Inlet.Hot;
streamcold      to exchanger.Inlet.Cold;
        
SPECIFY

"LMTD Correction Factor"
        exchanger.Fc = 1;
        
"Overall Heat Transfer Coefficient"     
        exchanger.Details.U = 210*"W/(m^2*K)";

exchanger.PressureDrop.Hot.Pdrop        = 0.1*"kPa";
exchanger.PressureDrop.Cold.Pdrop   = 0.2*"kPa";

streamhot.F             = 20    * "kmol/h";
streamhot.T             = 450     * "K";
streamhot.P             = 120    * "kPa";
streamhot.z             = [1,0,0,0];

streamcold.F            = 10 * "kmol/h";
streamcold.P            = 120 * "kPa";
streamcold.T            = 300 * "K";    
streamcold.z            = [0,0.5, 0.1, 0.4];

exchanger.Outlet.Cold.T = 340*"K";
        
OPTIONS
 mode                     = "steady";
 end