Changeset 384 for trunk


Ignore:
Timestamp:
Oct 9, 2007, 11:49:16 AM (15 years ago)
Author:
gerson bicca
Message:

updated PHE model

Location:
trunk
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • trunk/eml/heat_exchangers/HEX_Engine.mso

    r360 r384  
    462462Cmax    as positive                                     (Brief="Maximum Heat Capacity",Lower=1e-10,Default=1e3,Unit='W/K');
    463463NTU     as positive                                     (Brief="Number of Units Transference",Default=0.05,Lower=1e-10);
    464 Eft             as positive                             (Brief="Effectiveness",Default=0.5,Lower=1e-8,Upper=1, Symbol = "\varepsilon");
     464Eft             as positive                             (Brief="Effectiveness",Default=0.5,Lower=0.4,Upper=1, Symbol = "\varepsilon");
    465465Q                       as power                                        (Brief="Heat Transfer", Default=7000, Lower=1e-6, Upper=1e10);
    466466Uc              as heat_trans_coeff     (Brief="Overall Heat Transfer Coefficient Clean",Default=1,Lower=1e-6,Upper=1e10);
  • trunk/eml/heat_exchangers/PHE.mso

    r357 r384  
    7878        M(NComp)                as molweight    (Brief="Component Mol Weight");
    7979       
    80         ChevronAngle    as Switcher             (Brief="Chevron Corrugation Inclination Angle in Degrees ",Valid=["30","45","50","60","65"],Default="30");
     80        ChevronAngle    as Switcher             (Brief="Chevron Corrugation Inclination Angle in Degrees ",Valid=["30 Deg","45 Deg","50 Deg","60 Deg","65 Deg"],Default="30 Deg");
    8181        Method                  as Switcher             (Brief="Method of Thermal Calculation",Valid=["NTU","LMTD"],Default="NTU");
    8282        SideOne                 as Switcher             (Brief="Fluid Alocation in the Side I - (The odd channels)",Valid=["hot","cold"],Default="hot");
     
    442442 switch ChevronAngle #Pressure Drop Friction Factor According to kumar's (1984)
    443443       
    444         case "30": #    ChevronAngle <= 30
     444        case "30 Deg": #        ChevronAngle <= 30
    445445       
    446446        if      HotSide.HeatTransfer.Re < 10
     
    460460        end     
    461461
    462         case "45":
     462        case "45 Deg":
    463463       
    464464        if      HotSide.HeatTransfer.Re < 15
     
    478478        end     
    479479
    480         case "50":
     480        case "50 Deg":
    481481       
    482482        if      HotSide.HeatTransfer.Re < 20
     
    496496        end
    497497       
    498         case "60":
     498        case "60 Deg":
    499499       
    500500        if      HotSide.HeatTransfer.Re < 40
     
    514514        end
    515515       
    516         case "65": #    ChevronAngle >= 65
     516        case "65 Deg": #        ChevronAngle >= 65
    517517       
    518518        if      HotSide.HeatTransfer.Re < 50
     
    536536 switch ChevronAngle # Heat Transfer Coefficient According to kumar's (1984)
    537537
    538         case "30": #    ChevronAngle <= 30
     538        case "30 Deg": #        ChevronAngle <= 30
    539539       
    540540        if      HotSide.HeatTransfer.Re < 10
     
    547547        end     
    548548       
    549         case "45":
     549        case "45 Deg":
    550550       
    551551        if      HotSide.HeatTransfer.Re < 10
     
    564564        end
    565565
    566         case "50":
     566        case "50 Deg":
    567567       
    568568        if      HotSide.HeatTransfer.Re < 20
     
    581581        end
    582582
    583         case "60":
     583        case "60 Deg":
    584584       
    585585        if      HotSide.HeatTransfer.Re < 20
     
    598598        end
    599599       
    600         case "65": #    ChevronAngle >= 65
     600        case "65 Deg": #        ChevronAngle >= 65
    601601       
    602602        if      HotSide.HeatTransfer.Re < 20
     
    710710       
    711711"LMTD Correction Factor"
    712         Thermal.Fc =Thermal.Eft/(1-Thermal.Eft)/Thermal.NTU;
     712        Thermal.Fc =Thermal.Eft/(1.0001-Thermal.Eft)/Thermal.NTU;
    713713       
    714714        else
    715715"Effectiveness in Counter Flow"
    716716        Thermal.Eft = (1-exp(-Thermal.NTU*(1-Thermal.Cr)))/(1-Thermal.Cr*exp(-Thermal.NTU*(1-Thermal.Cr)));
    717        
     717
    718718"LMTD Correction Factor"
    719719        Thermal.Fc =(ln(abs(1-Thermal.Eft*Thermal.Cr))-ln(abs(1-Thermal.Eft)))/(Thermal.NTU*(1-Thermal.Cr));
    720720       
    721721 end
     722
    722723end
  • trunk/sample/heat_exchangers/Sample_PHE.mso

    r261 r384  
    4848NComp   = PP.NumberOfComponents;
    4949
    50 exchanger.Method = "NTU";
    51 #exchanger.Method = "LMTD";
     50#exchanger.Method = "NTU";
     51exchanger.Method = "LMTD";
    5252exchanger.SideOne = "cold";
    5353#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    5454# PHE Geometrical Parameters and Alocation
    5555#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    56         exchanger.ChevronAngle  =       "60";
     56        exchanger.ChevronAngle  =       "60 Deg";
    5757        exchanger.Nplates                               = 129;
    5858        exchanger.NpassHot                      = 4;
     
    8787        InletCold.Outlet.T              = (20+273.15)   * 'K';
    8888    InletCold.Outlet.z          = [1];
    89        
     89
    9090OPTIONS
    9191
Note: See TracChangeset for help on using the changeset viewer.