Changeset 447


Ignore:
Timestamp:
Jan 15, 2008, 8:30:58 PM (15 years ago)
Author:
gerson bicca
Message:

Updated hairpin heat exchanger with incremental approach (final testing)

Location:
branches/tests
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • branches/tests/eml/heat_exchangers/HairpinIncr.mso

    r445 r447  
    105105        Q(N)            as power                                                        (Brief="Incremental Duty", Default=7000, Lower=1e-8, Upper=1e10);
    106106        Qtotal          as power                                                        (Brief="Total Duty", Default=7000, Lower=1e-8, Upper=1e10);
    107         Uc(N)           as heat_trans_coeff             (Brief="Incremental Overall Heat Transfer Coefficient Clean",Default=1,Lower=1e-6,Upper=1e10);
     107        #Uc(N)          as heat_trans_coeff             (Brief="Incremental Overall Heat Transfer Coefficient Clean",Default=1,Lower=1e-6,Upper=1e10);
     108        Uc              as heat_trans_coeff             (Brief="Incremental Overall Heat Transfer Coefficient Clean",Default=1,Lower=1e-6,Upper=1e10);
    108109        Ud(N)           as heat_trans_coeff             (Brief="Incremental Overall Heat Transfer Coefficient Dirty",Default=1,Lower=1e-6,Upper=1e10);
    109110
     
    156157
    157158Plocal(Npoints)         as pressure             (Brief="Incremental Local  Pressure",Default=1, Lower=1e-10, Upper=2e4, DisplayUnit='kPa');
    158 Pdrop                                           as press_delta  (Brief="Total Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa', Symbol ="\Delta P");
    159 Pd_fric(Npoints)                as press_delta  (Brief="Incremental Pressure Drop for friction",Default=0.01, Lower=0,DisplayUnit='kPa', Symbol ="\Delta P_{fric}");
     159#Pdrop                                          as press_delta  (Brief="Total Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa', Symbol ="\Delta P");
     160#Pd_fric(Npoints)               as press_delta  (Brief="Incremental Pressure Drop for friction",Default=0.01, Lower=0,DisplayUnit='kPa', Symbol ="\Delta P_{fric}");
    160161fi(N)                                           as fricfactor           (Brief="Incremental Friction Factor", Default=0.05, Lower=1e-10, Upper=2000);
    161162Re(N)                                           as positive                     (Brief="Incremental Reynolds Number",Default=100,Lower=1);
    162 Pdnozzle_in             as press_delta          (Brief="Inlet Nozzle Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa');
    163 Pdnozzle_out            as press_delta          (Brief="Outlet Nozzle Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa');
    164 Vnozzle_in              as velocity                     (Brief="Inlet Nozzle Velocity",Default=1, Upper=1e5, Lower=0);
    165 Vnozzle_out             as velocity                     (Brief="Outlet Nozzle Velocity",Default=1, Upper=1e5, Lower=0);
    166 RVsquare_in             as positive                     (Brief = "Inlet Nozzle rho-V^2", Default=1, Upper=1e6, Unit = 'kg/s^2/m');
    167 RVsquare_out            as positive                     (Brief = "Outlet Nozzle rho-V^2", Default=1, Upper=1e6, Unit = 'kg/s^2/m');
     163#Pdnozzle_in            as press_delta          (Brief="Inlet Nozzle Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa');
     164#Pdnozzle_out           as press_delta          (Brief="Outlet Nozzle Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa');
     165#Vnozzle_in             as velocity                     (Brief="Inlet Nozzle Velocity",Default=1, Upper=1e5, Lower=0);
     166#Vnozzle_out            as velocity                     (Brief="Outlet Nozzle Velocity",Default=1, Upper=1e5, Lower=0);
     167#RVsquare_in            as positive                     (Brief = "Inlet Nozzle rho-V^2", Default=1, Upper=1e6, Unit = 'kg/s^2/m');
     168#RVsquare_out           as positive                     (Brief = "Outlet Nozzle rho-V^2", Default=1, Upper=1e6, Unit = 'kg/s^2/m');
    168169end     
    169170
     
    201202        M(NComp)        as molweight    (Brief="Component Mol Weight");
    202203       
    203         HotSide                                 as Switcher     (Brief="Flag for Fluid Alocation ",Valid=["outer","inner"],Default="outer");
     204        #HotSide                                        as Switcher     (Brief="Flag for Fluid Alocation ",Valid=["outer","inner"],Default="outer");
    204205        innerFlowRegime         as Switcher     (Brief="Inner Flow Regime ",Valid=["laminar","transition","turbulent"],Default="laminar");
    205206        outerFlowRegime         as Switcher     (Brief="Outer Flow Regime ",Valid=["laminar","transition","turbulent"],Default="laminar");
     
    216217       
    217218outer   DoInner         as length                       (Brief="Outside Diameter of Inner Pipe",Lower=1e-6);
    218 outer   DiInner as length                       (Brief="Inside Diameter of Inner Pipe",Lower=1e-10);
    219 outer   DiOuter as length                       (Brief="Inside Diameter of Outer pipe",Lower=1e-10);
     219outer   DiInner         as length                       (Brief="Inside Diameter of Inner Pipe",Lower=1e-10);
     220outer   DiOuter         as length                       (Brief="Inside Diameter of Outer pipe",Lower=1e-10);
    220221outer   Lpipe           as length                       (Brief="Effective Tube Length of one segment of Pipe",Lower=0.1, Symbol = "L_{pipe}");
    221222outer   Kwall           as conductivity         (Brief="Tube Wall Material Thermal Conductivity",Default=1.0, Symbol = "K_{wall}");
    222 outer   Rfi                     as positive                     (Brief="Inside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
    223 outer   Rfo                     as positive                     (Brief="Outside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
    224 
    225 outer   Donozzle_Inner  as length       (Brief="Inner Side Outlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
    226 outer   Dinozzle_Inner          as length       (Brief="Inner Side Inlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
    227 
    228 outer   Donozzle_Outer  as length               (Brief="Outer Side Outlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
    229 outer   Dinozzle_Outer  as length               (Brief="Outer Side Inlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
    230 
    231 InnerKinlet     as positive                     (Brief="Inner Side Inlet Nozzle Pressure Loss Coeff",Default=1.1);
    232 InnerKoutlet    as positive                     (Brief="Inner Side Outlet Nozzle Pressure Loss Coeff",Default=0.7);
    233 
    234 OuterKinlet             as positive             (Brief="Outer Side Inlet Nozzle Pressure Loss Coeff",Default=1.1);
    235 OuterKoutlet    as positive             (Brief="Outer Side Outlet Nozzle Pressure Loss Coeff",Default=0.7);
     223outer   Rfi                     as positive             (Brief="Inside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
     224outer   Rfo                     as positive             (Brief="Outside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
     225
     226#outer  Donozzle_Inner  as length       (Brief="Inner Side Outlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     227#outer  Dinozzle_Inner          as length       (Brief="Inner Side Inlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     228
     229#outer  Donozzle_Outer  as length               (Brief="Outer Side Outlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     230#outer  Dinozzle_Outer  as length               (Brief="Outer Side Inlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
    236231
    237232VARIABLES
     
    244239
    245240        Details         as Details_Main         (Brief="Some Details in the Heat Exchanger", Symbol=" ");
    246         Inner                   as Main_Hairpin         (Brief="Inner Side of the Heat Exchanger", Symbol="_{Inner}");
    247         Outer                   as Main_Hairpin         (Brief="Outer Side of the Heat Exchanger", Symbol="_{Outer}");
     241        Inner           as Main_Hairpin         (Brief="Inner Side of the Heat Exchanger", Symbol="_{Inner}");
     242        Outer           as Main_Hairpin         (Brief="Outer Side of the Heat Exchanger", Symbol="_{Outer}");
    248243
    249244        Lincr(Npoints)          as length               (Brief = "Incremental Tube Length", Symbol = "L_{incr}");
     
    303298"Inner Stream Average Molecular Weight"
    304299        Inner.Properties.Average.Mw = sum(M*InletInner.z);
    305 
    306300
    307301if InletInner.v equal 0
     
    422416end
    423417
    424 switch HotSide
     418"Flow Mass Inlet Inner Stream"
     419        Inner.Properties.Inlet.Fw               =  sum(M*InletInner.z)*InletInner.F;
     420
     421"Flow Mass Outlet Inner Stream"
     422        Inner.Properties.Outlet.Fw              =  sum(M*OutletInner.z)*OutletInner.F;
     423
     424"Flow Mass Inlet Outer Stream"
     425        Outer.Properties.Inlet.Fw               =  sum(M*InletOuter.z)*InletOuter.F;
     426
     427"Flow Mass Outlet Outer Stream"
     428        Outer.Properties.Outlet.Fw      =  sum(M*OutletOuter.z)*OutletOuter.F;
     429
     430"Molar Balance Outer Stream"
     431        OutletOuter.F = InletOuter.F;
     432       
     433"Molar Balance Inner Stream"
     434        OutletInner.F = InletInner.F;
     435
     436"Outer Stream Molar Fraction Constraint"
     437        OutletOuter.z=InletOuter.z;
     438       
     439"InnerStream Molar Fraction Constraint"
     440        OutletInner.z=InletInner.z;
     441
     442"Total Exchange Surface Area for one segment of pipe"
     443        Details.A=Pi*DoInner*Lpipe;
     444
     445
     446"Pipe Initial Length from Left to Right"
     447        Lincr(1) = 0*'m';
     448
     449for i in [1:N]
     450
     451"Incremental Length"
     452        Lincr(i+1) = i*abs(Lpipe)/N;
     453
     454end
     455
     456for i in [1:N]
     457
     458switch innerFlowRegime
     459       
     460        case "laminar":
     461       
     462"Inner Side Friction Factor for Pressure Drop - laminar Flow"
     463        Inner.PressureDrop.fi(i)*Inner.PressureDrop.Re(i) = 16;
     464       
     465        when Inner.PressureDrop.Re(i) > 2300 switchto "transition";
     466
     467        case "transition":
     468       
     469"using Turbulent Flow - to be implemented"
     470        (Inner.PressureDrop.fi(i)-0.0035)*(Inner.PressureDrop.Re(i)^0.42) = 0.264;
     471
     472        when Inner.PressureDrop.Re(i) < 2300 switchto "laminar";
     473        when Inner.PressureDrop.Re(i) > 10000 switchto "turbulent";
     474
     475        case "turbulent":
     476
     477"Inner Side Friction Factor - Turbulent Flow"
     478        (Inner.PressureDrop.fi(i)-0.0035)*(Inner.PressureDrop.Re(i)^0.42) = 0.264;
     479
     480        when Inner.PressureDrop.Re(i) < 10000 switchto "transition";
     481       
     482end     
     483
     484end
     485
     486for i in [1:N]
     487
     488switch outerFlowRegime
     489       
     490        case "laminar":
     491       
     492"Outer Side Friction Factor - laminar Flow"
     493        Outer.PressureDrop.fi(i)*Outer.PressureDrop.Re(i) = 16;
     494       
     495        when Outer.PressureDrop.Re(i) > 2300 switchto "transition";
     496
     497        case "transition":
     498       
     499"using Turbulent Flow - Transition Flow must be implemented"
     500        (Outer.PressureDrop.fi(i)-0.0035)*(Outer.PressureDrop.Re(i)^0.42) = 0.264;
     501
     502        when Outer.PressureDrop.Re(i) < 2300 switchto "laminar";
     503        when Outer.PressureDrop.Re(i) > 10000 switchto "turbulent";
     504
     505        case "turbulent":
     506
     507"Outer Side Friction Factor - Turbulent Flow"
     508        (Outer.PressureDrop.fi(i)-0.0035)*(Outer.PressureDrop.Re(i)^0.42) = 0.264;
     509
     510        when Outer.PressureDrop.Re(i) < 10000 switchto "transition";
     511       
     512end
     513
     514end
     515
     516for i in [1:N]
     517
     518switch innerFlowRegime
     519       
     520        case "laminar":
     521       
     522"Inner Side Friction Factor for Heat Transfer - laminar Flow"
     523        Inner.HeatTransfer.fi(i)   = 1/(0.79*ln(Inner.HeatTransfer.Re(i))-1.64)^2;
     524       
     525switch InnerLaminarCorrelation
     526       
     527        case "Hausen":
     528
     529"Nusselt Number"
     530        Inner.HeatTransfer.Nu(i) = 3.665 + ((0.19*((DiInner/Lpipe)*Inner.HeatTransfer.Re(i)*Inner.HeatTransfer.PR(i))^0.8)/(1+0.117*((DiInner/Lpipe)*Inner.HeatTransfer.Re(i)*Inner.HeatTransfer.PR(i))^0.467));
     531       
     532        case "Schlunder":
     533
     534"Nusselt Number"
     535        Inner.HeatTransfer.Nu(i) = (49.027896+4.173281*Inner.HeatTransfer.Re(i)*Inner.HeatTransfer.PR(i)*(DiInner/Lpipe))^(1/3);
     536
     537end
     538       
     539        when Inner.HeatTransfer.Re(i) > 2300 switchto "transition";
     540       
     541        case "transition":
     542       
     543"Inner Side Friction Factor for Heat Transfer - transition Flow"
     544        Inner.HeatTransfer.fi(i)   = 1/(0.79*ln(Inner.HeatTransfer.Re(i))-1.64)^2;
     545       
     546switch InnerTransitionCorrelation
     547       
     548        case "Gnielinski":
     549       
     550"Nusselt Number"
     551        Inner.HeatTransfer.Nu(i)*(1+(12.7*sqrt(0.125*Inner.HeatTransfer.fi(i))*((Inner.HeatTransfer.PR(i))^(2/3) -1))) = 0.125*Inner.HeatTransfer.fi(i)*(Inner.HeatTransfer.Re(i)-1000)*Inner.HeatTransfer.PR(i);
     552
     553        case "Hausen":
     554
     555"Nusselt Number"
     556        Inner.HeatTransfer.Nu(i) =0.116*(Inner.HeatTransfer.Re(i)^(0.667)-125)*Inner.HeatTransfer.PR(i)^(0.333)*(1+(DiInner/Lpipe)^0.667);
     557       
     558end
     559
     560        when Inner.HeatTransfer.Re(i) < 2300 switchto "laminar";
     561        when Inner.HeatTransfer.Re(i) > 10000 switchto "turbulent";
     562
     563        case "turbulent":
     564
     565switch InnerTurbulentCorrelation
     566       
     567        case "Petukhov":
     568       
     569"Inner Side Friction Factor for Heat Transfer - turbulent Flow"
     570        Inner.HeatTransfer.fi(i)   = 1/(1.82*log(Inner.HeatTransfer.Re(i))-1.64)^2;
     571
     572"Nusselt Number"
     573        Inner.HeatTransfer.Nu(i)*(1.07+(12.7*sqrt(0.125*Inner.HeatTransfer.fi(i))*((Inner.HeatTransfer.PR(i))^(2/3) -1))) = 0.125*Inner.HeatTransfer.fi(i)*Inner.HeatTransfer.Re(i)*Inner.HeatTransfer.PR(i);
     574       
     575        case "SiederTate":
     576
     577"Nusselt Number"
     578        Inner.HeatTransfer.Nu(i) = 0.027*(Inner.HeatTransfer.PR(i))^(1/3)*(Inner.HeatTransfer.Re(i))^(4/5);
     579
     580"Inner Side Friction Factor for Heat Transfer - turbulent Flow"
     581        Inner.HeatTransfer.fi(i)   = 1/(1.82*log(Inner.HeatTransfer.Re(i))-1.64)^2;
     582       
     583end
     584       
     585        when Inner.HeatTransfer.Re(i) < 10000 switchto "transition";
     586       
     587end
     588
     589end
     590
     591for i in [1:N]
     592
     593switch outerFlowRegime
     594       
     595        case "laminar":
     596       
     597"Outer Side Friction Factor for Heat Transfer - laminar Flow"
     598        Outer.HeatTransfer.fi(i)   = 1/(0.79*ln(Outer.HeatTransfer.Re(i))-1.64)^2;
     599       
     600switch OuterLaminarCorrelation
     601       
     602        case "Hausen":
     603
     604"Nusselt Number"
     605        Outer.HeatTransfer.Nu(i) = 3.665 + ((0.19*((Outer.HeatTransfer.Dh/Lpipe)*Outer.HeatTransfer.Re(i)*Outer.HeatTransfer.PR(i))^0.8)/(1+0.117*((Outer.HeatTransfer.Dh/Lpipe)*Outer.HeatTransfer.Re(i)*Outer.HeatTransfer.PR(i))^0.467));
     606       
     607        case "Schlunder":
     608
     609"Nusselt Number"
     610        Outer.HeatTransfer.Nu(i) = (49.027896+4.173281*Outer.HeatTransfer.Re(i)*Outer.HeatTransfer.PR(i)*(Outer.HeatTransfer.Dh/Lpipe))^(1/3);
     611
     612end
     613       
     614        when Outer.HeatTransfer.Re(i) > 2300 switchto "transition";
     615       
     616        case "transition":
     617       
     618switch OuterTransitionCorrelation
     619       
     620        case "Gnielinski":
     621
     622"Outer Side Friction Factor for Heat Transfer - transition Flow"
     623        Outer.HeatTransfer.fi(i)   = 1/(0.79*ln(Outer.HeatTransfer.Re(i))-1.64)^2;
     624
     625"Nusselt Number"
     626        Outer.HeatTransfer.Nu(i)*(1+(12.7*sqrt(0.125*Outer.HeatTransfer.fi(i))*((Outer.HeatTransfer.PR(i))^(2/3) -1))) = 0.125*Outer.HeatTransfer.fi(i)*(Outer.HeatTransfer.Re(i)-1000)*Outer.HeatTransfer.PR(i);
     627
     628        case "Hausen":
     629
     630"Nusselt Number"
     631        Outer.HeatTransfer.Nu(i) =      0.116*(Outer.HeatTransfer.Re(i)^(0.667)-125)*Outer.HeatTransfer.PR(i)^(0.333)*(1+(Outer.HeatTransfer.Dh/Lpipe)^0.667);
     632
     633
     634"Outer Side Friction Factor for Heat Transfer - transition Flow"
     635        Outer.HeatTransfer.fi(i)   = 1/(0.79*ln(Outer.HeatTransfer.Re(i))-1.64)^2;
     636       
     637end
     638       
     639        when Outer.HeatTransfer.Re(i) < 2300 switchto "laminar";
     640        when Outer.HeatTransfer.Re(i) > 10000 switchto "turbulent";
     641       
     642        case "turbulent":
     643       
     644switch OuterTurbulentCorrelation
     645       
     646        case "Petukhov":
     647
     648"Outer Side Friction Factor for Heat Transfer - turbulent Flow"
     649        Outer.HeatTransfer.fi(i)   = 1/(1.82*log(Outer.HeatTransfer.Re(i))-1.64)^2;
     650       
     651"Nusselt Number"
     652        Outer.HeatTransfer.Nu(i)*(1.07+(12.7*sqrt(0.125*Outer.HeatTransfer.fi(i))*((Outer.HeatTransfer.PR(i))^(2/3) -1))) = 0.125*Outer.HeatTransfer.fi(i)*Outer.HeatTransfer.Re(i)*Outer.HeatTransfer.PR(i);
     653       
     654        case "SiederTate":
     655
     656"Nusselt Number"
     657        Outer.HeatTransfer.Nu(i) = 0.027*(Outer.HeatTransfer.PR(i))^(1/3)*(Outer.HeatTransfer.Re(i))^(4/5);
     658
     659"Outer Side Friction Factor for Heat Transfer - turbulent Flow"
     660        Outer.HeatTransfer.fi(i)   = 1/(1.82*log(Outer.HeatTransfer.Re(i))-1.64)^2;
     661       
     662end
     663
     664        when Outer.HeatTransfer.Re(i) < 10000 switchto "transition";
     665
     666end
     667
     668end
     669
     670"Inner Pipe Film Coefficient"
     671        Inner.HeatTransfer.hcoeff = (Inner.HeatTransfer.Nu*Inner.Properties.Average.K/DiInner)*Inner.HeatTransfer.Phi;
     672
     673"Outer Pipe Film Coefficient"
     674        Outer.HeatTransfer.hcoeff= (Outer.HeatTransfer.Nu*Outer.Properties.Average.K/Outer.HeatTransfer.Dh)*Outer.HeatTransfer.Phi;
     675
     676"Outer Pipe Phi correction"
     677        Outer.HeatTransfer.Phi = (Outer.Properties.Average.Mu/Outer.Properties.Wall.Mu)^0.14;
     678       
     679"Inner Pipe Phi correction"
     680        Inner.HeatTransfer.Phi  = (Inner.Properties.Average.Mu/Inner.Properties.Wall.Mu)^0.14;
     681
     682"Outer Pipe Prandtl Number"
     683        Outer.HeatTransfer.PR = ((Outer.Properties.Average.Cp/Outer.Properties.Average.Mw)*Outer.Properties.Average.Mu)/Outer.Properties.Average.K;
     684
     685"Inner Pipe Prandtl Number"
     686        Inner.HeatTransfer.PR = ((Inner.Properties.Average.Cp/Inner.Properties.Average.Mw)*Inner.Properties.Average.Mu)/Inner.Properties.Average.K;
     687
     688"Outer Pipe Reynolds Number for Heat Transfer"
     689        Outer.HeatTransfer.Re = (Outer.Properties.Average.rho*Outer.HeatTransfer.Vmean*Outer.HeatTransfer.Dh)/Outer.Properties.Average.Mu;
     690
     691"Outer Pipe Reynolds Number for Pressure Drop"
     692        Outer.PressureDrop.Re = (Outer.Properties.Average.rho*Outer.HeatTransfer.Vmean*Outer.PressureDrop.Dh)/Outer.Properties.Average.Mu;
     693
     694"Inner Pipe Reynolds Number for Heat Transfer"
     695        Inner.HeatTransfer.Re = (Inner.Properties.Average.rho*Inner.HeatTransfer.Vmean*Inner.HeatTransfer.Dh)/Inner.Properties.Average.Mu;
     696
     697"Inner Pipe Reynolds Number for Pressure Drop"
     698        Inner.PressureDrop.Re = Inner.HeatTransfer.Re;
     699
     700"Outer Pipe Velocity"
     701        Outer.HeatTransfer.Vmean*(Outer.HeatTransfer.As*Outer.Properties.Average.rho)  = Outer.Properties.Inlet.Fw;
     702
     703"Inner Pipe Velocity"
     704        Inner.HeatTransfer.Vmean*(Inner.HeatTransfer.As*Inner.Properties.Average.rho)  = Inner.Properties.Inlet.Fw;
     705
     706"Overall Heat Transfer Coefficient Clean"
     707        #Details.Uc*((DoInner/(Inner.HeatTransfer.hcoeff*DiInner) )+(DoInner*ln(DoInner/DiInner)/(2*Kwall))+(1/(Outer.HeatTransfer.hcoeff)))=1;
     708        Details.Uc*((DoInner/(sum(Inner.HeatTransfer.hcoeff)/N*DiInner) )+(DoInner*ln(DoInner/DiInner)/(2*Kwall))+(1/(sum(Outer.HeatTransfer.hcoeff)/N)))=1;
     709
     710"Overall Heat Transfer Coefficient Dirty"
     711        Details.Ud=1/(Rfi*(DoInner/DiInner) +  Rfo + (DoInner/(Inner.HeatTransfer.hcoeff*DiInner) )+(DoInner*ln(DoInner/DiInner)/(2*Kwall))+(1/(Outer.HeatTransfer.hcoeff)));
     712
     713"Total Duty"
     714        Details.Qtotal = sum(Details.Q);
     715
     716for i in [2:N]
     717
     718"Incremental Enthalpy Inner Stream"
     719        Inner.HeatTransfer.Enth(i) = (1-InletInner.v)*PP.LiquidEnthalpy(Inner.HeatTransfer.Tlocal(i), Inner.PressureDrop.Plocal(i), InletInner.z) + InletInner.v*PP.VapourEnthalpy(Inner.HeatTransfer.Tlocal(i), Inner.PressureDrop.Plocal(i), InletInner.z);
     720
     721"Incremental Enthalpy Outer Stream"
     722        Outer.HeatTransfer.Enth(i) = (1-InletOuter.v)*PP.LiquidEnthalpy(Outer.HeatTransfer.Tlocal(i), Outer.PressureDrop.Plocal(i), InletOuter.z) + InletOuter.v*PP.VapourEnthalpy(Outer.HeatTransfer.Tlocal(i), Outer.PressureDrop.Plocal(i), InletOuter.z);
     723
     724end
     725
     726#*switch HotSide
    425727
    426728        case "outer":
    427729
    428730"Energy Balance Outer Stream in counter flow"
    429                 Details.Q(1:N) = InletOuter.F*(Outer.HeatTransfer.Enth(2:Npoints) - Outer.HeatTransfer.Enth(1:N));
     731        Details.Q(1:N) = InletOuter.F*(Outer.HeatTransfer.Enth(2:Npoints) - Outer.HeatTransfer.Enth(1:N));
    430732
    431733"Energy Balance Inner Stream"
     
    439741        Details.Q(1:N) = InletInner.F*(Inner.HeatTransfer.Enth(1:N)-Inner.HeatTransfer.Enth(2:Npoints));
    440742
    441         "Energy Balance Cold Stream in counter flow"
    442                 Details.Q(1:N) = -InletOuter.F*(Outer.HeatTransfer.Enth(2:Npoints) - Outer.HeatTransfer.Enth(1:N));
    443                
     743"Energy Balance Cold Stream in counter flow"
     744        Details.Q(1:N) = -InletOuter.F*(Outer.HeatTransfer.Enth(2:Npoints) - Outer.HeatTransfer.Enth(1:N));
     745
    444746        when InletInner.T < InletOuter.T switchto "outer";
    445747
    446748end
    447 
    448 "Flow Mass Inlet Inner Stream"
    449         Inner.Properties.Inlet.Fw               =  sum(M*InletInner.z)*InletInner.F;
    450 
    451 "Flow Mass Outlet Inner Stream"
    452         Inner.Properties.Outlet.Fw              =  sum(M*OutletInner.z)*OutletInner.F;
    453 
    454 "Flow Mass Inlet Outer Stream"
    455         Outer.Properties.Inlet.Fw               =  sum(M*InletOuter.z)*InletOuter.F;
    456 
    457 "Flow Mass Outlet Outer Stream"
    458         Outer.Properties.Outlet.Fw      =  sum(M*OutletOuter.z)*OutletOuter.F;
    459 
    460 "Molar Balance Outer Stream"
    461         OutletOuter.F = InletOuter.F;
    462        
    463 "Molar Balance Inner Stream"
    464         OutletInner.F = InletInner.F;
    465 
    466 "Outer Stream Molar Fraction Constraint"
    467         OutletOuter.z=InletOuter.z;
    468        
    469 "InnerStream Molar Fraction Constraint"
    470         OutletInner.z=InletInner.z;
    471 
    472 "Total Exchange Surface Area for one segment of pipe"
    473         Details.A=Pi*DoInner*Lpipe;
    474 
    475 "Pipe Initial Length from Left to Right - OBS: Left: Always Inlet inner side"
    476         Lincr(1) = 0*'m';
    477 
    478 for i in [1:N]
    479 
    480 "Incremental Length"
    481         Lincr(i+1) = i*abs(Lpipe)/N;
    482 
    483 end
    484 
    485 for i in [1:N]
    486 
    487 switch innerFlowRegime
    488        
    489         case "laminar":
    490        
    491 "Inner Side Friction Factor for Pressure Drop - laminar Flow"
    492         Inner.PressureDrop.fi(i)*Inner.PressureDrop.Re(i) = 16;
    493        
    494         when Inner.PressureDrop.Re(i) > 2300 switchto "transition";
    495 
    496         case "transition":
    497        
    498 "using Turbulent Flow - to be implemented"
    499         (Inner.PressureDrop.fi(i)-0.0035)*(Inner.PressureDrop.Re(i)^0.42) = 0.264;
    500 
    501         when Inner.PressureDrop.Re(i) < 2300 switchto "laminar";
    502         when Inner.PressureDrop.Re(i) > 10000 switchto "turbulent";
    503 
    504         case "turbulent":
    505 
    506 "Inner Side Friction Factor - Turbulent Flow"
    507         (Inner.PressureDrop.fi(i)-0.0035)*(Inner.PressureDrop.Re(i)^0.42) = 0.264;
    508 
    509         when Inner.PressureDrop.Re(i) < 10000 switchto "transition";
    510        
    511 end     
    512 
    513 end
    514 
    515 for i in [1:N]
    516 
    517 switch outerFlowRegime
    518        
    519         case "laminar":
    520        
    521 "Outer Side Friction Factor - laminar Flow"
    522         Outer.PressureDrop.fi(i)*Outer.PressureDrop.Re(i) = 16;
    523        
    524         when Outer.PressureDrop.Re(i) > 2300 switchto "transition";
    525 
    526         case "transition":
    527        
    528 "using Turbulent Flow - Transition Flow must be implemented"
    529         (Outer.PressureDrop.fi(i)-0.0035)*(Outer.PressureDrop.Re(i)^0.42) = 0.264;
    530 
    531         when Outer.PressureDrop.Re(i) < 2300 switchto "laminar";
    532         when Outer.PressureDrop.Re(i) > 10000 switchto "turbulent";
    533 
    534         case "turbulent":
    535 
    536 "Outer Side Friction Factor - Turbulent Flow"
    537         (Outer.PressureDrop.fi(i)-0.0035)*(Outer.PressureDrop.Re(i)^0.42) = 0.264;
    538 
    539         when Outer.PressureDrop.Re(i) < 10000 switchto "transition";
    540        
    541 end
    542 
    543 end
    544 
    545 for i in [1:N]
    546 
    547 switch innerFlowRegime
    548        
    549         case "laminar":
    550        
    551 "Inner Side Friction Factor for Heat Transfer - laminar Flow"
    552         Inner.HeatTransfer.fi(i)   = 1/(0.79*ln(Inner.HeatTransfer.Re(i))-1.64)^2;
    553        
    554 switch InnerLaminarCorrelation
    555        
    556         case "Hausen":
    557 
    558 "Nusselt Number"
    559         Inner.HeatTransfer.Nu(i) = 3.665 + ((0.19*((DiInner/Lpipe)*Inner.HeatTransfer.Re(i)*Inner.HeatTransfer.PR(i))^0.8)/(1+0.117*((DiInner/Lpipe)*Inner.HeatTransfer.Re(i)*Inner.HeatTransfer.PR(i))^0.467));
    560        
    561         case "Schlunder":
    562 
    563 "Nusselt Number"
    564         Inner.HeatTransfer.Nu(i) = (49.027896+4.173281*Inner.HeatTransfer.Re(i)*Inner.HeatTransfer.PR(i)*(DiInner/Lpipe))^(1/3);
    565 
    566 end
    567        
    568         when Inner.HeatTransfer.Re(i) > 2300 switchto "transition";
    569        
    570         case "transition":
    571        
    572 "Inner Side Friction Factor for Heat Transfer - transition Flow"
    573         Inner.HeatTransfer.fi(i)   = 1/(0.79*ln(Inner.HeatTransfer.Re(i))-1.64)^2;
    574        
    575 switch InnerTransitionCorrelation
    576        
    577         case "Gnielinski":
    578        
    579 "Nusselt Number"
    580         Inner.HeatTransfer.Nu(i)*(1+(12.7*sqrt(0.125*Inner.HeatTransfer.fi(i))*((Inner.HeatTransfer.PR(i))^(2/3) -1))) = 0.125*Inner.HeatTransfer.fi(i)*(Inner.HeatTransfer.Re(i)-1000)*Inner.HeatTransfer.PR(i);
    581 
    582         case "Hausen":
    583 
    584 "Nusselt Number"
    585         Inner.HeatTransfer.Nu(i) =0.116*(Inner.HeatTransfer.Re(i)^(0.667)-125)*Inner.HeatTransfer.PR(i)^(0.333)*(1+(DiInner/Lpipe)^0.667);
    586        
    587 end
    588 
    589         when Inner.HeatTransfer.Re(i) < 2300 switchto "laminar";
    590         when Inner.HeatTransfer.Re(i) > 10000 switchto "turbulent";
    591 
    592         case "turbulent":
    593 
    594 switch InnerTurbulentCorrelation
    595        
    596         case "Petukhov":
    597        
    598 "Inner Side Friction Factor for Heat Transfer - turbulent Flow"
    599         Inner.HeatTransfer.fi(i)   = 1/(1.82*log(Inner.HeatTransfer.Re(i))-1.64)^2;
    600 
    601 "Nusselt Number"
    602         Inner.HeatTransfer.Nu(i)*(1.07+(12.7*sqrt(0.125*Inner.HeatTransfer.fi(i))*((Inner.HeatTransfer.PR(i))^(2/3) -1))) = 0.125*Inner.HeatTransfer.fi(i)*Inner.HeatTransfer.Re(i)*Inner.HeatTransfer.PR(i);
    603        
    604         case "SiederTate":
    605 
    606 "Nusselt Number"
    607         Inner.HeatTransfer.Nu(i) = 0.027*(Inner.HeatTransfer.PR(i))^(1/3)*(Inner.HeatTransfer.Re(i))^(4/5);
    608 
    609 "Inner Side Friction Factor for Heat Transfer - turbulent Flow"
    610         Inner.HeatTransfer.fi(i)   = 1/(1.82*log(Inner.HeatTransfer.Re(i))-1.64)^2;
    611        
    612 end
    613        
    614         when Inner.HeatTransfer.Re(i) < 10000 switchto "transition";
    615        
    616 end
    617 
    618 end
    619 
    620 for i in [1:N]
    621 
    622 switch outerFlowRegime
    623        
    624         case "laminar":
    625        
    626 "Outer Side Friction Factor for Heat Transfer - laminar Flow"
    627         Outer.HeatTransfer.fi(i)   = 1/(0.79*ln(Outer.HeatTransfer.Re(i))-1.64)^2;
    628        
    629 switch OuterLaminarCorrelation
    630        
    631         case "Hausen":
    632 
    633 "Nusselt Number"
    634         Outer.HeatTransfer.Nu(i) = 3.665 + ((0.19*((Outer.HeatTransfer.Dh/Lpipe)*Outer.HeatTransfer.Re(i)*Outer.HeatTransfer.PR(i))^0.8)/(1+0.117*((Outer.HeatTransfer.Dh/Lpipe)*Outer.HeatTransfer.Re(i)*Outer.HeatTransfer.PR(i))^0.467));
    635        
    636         case "Schlunder":
    637 
    638 "Nusselt Number"
    639         Outer.HeatTransfer.Nu(i) = (49.027896+4.173281*Outer.HeatTransfer.Re(i)*Outer.HeatTransfer.PR(i)*(Outer.HeatTransfer.Dh/Lpipe))^(1/3);
    640 
    641 end
    642        
    643         when Outer.HeatTransfer.Re(i) > 2300 switchto "transition";
    644        
    645         case "transition":
    646        
    647 switch OuterTransitionCorrelation
    648        
    649         case "Gnielinski":
    650 
    651 "Outer Side Friction Factor for Heat Transfer - transition Flow"
    652         Outer.HeatTransfer.fi(i)   = 1/(0.79*ln(Outer.HeatTransfer.Re(i))-1.64)^2;
    653 
    654 "Nusselt Number"
    655         Outer.HeatTransfer.Nu(i)*(1+(12.7*sqrt(0.125*Outer.HeatTransfer.fi(i))*((Outer.HeatTransfer.PR(i))^(2/3) -1))) = 0.125*Outer.HeatTransfer.fi(i)*(Outer.HeatTransfer.Re(i)-1000)*Outer.HeatTransfer.PR(i);
    656 
    657         case "Hausen":
    658 
    659 "Nusselt Number"
    660         Outer.HeatTransfer.Nu(i) =      0.116*(Outer.HeatTransfer.Re(i)^(0.667)-125)*Outer.HeatTransfer.PR(i)^(0.333)*(1+(Outer.HeatTransfer.Dh/Lpipe)^0.667);
    661 
    662 
    663 "Outer Side Friction Factor for Heat Transfer - transition Flow"
    664         Outer.HeatTransfer.fi(i)   = 1/(0.79*ln(Outer.HeatTransfer.Re(i))-1.64)^2;
    665        
    666 end
    667        
    668         when Outer.HeatTransfer.Re(i) < 2300 switchto "laminar";
    669         when Outer.HeatTransfer.Re(i) > 10000 switchto "turbulent";
    670        
    671         case "turbulent":
    672        
    673 switch OuterTurbulentCorrelation
    674        
    675         case "Petukhov":
    676 
    677 "Outer Side Friction Factor for Heat Transfer - turbulent Flow"
    678         Outer.HeatTransfer.fi(i)   = 1/(1.82*log(Outer.HeatTransfer.Re(i))-1.64)^2;
    679        
    680 "Nusselt Number"
    681         Outer.HeatTransfer.Nu(i)*(1.07+(12.7*sqrt(0.125*Outer.HeatTransfer.fi(i))*((Outer.HeatTransfer.PR(i))^(2/3) -1))) = 0.125*Outer.HeatTransfer.fi(i)*Outer.HeatTransfer.Re(i)*Outer.HeatTransfer.PR(i);
    682        
    683         case "SiederTate":
    684 
    685 "Nusselt Number"
    686         Outer.HeatTransfer.Nu(i) = 0.027*(Outer.HeatTransfer.PR(i))^(1/3)*(Outer.HeatTransfer.Re(i))^(4/5);
    687 
    688 "Outer Side Friction Factor for Heat Transfer - turbulent Flow"
    689         Outer.HeatTransfer.fi(i)   = 1/(1.82*log(Outer.HeatTransfer.Re(i))-1.64)^2;
    690        
    691 end
    692 
    693         when Outer.HeatTransfer.Re(i) < 10000 switchto "transition";
    694 
    695 end
    696 
    697 end
    698 
    699 "Inner Pipe Film Coefficient"
    700         Inner.HeatTransfer.hcoeff = (Inner.HeatTransfer.Nu*Inner.Properties.Average.K/DiInner)*Inner.HeatTransfer.Phi;
    701 
    702 "Outer Pipe Film Coefficient"
    703         Outer.HeatTransfer.hcoeff= (Outer.HeatTransfer.Nu*Outer.Properties.Average.K/Outer.HeatTransfer.Dh)*Outer.HeatTransfer.Phi;
    704 
    705 "Outer Pipe Phi correction"
    706         Outer.HeatTransfer.Phi = (Outer.Properties.Average.Mu/Outer.Properties.Wall.Mu)^0.14;
    707        
    708 "Inner Pipe Phi correction"
    709         Inner.HeatTransfer.Phi  = (Inner.Properties.Average.Mu/Inner.Properties.Wall.Mu)^0.14;
    710 
    711 "Outer Pipe Prandtl Number"
    712         Outer.HeatTransfer.PR = ((Outer.Properties.Average.Cp/Outer.Properties.Average.Mw)*Outer.Properties.Average.Mu)/Outer.Properties.Average.K;
    713 
    714 "Inner Pipe Prandtl Number"
    715         Inner.HeatTransfer.PR = ((Inner.Properties.Average.Cp/Inner.Properties.Average.Mw)*Inner.Properties.Average.Mu)/Inner.Properties.Average.K;
    716 
    717 "Outer Pipe Reynolds Number for Heat Transfer"
    718         Outer.HeatTransfer.Re = (Outer.Properties.Average.rho*Outer.HeatTransfer.Vmean*Outer.HeatTransfer.Dh)/Outer.Properties.Average.Mu;
    719 
    720 "Outer Pipe Reynolds Number for Pressure Drop"
    721         Outer.PressureDrop.Re = (Outer.Properties.Average.rho*Outer.HeatTransfer.Vmean*Outer.PressureDrop.Dh)/Outer.Properties.Average.Mu;
    722 
    723 "Inner Pipe Reynolds Number for Heat Transfer"
    724         Inner.HeatTransfer.Re = (Inner.Properties.Average.rho*Inner.HeatTransfer.Vmean*Inner.HeatTransfer.Dh)/Inner.Properties.Average.Mu;
    725 
    726 "Inner Pipe Reynolds Number for Pressure Drop"
    727         Inner.PressureDrop.Re = Inner.HeatTransfer.Re;
    728 
    729 "Outer Pipe Velocity"
    730         Outer.HeatTransfer.Vmean*(Outer.HeatTransfer.As*Outer.Properties.Average.rho)  = Outer.Properties.Inlet.Fw;
    731 
    732 "Inner Pipe Velocity"
    733         Inner.HeatTransfer.Vmean*(Inner.HeatTransfer.As*Inner.Properties.Average.rho)  = Inner.Properties.Inlet.Fw;
    734 
    735 "Overall Heat Transfer Coefficient Clean"
    736         Details.Uc*((DoInner/(Inner.HeatTransfer.hcoeff*DiInner) )+(DoInner*ln(DoInner/DiInner)/(2*Kwall))+(1/(Outer.HeatTransfer.hcoeff)))=1;
    737 
    738 "Overall Heat Transfer Coefficient Dirty"
    739         Details.Ud=1/(Rfi*(DoInner/DiInner) +  Rfo + (DoInner/(Inner.HeatTransfer.hcoeff*DiInner) )+(DoInner*ln(DoInner/DiInner)/(2*Kwall))+(1/(Outer.HeatTransfer.hcoeff)));
    740 
    741 "Total Duty"
    742         Details.Qtotal = sum(Details.Q);
    743749
    744750switch HotSide
     
    748754"Incremental Duty"
    749755        Details.Q = Details.Ud*Pi*DoInner*(Lpipe/N)*(Outer.Properties.Average.T - Inner.Properties.Average.T);
    750         #Details.Q = 1.30; good approach
    751756
    752757        when InletInner.T > InletOuter.T switchto "inner";
     
    761766end
    762767
    763 for i in [2:N]
    764 
    765 "Incremental Enthalpy Inner Stream"
    766         Inner.HeatTransfer.Enth(i) = (1-InletInner.v)*PP.LiquidEnthalpy(Inner.HeatTransfer.Tlocal(i), Inner.PressureDrop.Plocal(i), InletInner.z) + InletInner.v*PP.VapourEnthalpy(Inner.HeatTransfer.Tlocal(i), Inner.PressureDrop.Plocal(i), InletInner.z);
    767 
    768 "Incremental Enthalpy Outer Stream"
    769         Outer.HeatTransfer.Enth(i) = (1-InletOuter.v)*PP.LiquidEnthalpy(Outer.HeatTransfer.Tlocal(i), Outer.PressureDrop.Plocal(i), InletOuter.z) + InletOuter.v*PP.VapourEnthalpy(Outer.HeatTransfer.Tlocal(i), Outer.PressureDrop.Plocal(i), InletOuter.z);
    770 
    771 end
    772 
    773768"Enthalpy of Inner Side - Inlet Boundary"
    774769        Inner.HeatTransfer.Enth(1) = InletInner.h;
     
    806801"Pressure of Outer Side - Outlet Boundary"
    807802        Outer.PressureDrop.Plocal(1) = OutletOuter.P;
    808 
    809 "Total Pressure Drop Outer Stream"
    810         Outer.PressureDrop.Pdrop  = 0*'kPa';#Outer.PressureDrop.Pd_fric(1)+Outer.PressureDrop.Pdnozzle_in+Outer.PressureDrop.Pdnozzle_out;
    811803
    812804for i in [1:N]
     
    828820end
    829821
    830 "Total Pressure Drop Inner Stream"
    831         Inner.PressureDrop.Pdrop  = 0*'kPa';#Inner.PressureDrop.Pd_fric(Npoints)+Inner.PressureDrop.Pdnozzle_in+Inner.PressureDrop.Pdnozzle_out;
    832        
    833822"Inner Pipe Pressure Drop for friction"
    834823        Inner.PressureDrop.Pd_fric(2:Npoints) = (2*Inner.PressureDrop.fi*Lincr(2:Npoints)*Inner.Properties.Average.rho*Inner.HeatTransfer.Vmean^2)/(DiInner*Inner.HeatTransfer.Phi);
     
    843832        Inner.PressureDrop.Plocal(i+1) =        InletInner.P;
    844833
    845 end
    846 
    847 
    848 "Velocity Inner Side Inlet Nozzle"
    849         Inner.PressureDrop.Vnozzle_in   = Inner.Properties.Inlet.Fw/(Inner.Properties.Inlet.rho*(0.25*Pi*Dinozzle_Inner^2));
    850 
    851 "Velocity Inner Side Outlet Nozzle"
    852         Inner.PressureDrop.Vnozzle_out  = Inner.Properties.Outlet.Fw/(Inner.Properties.Outlet.rho*(0.25*Pi*Donozzle_Inner^2));
    853 
    854 "Velocity Outer Side Inlet Nozzle"
    855         Outer.PressureDrop.Vnozzle_in   = Outer.Properties.Inlet.Fw/(Outer.Properties.Inlet.rho*(0.25*Pi*Dinozzle_Outer^2));
    856 
    857 "Velocity Outer Side Outlet Nozzle"
    858         Outer.PressureDrop.Vnozzle_out  = Outer.Properties.Outlet.Fw/(Outer.Properties.Outlet.rho*(0.25*Pi*Donozzle_Outer^2));
    859 
    860 "Pressure Drop Inner Side Inlet Nozzle"
    861         Inner.PressureDrop.Pdnozzle_in  = 0.5*InnerKinlet*Inner.Properties.Inlet.rho*Inner.PressureDrop.Vnozzle_in^2;
    862 
    863 "Pressure Drop Inner Side Outlet Nozzle"
    864         Inner.PressureDrop.Pdnozzle_out = 0.5*InnerKoutlet*Inner.Properties.Outlet.rho*Inner.PressureDrop.Vnozzle_out^2;
    865 
    866 "Pressure Drop Outer Side Inlet Nozzle"
    867         Outer.PressureDrop.Pdnozzle_in  = 0.5*OuterKinlet*Outer.Properties.Inlet.rho*Outer.PressureDrop.Vnozzle_in^2;
    868 
    869 "Pressure Drop Outer Side Outlet Nozzle"
    870         Outer.PressureDrop.Pdnozzle_out = 0.5*OuterKoutlet*Outer.Properties.Outlet.rho*Outer.PressureDrop.Vnozzle_out^2;
    871 
    872 "Inner Side Inlet Nozzle rho-V^2"
    873         Inner.PressureDrop.RVsquare_in = Inner.Properties.Inlet.rho*(Inner.PressureDrop.Vnozzle_in)^2;
    874 
    875 "Inner Side Outlet Nozzle rho-V^2"
    876         Inner.PressureDrop.RVsquare_out = Inner.Properties.Outlet.rho*(Inner.PressureDrop.Vnozzle_out)^2;
    877 
    878 "Outer Side Inlet Nozzle rho-V^2"
    879         Outer.PressureDrop.RVsquare_in = Outer.Properties.Inlet.rho*(Outer.PressureDrop.Vnozzle_in)^2;
    880 
    881 "Outer Side Outlet Nozzle rho-V^2"
    882         Outer.PressureDrop.RVsquare_out = Outer.Properties.Outlet.rho*(Outer.PressureDrop.Vnozzle_out)^2;
     834end*#
     835
     836end
     837
     838Model UpperPipe_basic as HairpinIncr_basic
     839
     840ATTRIBUTES
     841        Pallete         = false;
     842        Brief           = "Incremental Hairpin Heat Exchanger. ";
     843        Info            =
     844"Incremental approach for Hairpin heat exchanger. ";
     845
     846PARAMETERS
     847
     848outer PP                as Plugin               (Brief="External Physical Properties", Type="PP");
     849outer NComp     as Integer      (Brief="Number of Components");
     850        HotSide         as Switcher     (Brief="Flag for Fluid Alocation ",Valid=["outer","inner"],Default="outer");
     851
     852        Pi                              as constant     (Brief="Pi Number",Default=3.14159265, Symbol = "\pi");
     853outer   N       as Integer      (Brief="Number of zones", Default = 2);
     854 Npoints                as Integer      (Brief="Number of incremental points", Default = 3);
     855       
     856
     857outer   DoInner         as length                       (Brief="Outside Diameter of Inner Pipe",Lower=1e-6);
     858outer   DiInner         as length                       (Brief="Inside Diameter of Inner Pipe",Lower=1e-10);
     859outer   DiOuter         as length                       (Brief="Inside Diameter of Outer pipe",Lower=1e-10);
     860outer   Lpipe           as length                       (Brief="Effective Tube Length of one segment of Pipe",Lower=0.1, Symbol = "L_{pipe}");
     861outer   Kwall           as conductivity         (Brief="Tube Wall Material Thermal Conductivity",Default=1.0, Symbol = "K_{wall}");
     862outer   Rfi                     as positive             (Brief="Inside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
     863outer   Rfo                     as positive             (Brief="Outside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
     864
     865#Donozzle_Inner  as length      (Brief="Inner Side Outlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     866#Dinozzle_Inner         as length       (Brief="Inner Side Inlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     867
     868#Donozzle_Outer  as length              (Brief="Outer Side Outlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     869#Dinozzle_Outer         as length               (Brief="Outer Side Inlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     870
     871#InnerKinlet    as positive                     (Brief="Inner Side Inlet Nozzle Pressure Loss Coeff",Default=1.1);
     872#InnerKoutlet   as positive                     (Brief="Inner Side Outlet Nozzle Pressure Loss Coeff",Default=0.7);
     873
     874#OuterKinlet            as positive             (Brief="Outer Side Inlet Nozzle Pressure Loss Coeff",Default=1.1);
     875#OuterKoutlet   as positive             (Brief="Outer Side Outlet Nozzle Pressure Loss Coeff",Default=0.7);
     876
     877SET
     878
     879#"Pi Number"
     880        Pi      = 3.14159265;
     881
     882#"Number of incremental points"
     883        Npoints  = N+1;
     884
     885EQUATIONS
     886
     887switch HotSide
     888
     889        case "outer":
     890
     891"Energy Balance Outer Stream in counter flow"
     892        Details.Q(1:N) = InletOuter.F*(Outer.HeatTransfer.Enth(2:Npoints) - Outer.HeatTransfer.Enth(1:N));
     893
     894"Energy Balance Inner Stream"
     895        Details.Q(1:N) = -InletInner.F*(Inner.HeatTransfer.Enth(1:N)    -       Inner.HeatTransfer.Enth(2:Npoints));
     896
     897"Incremental Duty"
     898        Details.Q = Details.Ud*Pi*DoInner*(Lpipe/N)*(Outer.Properties.Average.T - Inner.Properties.Average.T);
     899        #Details.Q = 0.6;
     900       
     901        when InletInner.T > InletOuter.T switchto "inner";
     902
     903        case "inner":
     904
     905"Energy Balance Hot Stream"
     906        Details.Q(1:N) = InletInner.F*(Inner.HeatTransfer.Enth(1:N)-Inner.HeatTransfer.Enth(2:Npoints));
     907
     908"Energy Balance Cold Stream in counter flow"
     909        Details.Q(1:N) = -InletOuter.F*(Outer.HeatTransfer.Enth(2:Npoints) - Outer.HeatTransfer.Enth(1:N));
     910       
     911"Incremental Duty"
     912        Details.Q = Details.Ud*Pi*DoInner*(Lpipe/N)*(Inner.Properties.Average.T - Outer.Properties.Average.T);
     913       
     914        when InletInner.T < InletOuter.T switchto "outer";
     915
     916end
     917
     918"Enthalpy of Inner Side - Inlet Boundary"
     919        Inner.HeatTransfer.Enth(1) = InletInner.h;
     920
     921"Enthalpy of inner Side - Outlet Boundary"
     922        Inner.HeatTransfer.Enth(Npoints) = OutletInner.h;
     923
     924"Temperature of Inner Side - Inlet Boundary"
     925        Inner.HeatTransfer.Tlocal(1) = InletInner.T;
     926
     927"Temperature of Inner Side - Outlet Boundary"
     928        Inner.HeatTransfer.Tlocal(Npoints) = OutletInner.T;
     929
     930"Pressure of Inner Side - Inlet Boundary"
     931        Inner.PressureDrop.Plocal(1) = InletInner.P;
     932
     933"Pressure of Inner Side - Outlet Boundary"
     934        Inner.PressureDrop.Plocal(Npoints) = OutletInner.P;
     935
     936"Enthalpy of Outer Side - Inlet Boundary"
     937        Outer.HeatTransfer.Enth(Npoints) = InletOuter.h;
     938
     939"Enthalpy of Outer Side - Outlet Boundary"
     940        Outer.HeatTransfer.Enth(1) = OutletOuter.h;
     941
     942"Temperature of Outer Side - Inlet Boundary"
     943        Outer.HeatTransfer.Tlocal(Npoints) = InletOuter.T;
     944
     945"Temperature of Outer Side - Outlet Boundary"
     946        Outer.HeatTransfer.Tlocal(1) = OutletOuter.T;
     947
     948"Pressure of Outer Side - Inlet Boundary"
     949        Outer.PressureDrop.Plocal(Npoints) = InletOuter.P;
     950
     951"Pressure of Outer Side - Outlet Boundary"
     952        Outer.PressureDrop.Plocal(1) = OutletOuter.P;
     953
     954#for i in [1:N]
     955
     956#"Outer Pipe Pressure Drop for friction"                       
     957#       Outer.PressureDrop.Pd_fric(i) = (2*Outer.PressureDrop.fi(i)*Lincr(1+N-i)*Outer.Properties.Average.rho(i)*Outer.HeatTransfer.Vmean(i)^2)/(Outer.PressureDrop.Dh*Outer.HeatTransfer.Phi(i));
     958
     959#end
     960
     961#"Outer Pipe Pressure Drop for friction"
     962#       Outer.PressureDrop.Pd_fric(Npoints) = 0*'kPa';
     963
     964for i in [1:N]
     965   
     966"Outer Pipe Local Pressure"# FIXME: NOZZLE PRESSURE DROP MUST BE ADDED
     967        #Outer.PressureDrop.Plocal(i) = Outer.PressureDrop.Plocal(Npoints) - Outer.PressureDrop.Pd_fric(i+1);
     968        Outer.PressureDrop.Plocal(i) =  InletOuter.P;
     969
     970end
     971
     972#"Inner Pipe Pressure Drop for friction"
     973#       Inner.PressureDrop.Pd_fric(2:Npoints) = (2*Inner.PressureDrop.fi*Lincr(2:Npoints)*Inner.Properties.Average.rho*Inner.HeatTransfer.Vmean^2)/(DiInner*Inner.HeatTransfer.Phi);
     974
     975#"Inner Pipe Pressure Drop for friction"
     976#       Inner.PressureDrop.Pd_fric(1) = 0*'kPa';
     977
     978for i in [1:N]
     979
     980"Inner Pipe Local Pressure"# FIXME: NOZZLE PRESSURE DROP MUST BE ADDED
     981#       Inner.PressureDrop.Plocal(i+1) =        Inner.PressureDrop.Plocal(1) - Inner.PressureDrop.Pd_fric(i+1);
     982        Inner.PressureDrop.Plocal(i+1) =        InletInner.P;
     983
     984end
     985
     986end
     987
     988Model LowerPipe_basic as HairpinIncr_basic
     989
     990ATTRIBUTES
     991        Pallete         = false;
     992        Brief           = "Incremental Hairpin Heat Exchanger. ";
     993        Info            =
     994"Incremental approach for Hairpin heat exchanger. ";
     995
     996PARAMETERS
     997
     998outer PP                as Plugin               (Brief="External Physical Properties", Type="PP");
     999outer NComp     as Integer      (Brief="Number of Components");
     1000        HotSide         as Switcher     (Brief="Flag for Fluid Alocation ",Valid=["outer","inner"],Default="outer");
     1001
     1002        Pi                              as constant     (Brief="Pi Number",Default=3.14159265, Symbol = "\pi");
     1003outer   N       as Integer      (Brief="Number of zones", Default = 2);
     1004 Npoints                as Integer      (Brief="Number of incremental points", Default = 3);
     1005       
     1006
     1007outer   DoInner         as length                       (Brief="Outside Diameter of Inner Pipe",Lower=1e-6);
     1008outer   DiInner         as length                       (Brief="Inside Diameter of Inner Pipe",Lower=1e-10);
     1009outer   DiOuter         as length                       (Brief="Inside Diameter of Outer pipe",Lower=1e-10);
     1010outer   Lpipe           as length                       (Brief="Effective Tube Length of one segment of Pipe",Lower=0.1, Symbol = "L_{pipe}");
     1011outer   Kwall           as conductivity         (Brief="Tube Wall Material Thermal Conductivity",Default=1.0, Symbol = "K_{wall}");
     1012outer   Rfi                     as positive             (Brief="Inside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
     1013outer   Rfo                     as positive             (Brief="Outside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
     1014
     1015#Donozzle_Inner  as length      (Brief="Inner Side Outlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     1016#Dinozzle_Inner         as length       (Brief="Inner Side Inlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     1017
     1018#Donozzle_Outer  as length              (Brief="Outer Side Outlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     1019#Dinozzle_Outer         as length               (Brief="Outer Side Inlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
     1020
     1021#InnerKinlet    as positive                     (Brief="Inner Side Inlet Nozzle Pressure Loss Coeff",Default=1.1);
     1022#InnerKoutlet   as positive                     (Brief="Inner Side Outlet Nozzle Pressure Loss Coeff",Default=0.7);
     1023
     1024#OuterKinlet            as positive             (Brief="Outer Side Inlet Nozzle Pressure Loss Coeff",Default=1.1);
     1025#OuterKoutlet   as positive             (Brief="Outer Side Outlet Nozzle Pressure Loss Coeff",Default=0.7);
     1026
     1027SET
     1028
     1029#"Pi Number"
     1030        Pi      = 3.14159265;
     1031
     1032#"Number of incremental points"
     1033        Npoints  = N+1;
     1034
     1035EQUATIONS
     1036
     1037switch HotSide
     1038
     1039        case "outer":
     1040
     1041"Energy Balance Outer Stream in counter flow"
     1042        Details.Q(1:N) = InletOuter.F*(Outer.HeatTransfer.Enth(1:N) - Outer.HeatTransfer.Enth(2:Npoints));
     1043
     1044"Energy Balance Inner Stream"
     1045        Details.Q(1:N) = -InletInner.F*(Inner.HeatTransfer.Enth(2:Npoints)      -       Inner.HeatTransfer.Enth(1:N));
     1046
     1047"Incremental Duty"
     1048        Details.Q = Details.Ud*Pi*DoInner*(Lpipe/N)*(Outer.Properties.Average.T - Inner.Properties.Average.T);
     1049        #Details.Q = 0.6;
     1050       
     1051        when InletInner.T > InletOuter.T switchto "inner";
     1052
     1053        case "inner":
     1054
     1055"Energy Balance Hot Stream"
     1056        Details.Q(1:N) = InletInner.F*(Inner.HeatTransfer.Enth(2:Npoints)-Inner.HeatTransfer.Enth(1:N));
     1057
     1058"Energy Balance Cold Stream in counter flow"
     1059        Details.Q(1:N) = -InletOuter.F*(Outer.HeatTransfer.Enth(1:N) - Outer.HeatTransfer.Enth(2:Npoints));
     1060       
     1061"Incremental Duty"
     1062        Details.Q = Details.Ud*Pi*DoInner*(Lpipe/N)*(Inner.Properties.Average.T - Outer.Properties.Average.T);
     1063       
     1064        when InletInner.T < InletOuter.T switchto "outer";
     1065
     1066end
     1067
     1068"Enthalpy of Inner Side - Inlet Boundary"
     1069        Outer.HeatTransfer.Enth(1) = InletOuter.h;
     1070
     1071"Enthalpy of inner Side - Outlet Boundary"
     1072        Outer.HeatTransfer.Enth(Npoints) = OutletOuter.h;
     1073
     1074"Temperature of Inner Side - Inlet Boundary"
     1075        Outer.HeatTransfer.Tlocal(1) = InletOuter.T;
     1076
     1077"Temperature of Inner Side - Outlet Boundary"
     1078        Outer.HeatTransfer.Tlocal(Npoints) = OutletOuter.T;
     1079
     1080"Pressure of Inner Side - Inlet Boundary"
     1081        Outer.PressureDrop.Plocal(1) = InletOuter.P;
     1082
     1083"Pressure of Inner Side - Outlet Boundary"
     1084        Outer.PressureDrop.Plocal(Npoints) = OutletOuter.P;
     1085
     1086"Enthalpy of Outer Side - Inlet Boundary"
     1087        Inner.HeatTransfer.Enth(Npoints) = InletInner.h;
     1088
     1089"Enthalpy of Outer Side - Outlet Boundary"
     1090        Inner.HeatTransfer.Enth(1) = OutletInner.h;
     1091
     1092"Temperature of Outer Side - Inlet Boundary"
     1093        Inner.HeatTransfer.Tlocal(Npoints) = InletInner.T;
     1094
     1095"Temperature of Outer Side - Outlet Boundary"
     1096        Inner.HeatTransfer.Tlocal(1) = OutletInner.T;
     1097
     1098"Pressure of Outer Side - Inlet Boundary"
     1099        Inner.PressureDrop.Plocal(Npoints) = InletInner.P;
     1100
     1101"Pressure of Outer Side - Outlet Boundary"
     1102        Inner.PressureDrop.Plocal(1) = OutletInner.P;
     1103
     1104#for i in [1:N]
     1105
     1106#"Outer Pipe Pressure Drop for friction"                       
     1107#       Inner.PressureDrop.Pd_fric(i) = (2*Inner.PressureDrop.fi(i)*Lincr(1+N-i)*Inner.Properties.Average.rho(i)*Inner.HeatTransfer.Vmean(i)^2)/(DiInner*Inner.HeatTransfer.Phi(i));
     1108
     1109#end
     1110
     1111#"Outer Pipe Pressure Drop for friction"
     1112        #Inner.PressureDrop.Pd_fric(Npoints) = 0*'kPa';
     1113
     1114for i in [1:N]
     1115   
     1116"Outer Pipe Local Pressure"# FIXME: NOZZLE PRESSURE DROP MUST BE ADDED
     1117        #Outer.PressureDrop.Plocal(i) = Outer.PressureDrop.Plocal(Npoints) - Outer.PressureDrop.Pd_fric(i+1);
     1118        Inner.PressureDrop.Plocal(i) =  InletInner.P;
     1119
     1120end
     1121
     1122#"Inner Pipe Pressure Drop for friction"
     1123        #Outer.PressureDrop.Pd_fric(2:Npoints) = (2*Outer.PressureDrop.fi*Lincr(2:Npoints)*Outer.Properties.Average.rho*Outer.HeatTransfer.Vmean^2)/(Outer.PressureDrop.Dh*Outer.HeatTransfer.Phi);
     1124
     1125#"Inner Pipe Pressure Drop for friction"
     1126        #Outer.PressureDrop.Pd_fric(1) = 0*'kPa';
     1127
     1128for i in [1:N]
     1129
     1130"Inner Pipe Local Pressure"# FIXME: NOZZLE PRESSURE DROP MUST BE ADDED
     1131#       Inner.PressureDrop.Plocal(i+1) =        Inner.PressureDrop.Plocal(1) - Inner.PressureDrop.Pd_fric(i+1);
     1132        Outer.PressureDrop.Plocal(i+1) =        InletOuter.P;
     1133
     1134end
    8831135
    8841136end
     
    8981150outer NComp     as Integer      (Brief="Number of Components");
    8991151        N                                       as Integer      (Brief="Number of zones", Default = 2);
    900  Npoints                        as Integer      (Brief="Number of incremental points", Default = 3);
    901        
     1152       
    9021153
    9031154DoInner         as length                       (Brief="Outside Diameter of Inner Pipe",Lower=1e-6);
    904 DiInner as length                       (Brief="Inside Diameter of Inner Pipe",Lower=1e-10);
    905 DiOuter as length                       (Brief="Inside Diameter of Outer pipe",Lower=1e-10);
     1155DiInner         as length                       (Brief="Inside Diameter of Inner Pipe",Lower=1e-10);
     1156DiOuter         as length                       (Brief="Inside Diameter of Outer pipe",Lower=1e-10);
    9061157Lpipe           as length                       (Brief="Effective Tube Length of one segment of Pipe",Lower=0.1, Symbol = "L_{pipe}");
    9071158Kwall           as conductivity         (Brief="Tube Wall Material Thermal Conductivity",Default=1.0, Symbol = "K_{wall}");
    908 Rfi                     as positive                     (Brief="Inside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
    909 Rfo                     as positive                     (Brief="Outside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
    910 
    911 Donozzle_Inner  as length       (Brief="Inner Side Outlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
    912 Dinozzle_Inner          as length       (Brief="Inner Side Inlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
    913 
    914 Donozzle_Outer  as length               (Brief="Outer Side Outlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
    915 Dinozzle_Outer  as length               (Brief="Outer Side Inlet Nozzle Diameter",Default = 0.036,Lower=10e-6);
    916 
    917 SET
    918 
    919 #"Number of incremental points"
    920         Npoints  = N+1;
     1159Rfi                     as positive             (Brief="Inside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
     1160Rfo                     as positive             (Brief="Outside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
     1161
    9211162
    9221163VARIABLES
    9231164
    924         UpperPipe       as HairpinIncr_basic;
    925         LowerPipe       as HairpinIncr_basic;
     1165#InnerPdrop             as press_delta  (Brief="Total Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa', Symbol ="\Delta P");
     1166#OuterPdrop             as press_delta  (Brief="Total Pressure Drop",Default=0.01, Lower=0,DisplayUnit='kPa', Symbol ="\Delta P");
     1167A                               as area                         (Brief="Total Exchange Surface Area");
     1168Qtotal          as power                        (Brief="Total Duty", Default=7000, Lower=1e-8, Upper=1e10);
     1169
     1170        UpperPipe       as UpperPipe_basic;
     1171        LowerPipe       as LowerPipe_basic;
    9261172
    9271173CONNECTIONS
    9281174
    929         UpperPipe.OutletInner           to LowerPipe.InletInner;
    930         LowerPipe.OutletOuter           to UpperPipe.InletOuter;
    931        
    932 end
     1175        LowerPipe.OutletInner           to UpperPipe.InletInner;
     1176        UpperPipe.OutletOuter           to LowerPipe.InletOuter;
     1177
     1178EQUATIONS
     1179
     1180A = LowerPipe.Details.A+UpperPipe.Details.A;
     1181
     1182Qtotal = LowerPipe.Details.Qtotal+UpperPipe.Details.Qtotal;
     1183
     1184#*OuterPdrop = LowerPipe.Outer.PressureDrop.Pdrop+UpperPipe.Outer.PressureDrop.Pdrop;
     1185
     1186#InnerPdrop = LowerPipe.Inner.PressureDrop.Pdrop+UpperPipe.Inner.PressureDrop.Pdrop;
     1187
     1188
     1189
     1190"Lower Pipe Total Pressure Drop Outer Stream"
     1191        LowerPipe.Outer.PressureDrop.Pdrop  = 0.1;#LowerPipe.Outer.PressureDrop.Pd_fric(1)+LowerPipe.Outer.PressureDrop.Pdnozzle_in;
     1192
     1193"Upper Pipe Total Pressure Drop Outer Stream"
     1194        UpperPipe.Outer.PressureDrop.Pdrop  = 0.1;#UpperPipe.Outer.PressureDrop.Pd_fric(1)+UpperPipe.Outer.PressureDrop.Pdnozzle_out;
     1195
     1196"Upper Pipe Total Pressure Drop Inner Stream"
     1197        UpperPipe.Inner.PressureDrop.Pdrop  = 0.1;#UpperPipe.Inner.PressureDrop.Pd_fric(Npoints)+UpperPipe.Inner.PressureDrop.Pdnozzle_in;
     1198
     1199"Lower Pipe Total Pressure Drop Inner Stream"
     1200        LowerPipe.Inner.PressureDrop.Pdrop  = 0.1;#LowerPipe.Inner.PressureDrop.Pd_fric(Npoints)+LowerPipe.Inner.PressureDrop.Pdnozzle_out;
     1201#*
     1202"Velocity Inner Side Inlet Nozzle"
     1203        UpperPipe.Inner.PressureDrop.Vnozzle_in = UpperPipe.Inner.Properties.Inlet.Fw/(UpperPipe.Inner.Properties.Inlet.rho*(0.25*Pi*Dinozzle_Inner^2));
     1204
     1205"Velocity Inner Side Outlet Nozzle"
     1206        LowerPipe.Inner.PressureDrop.Vnozzle_out        = LowerPipe.Inner.Properties.Outlet.Fw/(LowerPipe.Inner.Properties.Outlet.rho*(0.25*Pi*Donozzle_Inner^2));
     1207
     1208"Velocity Outer Side Inlet Nozzle"
     1209        LowerPipe.Outer.PressureDrop.Vnozzle_in = LowerPipe.Outer.Properties.Inlet.Fw/(LowerPipe.Outer.Properties.Inlet.rho*(0.25*Pi*Dinozzle_Outer^2));
     1210
     1211"Velocity Outer Side Outlet Nozzle"
     1212        UpperPipe.Outer.PressureDrop.Vnozzle_out        = UpperPipe.Outer.Properties.Outlet.Fw/(UpperPipe.Outer.Properties.Outlet.rho*(0.25*Pi*Donozzle_Outer^2));
     1213
     1214"Pressure Drop Inner Side Inlet Nozzle"
     1215        UpperPipe.Inner.PressureDrop.Pdnozzle_in        = 0.5*InnerKinlet*UpperPipe.Inner.Properties.Inlet.rho*UpperPipe.Inner.PressureDrop.Vnozzle_in^2;
     1216
     1217"Pressure Drop Inner Side Outlet Nozzle"
     1218        LowerPipe.Inner.PressureDrop.Pdnozzle_out       = 0.5*InnerKoutlet*LowerPipe.Inner.Properties.Outlet.rho*LowerPipe.Inner.PressureDrop.Vnozzle_out^2;
     1219
     1220"Pressure Drop Outer Side Inlet Nozzle"
     1221        LowerPipe.Outer.PressureDrop.Pdnozzle_in        = 0.5*OuterKinlet*LowerPipe.Outer.Properties.Inlet.rho*LowerPipe.Outer.PressureDrop.Vnozzle_in^2;
     1222
     1223"Pressure Drop Outer Side Outlet Nozzle"
     1224        UpperPipe.Outer.PressureDrop.Pdnozzle_out       = 0.5*OuterKoutlet*UpperPipe.Outer.Properties.Outlet.rho*UpperPipe.Outer.PressureDrop.Vnozzle_out^2;
     1225
     1226"Inner Side Inlet Nozzle rho-V^2"
     1227        UpperPipe.Inner.PressureDrop.RVsquare_in = UpperPipe.Inner.Properties.Inlet.rho*(UpperPipe.Inner.PressureDrop.Vnozzle_in)^2;
     1228
     1229"Inner Side Outlet Nozzle rho-V^2"
     1230        LowerPipe.Inner.PressureDrop.RVsquare_out = LowerPipe.Inner.Properties.Outlet.rho*(LowerPipe.Inner.PressureDrop.Vnozzle_out)^2;
     1231
     1232"Outer Side Inlet Nozzle rho-V^2"
     1233        LowerPipe.Outer.PressureDrop.RVsquare_in = LowerPipe.Outer.Properties.Inlet.rho*(LowerPipe.Outer.PressureDrop.Vnozzle_in)^2;
     1234
     1235"Outer Side Outlet Nozzle rho-V^2"
     1236        UpperPipe.Outer.PressureDrop.RVsquare_out = UpperPipe.Outer.Properties.Outlet.rho*(UpperPipe.Outer.PressureDrop.Vnozzle_out)^2;
     1237
     1238
     1239
     1240"Velocity Inner Side Inlet Nozzle"
     1241        UpperPipe.Inner.PressureDrop.Vnozzle_out        = 0;
     1242
     1243"Velocity Inner Side Outlet Nozzle"
     1244        LowerPipe.Inner.PressureDrop.Vnozzle_in = 0;
     1245
     1246"Velocity Outer Side Inlet Nozzle"
     1247        LowerPipe.Outer.PressureDrop.Vnozzle_out        = 0;
     1248
     1249"Velocity Outer Side Outlet Nozzle"
     1250        UpperPipe.Outer.PressureDrop.Vnozzle_in = 0;
     1251
     1252"Pressure Drop Inner Side Inlet Nozzle"
     1253        UpperPipe.Inner.PressureDrop.Pdnozzle_out= 0;
     1254
     1255"Pressure Drop Inner Side Outlet Nozzle"
     1256        LowerPipe.Inner.PressureDrop.Pdnozzle_in        = 0;
     1257
     1258"Pressure Drop Outer Side Inlet Nozzle"
     1259        LowerPipe.Outer.PressureDrop.Pdnozzle_out       = 0;
     1260
     1261"Pressure Drop Outer Side Outlet Nozzle"
     1262        UpperPipe.Outer.PressureDrop.Pdnozzle_in        =0;
     1263
     1264"Inner Side Inlet Nozzle rho-V^2"
     1265        UpperPipe.Inner.PressureDrop.RVsquare_out= 0;
     1266
     1267"Inner Side Outlet Nozzle rho-V^2"
     1268        LowerPipe.Inner.PressureDrop.RVsquare_in = 0;
     1269
     1270"Outer Side Inlet Nozzle rho-V^2"
     1271        LowerPipe.Outer.PressureDrop.RVsquare_out = 0;
     1272
     1273"Outer Side Outlet Nozzle rho-V^2"
     1274        UpperPipe.Outer.PressureDrop.RVsquare_in= 0;*#
     1275end
  • branches/tests/sample/heat_exchangers/GuessHairpin_Incremental.rlt

    r445 r447  
    14140 0
    1515
    16 15
     1612
    1717N
    18 1 1 1 2 0
    19 
    20 0
    21 Npoints
    22 1 1 1 3 0
     181 1 1 20 0
    2319
    24200
     
    48440
    4945Rfo
    50 1 1 1 0 0
    51 
    52 0
    53 Donozzle_Inner
    54 1 1 1 0.03663 0
    55 
    56 0
    57 Dinozzle_Inner
    58 1 1 1 0.03663 0
    59 
    60 0
    61 Donozzle_Outer
    62 1 1 1 0.04272 0
    63 
    64 0
    65 Dinozzle_Outer
    66 1 1 1 0.04272 0
     461 1 1 0.18 0
     47
     480
     49A
     501 1 1 2.38409 0
     51
     520
     53Qtotal
     541 1 1 39.4363 0
    6755
    68560
    6957UpperPipe
    70580 1
     59UpperPipe_basic
     600 1
    7161HairpinIncr_basic
    72620 0
    7363
    74 15
     6411
    7565Npoints
    76 1 1 1 3 0
     661 1 1 21 0
    7767
    78680
     
    8373Pi
    84741 1 1 3.14159 0
    85 
    86 0
    87 InnerKinlet
    88 1 1 1 1.1 0
    89 
    90 0
    91 InnerKoutlet
    92 1 1 1 0.7 0
    93 
    94 0
    95 OuterKinlet
    96 1 1 1 1.1 0
    97 
    98 0
    99 OuterKoutlet
    100 1 1 1 0.7 0
    10175
    102760
     
    112860
    11387T
    114 1 1 1 288.71 0
     881 1 1 299.159 0
    11589
    116900
     
    124980
    12599h
    126 1 1 1 -33924 0
     1001 1 1 -32707.8 0
    127101
    1281020
     
    1441180
    145119T
    146 1 1 1 329.352 0
     1201 1 1 338.71 0
    147121
    1481220
     
    1561300
    157131h
    158 1 1 1 -47734.7 0
     1321 1 1 -46122.3 0
    159133
    1601340
     
    1781520
    179153T
    180 1 1 1 299.774 0
     1541 1 1 309.372 0
    181155
    1821560
     
    1901640
    191165h
    192 1 1 1 -32634.9 0
     1661 1 1 -31479.1 0
    193167
    1941680
     
    1981720
    199173
    200 2
     1743
    201175x
    2021761 2 1 0 1 1 0
     
    205179y
    2061801 2 1 0 1 1 0
     181
     1820
     183s
     1841 1 1 -184.77 0
    207185
    2081860
     
    2222000
    223201T
    224 1 1 1 319.976 0
     2021 1 1 329.944 0
    225203
    2262040
     
    2342120
    235213h
    236 1 1 1 -49320.5 0
     2141 1 1 -47633.7 0
    237215
    2382160
     
    2422200
    243221
    244 2
     2223
    245223x
    2462241 2 1 1 1 0 0
     
    249227y
    2502281 2 1 1 1 0 0
     229
     2300
     231s
     2321 1 1 -198.233 0
    251233
    2522340
     
    2642460
    265247Q
    266 1 2 1 10.3461 1 10.4474 0
     2481 20 1 0.9869 1 0.987384 1 0.987856 1 0.988318 1 0.988769 1 0.989209 1 0.989638 1 0.990058 1 0.990467 1 0.990866 1 0.991255 1 0.991634 1 0.992004 1 0.992364 1 0.992714 1 0.993055 1 0.993387 1 0.99371 1 0.994024 1 0.994329 0
    267249
    2682500
    269251Qtotal
    270 1 1 1 20.7935 0
     2521 1 1 19.8179 0
    271253
    2722540
    273255Uc
    274 1 2 1 0.641149 1 0.669194 0
     2561 1 1 0.709091 0
    275257
    2762580
    277259Ud
    278 1 2 1 0.562996 1 0.584505 0
     2601 20 1 0.538534 1 0.540134 1 0.541729 1 0.543318 1 0.544901 1 0.546479 1 0.548051 1 0.549618 1 0.551179 1 0.552734 1 0.554284 1 0.555828 1 0.557366 1 0.558899 1 0.560426 1 0.561947 1 0.563463 1 0.564973 1 0.566477 1 0.567976 0
    279261
    2802620
     
    3022840
    303285Tlocal
    304 1 3 1 288.71 1 294.265 1 299.774 0
     2861 21 1 299.159 1 299.675 1 300.191 1 300.706 1 301.221 1 301.735 1 302.249 1 302.761 1 303.274 1 303.785 1 304.296 1 304.807 1 305.316 1 305.826 1 306.334 1 306.842 1 307.349 1 307.856 1 308.362 1 308.867 1 309.372 0
    305287
    3062880
    307289Re
    308 1 2 1 65081.6 1 70354.1 0
     2901 20 1 72709.7 1 73222.4 1 73736.6 1 74252.1 1 74769 1 75287.3 1 75806.9 1 76327.8 1 76850.1 1 77373.7 1 77898.6 1 78424.8 1 78952.3 1 79481.1 1 80011.1 1 80542.4 1 81075 1 81608.8 1 82143.8 1 82680.1 0
    309291
    3102920
    311293hcoeff
    312 1 2 1 1586.7 1 1643.41 0
     2941 20 1 1669.53 1 1674.8 1 1680.05 1 1685.3 1 1690.54 1 1695.77 1 1700.99 1 1706.2 1 1711.41 1 1716.6 1 1721.79 1 1726.96 1 1732.13 1 1737.28 1 1742.43 1 1747.57 1 1752.69 1 1757.81 1 1762.92 1 1768.02 0
    313295
    3142960
    315297fi
    316 1 2 1 0.0197233 1 0.0193866 0
     2981 20 1 0.0192468 1 0.0192172 1 0.0191877 1 0.0191585 1 0.0191295 1 0.0191006 1 0.0190719 1 0.0190434 1 0.0190151 1 0.018987 1 0.0189591 1 0.0189313 1 0.0189038 1 0.0188764 1 0.0188492 1 0.0188221 1 0.0187952 1 0.0187685 1 0.018742 1 0.0187156 0
    317299
    3183000
    319301Nu
    320 1 2 1 367.666 1 384.619 0
     3021 20 1 392.051 1 393.658 1 395.265 1 396.873 1 398.481 1 400.09 1 401.7 1 403.31 1 404.92 1 406.531 1 408.142 1 409.753 1 411.365 1 412.978 1 414.59 1 416.203 1 417.817 1 419.43 1 421.044 1 422.658 0
    321303
    3223040
    323305PR
    324 1 2 1 7.07898 1 6.7221 0
     3061 20 1 6.57831 1 6.54815 1 6.5183 1 6.48877 1 6.45953 1 6.43059 1 6.40196 1 6.37361 1 6.34555 1 6.31778 1 6.29029 1 6.26308 1 6.23614 1 6.20948 1 6.18308 1 6.15695 1 6.13108 1 6.10547 1 6.08011 1 6.05501 0
    325307
    3263080
    327309Phi
    328 1 2 1 1.02993 1 1.02816 0
     3101 20 1 1.02843 1 1.02828 1 1.02812 1 1.02797 1 1.02782 1 1.02767 1 1.02752 1 1.02737 1 1.02722 1 1.02707 1 1.02693 1 1.02679 1 1.02664 1 1.0265 1 1.02636 1 1.02623 1 1.02609 1 1.02595 1 1.02582 1 1.02568 0
    329311
    3303120
    331313Vmean
    332 1 2 1 1.44866 1 1.45637 0
     3141 20 1 1.4598 1 1.46054 1 1.46129 1 1.46203 1 1.46278 1 1.46353 1 1.46428 1 1.46503 1 1.46579 1 1.46654 1 1.4673 1 1.46806 1 1.46882 1 1.46958 1 1.47034 1 1.4711 1 1.47187 1 1.47264 1 1.4734 1 1.47417 0
    333315
    3343160
    335317Enth
    336 1 3 1 -33924 1 -33282.6 1 -32634.9 0
     3181 21 1 -32707.8 1 -32646.6 1 -32585.4 1 -32524.1 1 -32462.8 1 -32401.5 1 -32340.2 1 -32278.9 1 -32217.5 1 -32156.1 1 -32094.7 1 -32033.2 1 -31971.7 1 -31910.2 1 -31848.7 1 -31787.2 1 -31725.6 1 -31664 1 -31602.4 1 -31540.8 1 -31479.1 0
    337319
    3383200
     
    3443260 0
    345327
    346 12
     3284
    347329Dh
    3483301 1 1 0.03505 0
     
    3503320
    351333Plocal
    352 1 3 1 413.685 1 413.685 1 413.685 0
    353 
    354 0
    355 Pdrop
    356 1 1 1 0 0
    357 
    358 0
    359 Pd_fric
    360 1 3 1 0 1 2.83536 1 5.63394 0
     3341 21 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 0
    361335
    3623360
    363337fi
    364 1 2 1 0.00601161 1 0.00593076 0
     3381 20 1 0.00589737 1 0.00589031 1 0.00588329 1 0.00587633 1 0.00586941 1 0.00586255 1 0.00585573 1 0.00584897 1 0.00584225 1 0.00583558 1 0.00582896 1 0.00582238 1 0.00581585 1 0.00580937 1 0.00580293 1 0.00579654 1 0.00579019 1 0.00578389 1 0.00577763 1 0.00577141 0
    365339
    3663400
    367341Re
    368 1 2 1 65081.6 1 70354.1 0
    369 
    370 0
    371 Pdnozzle_in
    372 1 1 1 0.869965 0
    373 
    374 0
    375 Pdnozzle_out
    376 1 1 1 0.559529 0
    377 
    378 0
    379 Vnozzle_in
    380 1 1 1 1.32292 0
    381 
    382 0
    383 Vnozzle_out
    384 1 1 1 1.33705 0
    385 
    386 0
    387 RVsquare_in
    388 1 1 1 1581.75 0
    389 
    390 0
    391 RVsquare_out
    392 1 1 1 1598.65 0
     3421 20 1 72709.7 1 73222.4 1 73736.6 1 74252.1 1 74769 1 75287.3 1 75806.9 1 76327.8 1 76850.1 1 77373.7 1 77898.6 1 78424.8 1 78952.3 1 79481.1 1 80011.1 1 80542.4 1 81075 1 81608.8 1 82143.8 1 82680.1 0
    393343
    3943440
     
    4123620
    413363rho
    414 1 1 1 903.804 0
     3641 1 1 894.792 0
    415365
    4163660
     
    4283780
    429379T
    430 1 2 1 291.487 1 297.019 0
    431 
    432 0
    433 P
    434 1 2 1 413.685 1 413.685 0
     3801 20 1 299.417 1 299.933 1 300.449 1 300.964 1 301.478 1 301.992 1 302.505 1 303.018 1 303.529 1 304.041 1 304.551 1 305.062 1 305.571 1 306.08 1 306.588 1 307.096 1 307.603 1 308.109 1 308.615 1 309.12 0
     381
     3820
     383P
     3841 20 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 0
    435385
    4363860
    437387rho
    438 1 2 1 901.445 1 896.668 0
     3881 20 1 894.565 1 894.109 1 893.653 1 893.197 1 892.74 1 892.283 1 891.826 1 891.368 1 890.909 1 890.451 1 889.991 1 889.532 1 889.072 1 888.612 1 888.151 1 887.69 1 887.228 1 886.766 1 886.304 1 885.841 0
    439389
    4403900
    441391Mu
    442 1 2 1 0.70329 1 0.650583 0
     3921 20 1 0.629507 1 0.625098 1 0.62074 1 0.61643 1 0.612168 1 0.607954 1 0.603787 1 0.599666 1 0.595591 1 0.59156 1 0.587574 1 0.583632 1 0.579732 1 0.575875 1 0.572061 1 0.568287 1 0.564554 1 0.560861 1 0.557208 1 0.553594 0
    443393
    4443940
    445395Cp
    446 1 2 1 115.474 1 117.563 0
     3961 20 1 118.469 1 118.663 1 118.858 1 119.052 1 119.246 1 119.44 1 119.634 1 119.827 1 120.021 1 120.213 1 120.406 1 120.599 1 120.791 1 120.983 1 121.175 1 121.366 1 121.557 1 121.748 1 121.939 1 122.13 0
    447397
    4483980
    449399K
    450 1 2 1 0.146866 1 0.145662 0
     4001 20 1 0.145132 1 0.145018 1 0.144903 1 0.144788 1 0.144674 1 0.144559 1 0.144444 1 0.144329 1 0.144214 1 0.144099 1 0.143984 1 0.143869 1 0.143754 1 0.143639 1 0.143523 1 0.143408 1 0.143293 1 0.143177 1 0.143062 1 0.142946 0
    451401
    4524020
     
    4644140
    465415rho
    466 1 1 1 894.25 0
     4161 1 1 885.61 0
    467417
    4684180
     
    4764262
    477427Mu
    478 1 2 1 0.569716 1 0.533532 0
     4281 20 1 0.515262 1 0.512209 1 0.509185 1 0.50619 1 0.503222 1 0.500283 1 0.497371 1 0.494486 1 0.491628 1 0.488797 1 0.485991 1 0.483212 1 0.480459 1 0.477731 1 0.475028 1 0.472349 1 0.469696 1 0.467066 1 0.464461 1 0.461879 0
    479429
    4804300
    481431Twall
    482 1 2 1 306.903 1 312.014 0
     4321 20 1 314.79 1 315.269 1 315.746 1 316.224 1 316.701 1 317.177 1 317.653 1 318.129 1 318.604 1 319.079 1 319.554 1 320.028 1 320.502 1 320.975 1 321.448 1 321.92 1 322.392 1 322.864 1 323.335 1 323.806 0
    483433
    4844340
     
    5104600
    511461Tlocal
    512 1 3 1 319.976 1 324.663 1 329.352 0
     4621 21 1 329.944 1 330.384 1 330.824 1 331.264 1 331.703 1 332.143 1 332.582 1 333.021 1 333.46 1 333.899 1 334.337 1 334.775 1 335.213 1 335.651 1 336.089 1 336.526 1 336.964 1 337.401 1 337.837 1 338.274 1 338.71 0
    513463
    5144640
    515465Re
    516 1 2 1 17998.5 1 20049.2 0
     4661 20 1 21494.1 1 21699.4 1 21905.6 1 22112.7 1 22320.7 1 22529.5 1 22739.1 1 22949.6 1 23161 1 23373.2 1 23586.1 1 23799.9 1 24014.5 1 24229.9 1 24446.1 1 24663.1 1 24880.8 1 25099.3 1 25318.6 1 25538.6 0
    517467
    5184680
    519469hcoeff
    520 1 2 1 1363.68 1 1440.7 0
     4701 20 1 1488.98 1 1496.19 1 1503.39 1 1510.59 1 1517.78 1 1524.97 1 1532.15 1 1539.32 1 1546.48 1 1553.64 1 1560.78 1 1567.93 1 1575.06 1 1582.18 1 1589.3 1 1596.41 1 1603.51 1 1610.6 1 1617.68 1 1624.75 0
    521471
    5224720
    523473fi
    524 1 2 1 0.0268346 1 0.0261002 0
     4741 20 1 0.0256425 1 0.0255809 1 0.0255198 1 0.0254593 1 0.0253993 1 0.0253398 1 0.0252808 1 0.0252224 1 0.0251644 1 0.025107 1 0.02505 1 0.0249936 1 0.0249376 1 0.0248821 1 0.0248271 1 0.0247725 1 0.0247184 1 0.0246648 1 0.0246116 1 0.0245589 0
    525475
    5264760
    527477Nu
    528 1 2 1 188.498 1 199.153 0
     4781 20 1 206.367 1 207.374 1 208.381 1 209.389 1 210.396 1 211.403 1 212.41 1 213.417 1 214.424 1 215.431 1 216.437 1 217.444 1 218.45 1 219.456 1 220.461 1 221.467 1 222.472 1 223.476 1 224.481 1 225.484 0
    529479
    5304800
    531481PR
    532 1 2 1 20.8573 1 18.9863 0
     4821 20 1 17.8757 1 17.7295 1 17.5854 1 17.4432 1 17.3031 1 17.1648 1 17.0285 1 16.8941 1 16.7615 1 16.6307 1 16.5017 1 16.3745 1 16.249 1 16.1252 1 16.003 1 15.8825 1 15.7637 1 15.6464 1 15.5306 1 15.4165 0
    533483
    5344840
    535485Phi
    536 1 2 1 0.945933 1 0.950099 0
     4861 20 1 0.950475 1 0.950839 1 0.951199 1 0.951556 1 0.95191 1 0.952261 1 0.952609 1 0.952953 1 0.953295 1 0.953633 1 0.953968 1 0.954301 1 0.95463 1 0.954957 1 0.95528 1 0.955601 1 0.955918 1 0.956233 1 0.956545 1 0.956854 0
    537487
    5384880
    539489Vmean
    540 1 2 1 1.75859 1 1.76352 0
     4901 20 1 1.7669 1 1.76737 1 1.76785 1 1.76833 1 1.7688 1 1.76928 1 1.76976 1 1.77024 1 1.77072 1 1.7712 1 1.77169 1 1.77217 1 1.77265 1 1.77314 1 1.77362 1 1.77411 1 1.77459 1 1.77508 1 1.77557 1 1.77606 0
    541491
    5424920
    543493Enth
    544 1 3 1 -49320.5 1 -48531.5 1 -47734.7 0
     4941 21 1 -47633.7 1 -47558.5 1 -47483.2 1 -47407.8 1 -47332.5 1 -47257.1 1 -47181.6 1 -47106.1 1 -47030.6 1 -46955.1 1 -46879.5 1 -46803.9 1 -46728.3 1 -46652.6 1 -46577 1 -46501.3 1 -46425.5 1 -46349.8 1 -46274 1 -46198.2 1 -46122.3 0
    545495
    5464960
     
    5525020 0
    553503
    554 12
     5044
    555505Dh
    5565061 1 1 0.01034 0
     
    5585080
    559509Plocal
    560 1 3 1 413.685 1 413.685 1 413.685 0
    561 
    562 0
    563 Pdrop
    564 1 1 1 0 0
    565 
    566 0
    567 Pd_fric
    568 1 3 1 24.554 1 0 1 0 0
     5101 21 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 0
    569511
    5705120
    571513fi
    572 1 2 1 0.00955251 1 0.00928436 0
     5141 20 1 0.00911774 1 0.00909535 1 0.00907317 1 0.00905119 1 0.00902941 1 0.00900782 1 0.00898644 1 0.00896525 1 0.00894424 1 0.00892343 1 0.00890281 1 0.00888237 1 0.00886212 1 0.00884205 1 0.00882215 1 0.00880244 1 0.0087829 1 0.00876353 1 0.00874434 1 0.00872532 0
    573515
    5745160
    575517Re
    576 1 2 1 8016.26 1 8929.56 0
    577 
    578 0
    579 Pdnozzle_in
    580 1 1 1 0.443799 0
    581 
    582 0
    583 Pdnozzle_out
    584 1 1 1 0.280841 0
    585 
    586 0
    587 Vnozzle_in
    588 1 1 1 0.947156 0
    589 
    590 0
    591 Vnozzle_out
    592 1 1 1 0.941868 0
    593 
    594 0
    595 RVsquare_in
    596 1 1 1 806.908 0
    597 
    598 0
    599 RVsquare_out
    600 1 1 1 802.403 0
     5181 20 1 9573.11 1 9664.56 1 9756.41 1 9848.64 1 9941.26 1 10034.3 1 10127.6 1 10221.4 1 10315.5 1 10410 1 10504.9 1 10600.1 1 10695.7 1 10791.6 1 10887.9 1 10984.5 1 11081.5 1 11178.8 1 11276.5 1 11374.5 0
    601519
    6025200
     
    6205380
    621539rho
    622 1 1 1 899.458 0
     5401 1 1 894.254 0
    623541
    6245420
     
    6365540
    637555T
    638 1 2 1 322.32 1 327.008 0
    639 
    640 0
    641 P
    642 1 2 1 413.685 1 413.685 0
     5561 20 1 330.164 1 330.604 1 331.044 1 331.483 1 331.923 1 332.362 1 332.802 1 333.241 1 333.679 1 334.118 1 334.556 1 334.994 1 335.432 1 335.87 1 336.308 1 336.745 1 337.182 1 337.619 1 338.055 1 338.492 0
     557
     5580
     559P
     5601 20 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 0
    643561
    6445620
    645563rho
    646 1 2 1 903.26 1 900.735 0
     5641 20 1 899.013 1 898.771 1 898.529 1 898.287 1 898.045 1 897.802 1 897.559 1 897.316 1 897.072 1 896.828 1 896.584 1 896.34 1 896.096 1 895.851 1 895.606 1 895.361 1 895.115 1 894.869 1 894.623 1 894.377 0
    647565
    6485660
    649567Mu
    650 1 2 1 2.04892 1 1.83936 0
     5681 20 1 1.71572 1 1.69948 1 1.68348 1 1.66772 1 1.65218 1 1.63687 1 1.62177 1 1.6069 1 1.59224 1 1.57778 1 1.56353 1 1.54949 1 1.53564 1 1.52199 1 1.50853 1 1.49526 1 1.48217 1 1.46927 1 1.45655 1 1.444 0
    651569
    6525700
    653571Cp
    654 1 2 1 168.324 1 169.924 0
     5721 20 1 170.999 1 171.148 1 171.298 1 171.447 1 171.597 1 171.746 1 171.895 1 172.044 1 172.193 1 172.342 1 172.491 1 172.639 1 172.788 1 172.936 1 173.084 1 173.232 1 173.38 1 173.528 1 173.676 1 173.823 0
    655573
    6565740
    657575K
    658 1 2 1 0.177555 1 0.176768 0
     5761 20 1 0.176236 1 0.176162 1 0.176088 1 0.176014 1 0.175939 1 0.175865 1 0.175791 1 0.175717 1 0.175643 1 0.175568 1 0.175494 1 0.17542 1 0.175346 1 0.175272 1 0.175198 1 0.175124 1 0.17505 1 0.174976 1 0.174902 1 0.174828 0
    659577
    6605780
     
    6725900
    673591rho
    674 1 1 1 904.508 0
     5921 1 1 899.134 0
    675593
    6765940
     
    6846022
    685603Mu
    686 1 2 1 3.04756 1 2.65131 0
     6041 20 1 2.46611 1 2.43611 1 2.40665 1 2.37773 1 2.34932 1 2.32143 1 2.29404 1 2.26713 1 2.2407 1 2.21474 1 2.18924 1 2.16418 1 2.13956 1 2.11537 1 2.0916 1 2.06823 1 2.04527 1 2.0227 1 2.00052 1 1.97871 0
    687605
    6886060
    689607Twall
    690 1 2 1 306.903 1 312.014 0
     6081 20 1 314.79 1 315.269 1 315.746 1 316.224 1 316.701 1 317.177 1 317.653 1 318.129 1 318.604 1 319.079 1 319.554 1 320.028 1 320.502 1 320.975 1 321.448 1 321.92 1 322.392 1 322.864 1 323.335 1 323.806 0
    691609
    6926100
     
    6986160
    699617Lincr
    700 1 3 1 0 1 4.5 1 9 0
     6181 21 1 0 1 0.45 1 0.9 1 1.35 1 1.8 1 2.25 1 2.7 1 3.15 1 3.6 1 4.05 1 4.5 1 4.95 1 5.4 1 5.85 1 6.3 1 6.75 1 7.2 1 7.65 1 8.1 1 8.55 1 9 0
     619
     6200
     621
     6222
     623Pi
     6241 1 1 3.14159 0
     625
     6260
     627Npoints
     6281 1 1 21 0
    701629
    7026300
     
    705633LowerPipe
    7066340 1
     635LowerPipe_basic
     6360 1
    707637HairpinIncr_basic
    7086380 0
    709639
    710 15
     64011
    711641Npoints
    712 1 1 1 3 0
     6421 1 1 21 0
    713643
    7146440
     
    719649Pi
    7206501 1 1 3.14159 0
    721 
    722 0
    723 InnerKinlet
    724 1 1 1 1.1 0
    725 
    726 0
    727 InnerKoutlet
    728 1 1 1 0.7 0
    729 
    730 0
    731 OuterKinlet
    732 1 1 1 1.1 0
    733 
    734 0
    735 OuterKoutlet
    736 1 1 1 0.7 0
    737651
    7386520
     
    7486620
    749663T
    750 1 1 1 299.774 0
     6641 1 1 288.71 0
    751665
    7526660
     
    7606740
    761675h
    762 1 1 1 -32634.9 0
     6761 1 1 -33924 0
    763677
    7646780
     
    7806940
    781695T
    782 1 1 1 338.71 0
     6961 1 1 329.944 0
    783697
    7846980
     
    7927060
    793707h
    794 1 1 1 -46122.3 0
     7081 1 1 -47633.7 0
    795709
    7967100
     
    8147280
    815729T
    816 1 1 1 310.637 0
     7301 1 1 299.159 0
    817731
    8187320
     
    8267400
    827741h
    828 1 1 1 -31324.2 0
     7421 1 1 -32707.8 0
    829743
    8307440
     
    8347480
    835749
    836 2
     7503
    837751x
    8387521 2 1 0 1 1 0
     
    841755y
    8427561 2 1 0 1 1 0
     757
     7580
     759s
     7601 1 1 -188.808 0
    843761
    8447620
     
    8587760
    859777T
    860 1 1 1 329.352 0
     7781 1 1 321.112 0
    861779
    8627800
     
    8707880
    871789h
    872 1 1 1 -47734.7 0
     7901 1 1 -49129.9 0
    873791
    8747920
     
    8787960
    879797
    880 2
     7983
    881799x
    8828001 2 1 1 1 0 0
     
    885803y
    8868041 2 1 1 1 0 0
     805
     8060
     807s
     8081 1 1 -202.83 0
    887809
    8888100
     
    9008220
    901823Q
    902 1 2 1 10.5342 1 10.6078 0
     8241 20 1 0.986406 1 0.9859 1 0.985383 1 0.984854 1 0.984314 1 0.983761 1 0.983197 1 0.982621 1 0.982032 1 0.981432 1 0.980818 1 0.980192 1 0.979554 1 0.978902 1 0.978238 1 0.97756 1 0.97687 1 0.976165 1 0.975448 1 0.974716 0
    903825
    9048260
    905827Qtotal
    906 1 1 1 21.142 0
     8281 1 1 19.6184 0
    907829
    9088300
    909831Uc
    910 1 2 1 0.696807 1 0.723925 0
     8321 1 1 0.657244 0
    911833
    9128340
    913835Ud
    914 1 2 1 0.605462 1 0.625832 0
     8361 20 1 0.536928 1 0.535317 1 0.5337 1 0.532077 1 0.530449 1 0.528815 1 0.527176 1 0.525531 1 0.523881 1 0.522225 1 0.520564 1 0.518897 1 0.517225 1 0.515548 1 0.513865 1 0.512176 1 0.510483 1 0.508784 1 0.50708 1 0.50537 0
    915837
    9168380
     
    9388600
    939861Tlocal
    940 1 3 1 299.774 1 305.233 1 310.637 0
     8621 21 1 299.159 1 298.642 1 298.124 1 297.606 1 297.087 1 296.568 1 296.048 1 295.527 1 295.006 1 294.485 1 293.962 1 293.44 1 292.916 1 292.392 1 291.868 1 291.343 1 290.817 1 290.291 1 289.765 1 289.238 1 288.71 0
    941863
    9428640
    943865Re
    944 1 2 1 75806.4 1 81427.2 0
     8661 20 1 72198.3 1 71688.3 1 71179.8 1 70672.7 1 70167 1 69662.7 1 69160 1 68658.7 1 68158.9 1 67660.5 1 67163.7 1 66668.4 1 66174.6 1 65682.3 1 65191.6 1 64702.4 1 64214.8 1 63728.8 1 63244.3 1 62761.5 0
    945867
    9468680
    947869hcoeff
    948 1 2 1 1699.37 1 1754.47 0
     8701 20 1 1664.26 1 1658.97 1 1653.68 1 1648.38 1 1643.07 1 1637.75 1 1632.43 1 1627.1 1 1621.75 1 1616.4 1 1611.05 1 1605.68 1 1600.31 1 1594.93 1 1589.54 1 1584.14 1 1578.74 1 1573.33 1 1567.91 1 1562.49 0
    949871
    9508720
    951873fi
    952 1 2 1 0.019072 1 0.0187776 0
     8741 20 1 0.0192766 1 0.0193067 1 0.0193369 1 0.0193673 1 0.0193979 1 0.0194288 1 0.0194598 1 0.0194911 1 0.0195226 1 0.0195542 1 0.0195861 1 0.0196182 1 0.0196506 1 0.0196831 1 0.0197159 1 0.0197489 1 0.0197821 1 0.0198156 1 0.0198493 1 0.0198832 0
    953875
    9548760
    955877Nu
    956 1 2 1 401.697 1 418.88 0
     8781 20 1 390.444 1 388.839 1 387.233 1 385.629 1 384.025 1 382.422 1 380.819 1 379.217 1 377.616 1 376.016 1 374.416 1 372.817 1 371.219 1 369.621 1 368.025 1 366.429 1 364.834 1 363.241 1 361.648 1 360.056 0
    957879
    9588800
    959881PR
    960 1 2 1 6.40195 1 6.11409 0
     8821 20 1 6.60879 1 6.63958 1 6.6707 1 6.70215 1 6.73393 1 6.76604 1 6.7985 1 6.83131 1 6.86446 1 6.89797 1 6.93184 1 6.96607 1 7.00067 1 7.03564 1 7.07099 1 7.10673 1 7.14285 1 7.17937 1 7.21629 1 7.25361 0
    961883
    9628840
    963885Phi
    964 1 2 1 1.02654 1 1.02506 0
     8861 20 1 1.02859 1 1.02875 1 1.02891 1 1.02907 1 1.02923 1 1.0294 1 1.02957 1 1.02973 1 1.0299 1 1.03007 1 1.03024 1 1.03042 1 1.03059 1 1.03077 1 1.03095 1 1.03113 1 1.03131 1 1.03149 1 1.03167 1 1.03186 0
    965887
    9668880
    967889Vmean
    968 1 2 1 1.46428 1 1.47237 0
     8901 20 1 1.45906 1 1.45831 1 1.45758 1 1.45684 1 1.4561 1 1.45537 1 1.45463 1 1.4539 1 1.45317 1 1.45244 1 1.45171 1 1.45099 1 1.45026 1 1.44954 1 1.44882 1 1.4481 1 1.44738 1 1.44666 1 1.44595 1 1.44523 0
    969891
    9708920
    971893Enth
    972 1 3 1 -32634.9 1 -31981.8 1 -31324.2 0
     8941 21 1 -32707.8 1 -32768.9 1 -32830 1 -32891.1 1 -32952.2 1 -33013.2 1 -33074.2 1 -33135.1 1 -33196.1 1 -33256.9 1 -33317.8 1 -33378.6 1 -33439.4 1 -33500.1 1 -33560.8 1 -33621.4 1 -33682 1 -33742.6 1 -33803.1 1 -33863.6 1 -33924 0
    973895
    9748960
     
    9809020 0
    981903
    982 12
     9044
    983905Dh
    9849061 1 1 0.03505 0
     
    9869080
    987909Plocal
    988 1 3 1 413.685 1 413.685 1 413.685 0
    989 
    990 0
    991 Pdrop
    992 1 1 1 0 0
    993 
    994 0
    995 Pd_fric
    996 1 3 1 0 1 2.80084 1 5.57363 0
     9101 21 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 0
    997911
    9989120
    999913fi
    1000 1 2 1 0.00585574 1 0.00578602 0
     9141 20 1 0.00590449 1 0.00591166 1 0.00591888 1 0.00592615 1 0.00593348 1 0.00594086 1 0.0059483 1 0.00595579 1 0.00596334 1 0.00597094 1 0.00597861 1 0.00598632 1 0.0059941 1 0.00600193 1 0.00600983 1 0.00601778 1 0.00602579 1 0.00603386 1 0.006042 1 0.00605019 0
    1001915
    10029160
    1003917Re
    1004 1 2 1 75806.4 1 81427.2 0
    1005 
    1006 0
    1007 Pdnozzle_in
    1008 1 1 1 0.879259 0
    1009 
    1010 0
    1011 Pdnozzle_out
    1012 1 1 1 0.565731 0
    1013 
    1014 0
    1015 Vnozzle_in
    1016 1 1 1 1.33705 0
    1017 
    1018 0
    1019 Vnozzle_out
    1020 1 1 1 1.35187 0
    1021 
    1022 0
    1023 RVsquare_in
    1024 1 1 1 1598.65 0
    1025 
    1026 0
    1027 RVsquare_out
    1028 1 1 1 1616.38 0
     9181 20 1 72198.3 1 71688.3 1 71179.8 1 70672.7 1 70167 1 69662.7 1 69160 1 68658.7 1 68158.9 1 67660.5 1 67163.7 1 66668.4 1 66174.6 1 65682.3 1 65191.6 1 64702.4 1 64214.8 1 63728.8 1 63244.3 1 62761.5 0
    1029919
    10309200
     
    10489380
    1049939rho
    1050 1 1 1 894.25 0
     9401 1 1 903.804 0
    1051941
    10529420
     
    10649540
    1065955T
    1066 1 2 1 302.503 1 307.935 0
    1067 
    1068 0
    1069 P
    1070 1 2 1 413.685 1 413.685 0
     9561 20 1 298.9 1 298.383 1 297.865 1 297.347 1 296.828 1 296.308 1 295.788 1 295.267 1 294.745 1 294.224 1 293.701 1 293.178 1 292.654 1 292.13 1 291.605 1 291.08 1 290.554 1 290.028 1 289.501 1 288.974 0
     957
     9580
     959P
     9601 20 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 0
    1071961
    10729620
    1073963rho
    1074 1 2 1 891.827 1 886.925 0
     9641 20 1 895.02 1 895.474 1 895.929 1 896.382 1 896.836 1 897.289 1 897.741 1 898.193 1 898.644 1 899.096 1 899.546 1 899.996 1 900.446 1 900.895 1 901.344 1 901.792 1 902.24 1 902.688 1 903.134 1 903.581 0
    1075965
    10769660
    1077967Mu
    1078 1 2 1 0.603791 1 0.562112 0
     9681 20 1 0.633966 1 0.638475 1 0.643037 1 0.647651 1 0.652319 1 0.65704 1 0.661817 1 0.666649 1 0.671537 1 0.676483 1 0.681488 1 0.686551 1 0.691674 1 0.696858 1 0.702103 1 0.707411 1 0.712783 1 0.718219 1 0.72372 1 0.729288 0
    1079969
    10809700
    1081971Cp
    1082 1 2 1 119.633 1 121.683 0
     9721 20 1 118.274 1 118.078 1 117.883 1 117.687 1 117.491 1 117.295 1 117.098 1 116.902 1 116.705 1 116.508 1 116.31 1 116.113 1 115.915 1 115.717 1 115.518 1 115.32 1 115.121 1 114.922 1 114.723 1 114.524 0
    1083973
    10849740
    1085975K
    1086 1 2 1 0.144445 1 0.143217 0
     9761 20 1 0.145247 1 0.145361 1 0.145475 1 0.14559 1 0.145704 1 0.145818 1 0.145932 1 0.146046 1 0.146159 1 0.146273 1 0.146387 1 0.1465 1 0.146614 1 0.146727 1 0.146841 1 0.146954 1 0.147067 1 0.14718 1 0.147293 1 0.147406 0
    1087977
    10889780
     
    11009900
    1101991rho
    1102 1 1 1 884.445 0
     9921 1 1 894.792 0
    1103993
    11049940
     
    111210022
    11131003Mu
    1114 1 2 1 0.500762 1 0.471027 0
     10041 20 1 0.518344 1 0.521456 1 0.524597 1 0.527769 1 0.530971 1 0.534204 1 0.537468 1 0.540764 1 0.544092 1 0.547452 1 0.550845 1 0.554272 1 0.557732 1 0.561225 1 0.564753 1 0.568316 1 0.571914 1 0.575548 1 0.579217 1 0.582924 0
    11151005
    111610060
    11171007Twall
    1118 1 2 1 317.099 1 322.154 0
     10081 20 1 314.312 1 313.833 1 313.354 1 312.874 1 312.394 1 311.914 1 311.433 1 310.952 1 310.471 1 309.989 1 309.507 1 309.025 1 308.542 1 308.059 1 307.575 1 307.092 1 306.608 1 306.123 1 305.639 1 305.154 0
    11191009
    112010100
     
    114610360
    11471037Tlocal
    1148 1 3 1 329.352 1 334.037 1 338.71 0
     10381 21 1 329.944 1 329.503 1 329.063 1 328.622 1 328.181 1 327.741 1 327.299 1 326.858 1 326.417 1 325.975 1 325.534 1 325.092 1 324.65 1 324.208 1 323.766 1 323.324 1 322.882 1 322.44 1 321.997 1 321.555 1 321.112 0
    11491039
    115010400
    11511041Re
    1152 1 2 1 22211.8 1 24478.4 0
     10421 20 1 21289.6 1 21086.1 1 20883.4 1 20681.7 1 20480.9 1 20281 1 20082 1 19884 1 19686.9 1 19490.8 1 19295.6 1 19101.4 1 18908.2 1 18715.9 1 18524.7 1 18334.4 1 18145.1 1 17956.9 1 17769.6 1 17583.4 0
    11531043
    115410440
    11551045hcoeff
    1156 1 2 1 1517.48 1 1593.73 0
     10461 20 1 1481.77 1 1474.54 1 1467.32 1 1460.09 1 1452.85 1 1445.61 1 1438.37 1 1431.12 1 1423.87 1 1416.61 1 1409.35 1 1402.09 1 1394.82 1 1387.56 1 1380.29 1 1373.01 1 1365.74 1 1358.46 1 1351.19 1 1343.91 0
    11571047
    115810480
    11591049fi
    1160 1 2 1 0.0254306 1 0.0248189 0
     10501 20 1 0.0257046 1 0.0257673 1 0.0258306 1 0.0258944 1 0.0259588 1 0.0260238 1 0.0260893 1 0.0261555 1 0.0262222 1 0.0262896 1 0.0263575 1 0.0264261 1 0.0264952 1 0.0265651 1 0.0266355 1 0.0267066 1 0.0267783 1 0.0268507 1 0.0269238 1 0.0269975 0
    11611051
    116210520
    11631053Nu
    1164 1 2 1 209.869 1 220.611 0
     10541 20 1 205.36 1 204.353 1 203.346 1 202.339 1 201.332 1 200.326 1 199.32 1 198.314 1 197.308 1 196.303 1 195.298 1 194.293 1 193.289 1 192.285 1 191.282 1 190.279 1 189.277 1 188.275 1 187.274 1 186.274 0
    11651055
    116610560
    11671057PR
    1168 1 2 1 17.3762 1 15.985 0
     10581 20 1 18.024 1 18.1743 1 18.3269 1 18.4816 1 18.6385 1 18.7977 1 18.9592 1 19.1231 1 19.2893 1 19.4579 1 19.629 1 19.8026 1 19.9788 1 20.1575 1 20.3389 1 20.523 1 20.7099 1 20.8995 1 21.0919 1 21.2872 0
    11691059
    117010600
    11711061Phi
    1172 1 2 1 0.953896 1 0.957353 0
     10621 20 1 0.950108 1 0.949738 1 0.949364 1 0.948987 1 0.948607 1 0.948223 1 0.947835 1 0.947445 1 0.94705 1 0.946653 1 0.946251 1 0.945846 1 0.945437 1 0.945025 1 0.944609 1 0.944189 1 0.943766 1 0.943338 1 0.942907 1 0.942472 0
    11731063
    117410640
    11751065Vmean
    1176 1 2 1 1.76856 1 1.77369 0
     10661 20 1 1.76643 1 1.76595 1 1.76548 1 1.76501 1 1.76454 1 1.76407 1 1.7636 1 1.76313 1 1.76266 1 1.76219 1 1.76173 1 1.76126 1 1.7608 1 1.76033 1 1.75987 1 1.75941 1 1.75895 1 1.75849 1 1.75803 1 1.75757 0
    11771067
    117810680
    11791069Enth
    1180 1 3 1 -47734.7 1 -46931.3 1 -46122.3 0
     10701 21 1 -47633.7 1 -47709 1 -47784.2 1 -47859.3 1 -47934.4 1 -48009.5 1 -48084.5 1 -48159.5 1 -48234.4 1 -48309.3 1 -48384.2 1 -48459 1 -48533.7 1 -48608.4 1 -48683.1 1 -48757.7 1 -48832.3 1 -48906.8 1 -48981.2 1 -49055.6 1 -49129.9 0
    11811071
    118210720
     
    118810780 0
    11891079
    1190 12
     10804
    11911081Dh
    119210821 1 1 0.01034 0
     
    119410840
    11951085Plocal
    1196 1 3 1 413.685 1 413.685 1 413.685 0
    1197 
    1198 0
    1199 Pdrop
    1200 1 1 1 0 0
    1201 
    1202 0
    1203 Pd_fric
    1204 1 3 1 23.1752 1 0 1 0 0
     10861 21 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 0
    12051087
    120610880
    12071089fi
    1208 1 2 1 0.00904077 1 0.00881921 0
     10901 20 1 0.00914034 1 0.00916314 1 0.00918616 1 0.00920939 1 0.00923283 1 0.0092565 1 0.00928038 1 0.00930449 1 0.00932882 1 0.00935339 1 0.00937818 1 0.00940321 1 0.00942847 1 0.00945397 1 0.00947971 1 0.0095057 1 0.00953193 1 0.00955841 1 0.00958514 1 0.00961213 0
    12091091
    121010920
    12111093Re
    1212 1 2 1 9892.77 1 10902.3 0
    1213 
    1214 0
    1215 Pdnozzle_in
    1216 1 1 1 0.446382 0
    1217 
    1218 0
    1219 Pdnozzle_out
    1220 1 1 1 0.282418 0
    1221 
    1222 0
    1223 Vnozzle_in
    1224 1 1 1 0.952668 0
    1225 
    1226 0
    1227 Vnozzle_out
    1228 1 1 1 0.947156 0
    1229 
    1230 0
    1231 RVsquare_in
    1232 1 1 1 811.603 0
    1233 
    1234 0
    1235 RVsquare_out
    1236 1 1 1 806.908 0
     10941 20 1 9482.05 1 9391.4 1 9301.14 1 9211.29 1 9121.85 1 9032.82 1 8944.2 1 8856 1 8768.23 1 8680.88 1 8593.95 1 8507.46 1 8421.4 1 8335.77 1 8250.59 1 8165.85 1 8081.55 1 7997.7 1 7914.3 1 7831.36 0
    12371095
    123810960
     
    125611140
    12571115rho
    1258 1 1 1 894.254 0
     11161 1 1 899.134 0
    12591117
    126011180
     
    127211300
    12731131T
    1274 1 2 1 331.694 1 336.373 0
    1275 
    1276 0
    1277 P
    1278 1 2 1 413.685 1 413.685 0
     11321 20 1 329.724 1 329.283 1 328.843 1 328.402 1 327.961 1 327.52 1 327.079 1 326.638 1 326.196 1 325.755 1 325.313 1 324.871 1 324.429 1 323.987 1 323.545 1 323.103 1 322.661 1 322.219 1 321.776 1 321.334 0
     1133
     11340
     1135P
     11361 20 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 1 413.685 0
    12791137
    128011380
    12811139rho
    1282 1 2 1 898.171 1 895.569 0
     11401 20 1 899.254 1 899.496 1 899.736 1 899.977 1 900.217 1 900.457 1 900.697 1 900.936 1 901.176 1 901.414 1 901.653 1 901.891 1 902.129 1 902.367 1 902.604 1 902.841 1 903.078 1 903.315 1 903.551 1 903.786 0
    12831141
    128411420
    12851143Mu
    1286 1 2 1 1.66028 1 1.50654 0
     11441 20 1 1.73219 1 1.74891 1 1.76588 1 1.78311 1 1.80059 1 1.81834 1 1.83636 1 1.85464 1 1.87321 1 1.89206 1 1.9112 1 1.93063 1 1.95036 1 1.97039 1 1.99074 1 2.01139 1 2.03237 1 2.05368 1 2.07532 1 2.0973 0
    12871145
    128811460
    12891147Cp
    1290 1 2 1 171.519 1 173.106 0
     11481 20 1 170.849 1 170.699 1 170.549 1 170.399 1 170.249 1 170.099 1 169.948 1 169.798 1 169.647 1 169.497 1 169.346 1 169.195 1 169.045 1 168.894 1 168.743 1 168.591 1 168.44 1 168.289 1 168.138 1 167.986 0
    12911149
    129211500
    12931151K
    1294 1 2 1 0.175978 1 0.175187 0
     11521 20 1 0.17631 1 0.176385 1 0.176459 1 0.176533 1 0.176607 1 0.176681 1 0.176756 1 0.17683 1 0.176904 1 0.176978 1 0.177052 1 0.177127 1 0.177201 1 0.177275 1 0.177349 1 0.177423 1 0.177498 1 0.177572 1 0.177646 1 0.17772 0
    12951153
    129611540
     
    130811660
    13091167rho
    1310 1 1 1 899.458 0
     11681 1 1 903.904 0
    13111169
    131211700
     
    132011782
    13211179Mu
    1322 1 2 1 2.32595 1 2.05674 0
     11801 20 1 2.49667 1 2.5278 1 2.55951 1 2.59182 1 2.62474 1 2.65828 1 2.69246 1 2.7273 1 2.7628 1 2.79899 1 2.83588 1 2.87349 1 2.91183 1 2.95092 1 2.99078 1 3.03143 1 3.07288 1 3.11516 1 3.15828 1 3.20227 0
    13231181
    132411820
    13251183Twall
    1326 1 2 1 317.099 1 322.154 0
     11841 20 1 314.312 1 313.833 1 313.354 1 312.874 1 312.394 1 311.914 1 311.433 1 310.952 1 310.471 1 309.989 1 309.507 1 309.025 1 308.542 1 308.059 1 307.575 1 307.092 1 306.608 1 306.123 1 305.639 1 305.154 0
    13271185
    132811860
     
    133411920
    13351193Lincr
    1336 1 3 1 0 1 4.5 1 9 0
     11941 21 1 0 1 0.45 1 0.9 1 1.35 1 1.8 1 2.25 1 2.7 1 3.15 1 3.6 1 4.05 1 4.5 1 4.95 1 5.4 1 5.85 1 6.3 1 6.75 1 7.2 1 7.65 1 8.1 1 8.55 1 9 0
     1195
     11960
     1197
     11982
     1199Pi
     12001 1 1 3.14159 0
     1201
     12020
     1203Npoints
     12041 1 1 21 0
    13371205
    133812060
     
    134612140 0
    13471215
    1348 5
     12168
    13491217Outlet
    135012180 1
     
    13951263
    139612640
     1265s
     12661 1 1 -193.713 0
     1267
     12680
     1269sl
     12701 1 1 -193.713 0
     1271
     12720
     1273sv
     12741 1 1 -100.224 0
     1275
     12760
    13971277
    139812780
     
    140212820 0
    14031283
    1404 5
     12848
    14051285Outlet
    140612860 1
     
    14511331
    145213320
     1333s
     13341 1 1 -192.946 0
     1335
     13360
     1337sl
     13381 1 1 -192.946 0
     1339
     13400
     1341sv
     13421 1 1 -114.132 0
     1343
     13440
    14531345
    145413460
     
    147013620
    14711363T
    1472 1 1 1 319.976 0
     13641 1 1 321.112 0
    14731365
    147413660
     
    148213740
    14831375h
    1484 1 1 1 -49320.5 0
     13761 1 1 -49129.9 0
    14851377
    148613780
     
    151014020
    15111403T
    1512 1 1 1 310.637 0
     14041 1 1 309.372 0
    15131405
    151414060
     
    152214140
    15231415h
    1524 1 1 1 -31324.2 0
     14161 1 1 -31479.1 0
    15251417
    152614180
  • branches/tests/sample/heat_exchangers/Sample_HairpinInc.mso

    r445 r447  
    4343CONNECTIONS
    4444
    45         InletCold.Outlet                                        to Pipe.UpperPipe.InletInner;
    46         InletHot.Outlet                                 to Pipe.LowerPipe.InletOuter;
     45        InletCold.Outlet                                        to Pipe.LowerPipe.InletInner;
     46        InletHot.Outlet                                 to Pipe.UpperPipe.InletOuter;
    4747       
    48         Pipe.UpperPipe.OutletOuter      to OutletHot.Inlet;
    49         Pipe.LowerPipe.OutletInner              to OutletCold.Inlet;
     48        Pipe.LowerPipe.OutletOuter      to OutletHot.Inlet;
     49        Pipe.UpperPipe.OutletInner              to OutletCold.Inlet;
    5050       
    5151SET
     
    5353NComp                   = PP.NumberOfComponents;
    5454
    55                 Pipe.N = 2;
     55                Pipe.N = 20;
    5656
    5757#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
     
    7777Pipe.Kwall                              = 0.057 *'kW/m/K';
    7878Pipe.Lpipe                                      =       9*'m';
    79 Pipe.Donozzle_Inner  =  36.63*'mm';
    80 Pipe.Dinozzle_Inner     =       36.63*'mm';
    81 Pipe.Donozzle_Outer  =  42.72*'mm';
    82 Pipe.Dinozzle_Outer     =       42.72*'mm';
     79#Pipe.Donozzle_Inner  = 36.63*'mm';
     80#Pipe.Dinozzle_Inner    =       36.63*'mm';
     81#Pipe.Donozzle_Outer  = 42.72*'mm';
     82#Pipe.Dinozzle_Outer    =       42.72*'mm';
    8383Pipe.Rfi                                                = 0.00018*'m^2*K/W';
    84 Pipe.Rfo                                                = 0*'m^2*K/W';
     84Pipe.Rfo                                                = 0.00018*'m^2*K/W';
    8585
    8686SPECIFY
     
    8888#               Hot Stream
    8989#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    90         #InletHot.Fw                    = 4396           * 'kg/h';
    9190        InletHot.Outlet.F                       = 47.2038        * 'kmol/h';
    9291        InletHot.Outlet.T       = 338.71   * 'K';
     
    9796#       Cold Stream
    9897#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    99 #       InletCold.Fw                    = 4536          * 'kg/h';
    10098        InletCold.Outlet.F      = 58.0694       * 'kmol/h';
    10199        InletCold.Outlet.T      = 288.71        * 'K';
     
    106104
    107105Dynamic  = false;
    108 GuessFile = "GuessHairpin_incremental";
     106GuessFile = "GuessHairpin_Incremental";
    109107
    110108end
    111109
     110
Note: See TracChangeset for help on using the changeset viewer.