Ignore:
Timestamp:
Feb 12, 2008, 4:55:35 PM (15 years ago)
Author:
Paula Bettio Staudt
Message:

More flowsheet tests

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/packed/eml/stage_separators/tray.mso

    r454 r455  
    357357        Cpo as Real (Brief="Constant for resitance equation"); # Billet and Schultes, 1999.
    358358        Mw(NComp)       as molweight    (Brief = "Component Mol Weight");
    359 
     359        hs as length (Brief="Height of the packing stage");
     360       
    360361        VARIABLES
    361362        miL as viscosity (Brief="Liquid dynamic viscosity", DisplayUnit='kg/m/s');
     
    365366        uL as velocity (Brief="volume flow rate of liquid, m^3/m^2/s", Default = 0.007);
    366367        uV as velocity (Brief="volume flow rate of vapor, m^3/m^2/s", Default = 1.14);
    367         hs as length (Brief="Height of the packing stage");
    368368        dp as length (Brief="Particle diameter");
    369369        K as Real (Brief="Wall factor");
     
    389389        uV * Ap = OutletV.F * vV;
    390390       
    391 #       "Liquid holdup and Liquid flow"
    392 #       vL * ML = (12*miL*a^2*uL/rhoL/g)^1/3 * hs * Ap;
     391        "Liquid holdup and Liquid flow"
     392        vL * ML = (12*miL*a^2*uL/rhoL/g)^1/3 * hs * Ap;
    393393       
    394394        "Particle diameter"
     
    396396       
    397397        "Wall Factor"
    398         1 = K * 1+(2*dp/(3*ds*(1-e)));
     398        1 = K * (1 + (2*dp/(3*ds*(1-e))));
    399399       
    400400        "Reynolds number of the vapor stream"
     
    402402       
    403403        #"Resistance Coefficient"
    404         #Qsio = Cpo * (64/Rev) + 1.8/Rev^0.08);
     404        #Qsio = Cpo * (64/Rev + 1.8/Rev^0.08);
    405405        #Qsio = Cpo * (64/Rev);# + 1.8/Rev^0.08);
    406406
    407407        "Pressure drop and Vapor flow"
    408         (InletV.P - OutletV.P)/hs = Qsio*a*uV^2*rhoV / (2*e^2*K);
     408        (InletV.P - OutletV.P)/hs * 'm'/'Pa' = Qsio*a*uV^2*rhoV / (2*e^3*K) * 's^2'*'m^2'/'kg';
     409       
     410        "Efficiency"
     411        Emv = 1;
    409412end
    410413
Note: See TracChangeset for help on using the changeset viewer.