Changeset 511 for trunk/eml


Ignore:
Timestamp:
May 12, 2008, 2:25:33 PM (14 years ago)
Author:
Paula Bettio Staudt
Message:

More hydraulic correlations in tray model (part 1)

Location:
trunk/eml/stage_separators
Files:
6 added
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/eml/stage_separators/column.mso

    r500 r511  
    12701270        ATTRIBUTES
    12711271        Pallete         = true;
    1272         Icon            = "icon/SectionColumn";
     1272        Icon            = "icon/PackedSectionColumn";
    12731273        Brief           = "Model of a packed column section.";
    12741274        Info            =
     
    13261326        ATTRIBUTES
    13271327        Pallete         = true;
    1328         Icon            = "icon/DistillationKettleCond";
     1328        Icon            = "icon/PackedDistillationKettleCond";
    13291329        Brief           = "Model of a distillation column with dynamic condenser and dynamic reboiler.";
    13301330        Info            =
  • trunk/eml/stage_separators/tray.mso

    r498 r511  
    130130        beta as fraction (Brief="Aeration fraction");
    131131        alfa as fraction (Brief="Dry pressure drop coefficient");
     132        w as Real (Brief="Feehery's correlation coefficient", Unit='1/m^4', Default=1);
     133        Mw(NComp)       as molweight    (Brief = "Component Mol Weight");
    132134       
    133135        VapourFlow as Switcher(Valid = ["on", "off"], Default = "on");
    134136        LiquidFlow as Switcher(Valid = ["on", "off"], Default = "on");
     137        VapourFlowModel as Switcher(Valid = ["Reepmeyer", "Feehery", "Roffel"], Default = "Reepmeyer");
     138#       LiquidFlow as Switcher(Valid = ["on", "off"], Default = "on");
     139
     140        SET
     141        Mw = PP.MolecularWeight();
    135142       
    136143        VARIABLES
     
    159166        switch VapourFlow
    160167                case "on":
    161                 InletV.F*vV = sqrt((InletV.P - OutletV.P)/(rhoV*alfa))*Ah;
     168                        switch VapourFlowModel
     169                                case "Reepmeyer":
     170                                InletV.F*vV = sqrt((InletV.P - OutletV.P)/(rhoV*alfa))*Ah;
     171                       
     172                                case "Feehery":
     173                                InletV.F = rhoV/Ap/w/sum(Mw*OutletV.z) * sqrt(((InletV.P - OutletV.P)-(rhoV*g*ML*vL/Ap))/rhoV);
     174                       
     175                                case "Roffel":
     176                                InletV.F^1.08 * 0.0013 * 'kg/m/mol^1.08/s^0.92' = (InletV.P - OutletV.P) - (beta*sum(M*Mw)/(Ap*1)*g) * (rhoV*Ah/sum(Mw*OutletV.z))^1.08 * 'm^1.08/mol^1.08';
     177                        end
    162178                when InletV.F < 1e-6 * 'kmol/h' switchto "off";
    163179               
     
    330346        ATTRIBUTES
    331347        Pallete         = false;
    332         Icon            = "icon/Tray";
     348        Icon            = "icon/PackedStage";
    333349        Brief           = "Complete model of a packed column stage.";
    334350        Info            =
Note: See TracChangeset for help on using the changeset viewer.