Changeset 868 for branches/gui


Ignore:
Timestamp:
Oct 28, 2009, 5:15:47 PM (13 years ago)
Author:
gerson bicca
Message:

updated packed column

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/gui/eml/stage_separators/column.mso

    r866 r868  
    8484        TopStageComposition(NComp)              as fraction     (Brief = "Component Molar Fraction at Top");
    8585        BottomStageComposition(NComp)   as fraction     (Brief = "Component Molar Fraction at Bottom");
    86         LiquidMolarHoldup                               as mol          (Brief="Molar liquid holdup", Default=0.01);
     86        ColumnHoldup                                    as positive (Brief="Column holdup", Default=0.1);
    8787
    8888end
     
    18581858#       STAGES(i).invK = (1 + (2*STAGES(i).dp/(3*ColumnDiameter*(1-VoidFraction))));
    18591859
    1860         STAGES(i).deltaP/hs  = ResistanceCoeff *( 0.25*AreaPerPackingVol + 2/ColumnDiameter) * 1/((VoidFraction-STAGES(i).hl)^3) * (STAGES(i).uV^2) * STAGES(i).rhoV;
    1861        
     1860        STAGES(i).deltaP/hs  = ResistanceCoeff *( 0.5*AreaPerPackingVol + 2/ColumnDiameter) * 1/((VoidFraction-STAGES(i).hl)^3) * (STAGES(i).uV^2) * STAGES(i).rhoV;
     1861       
     1862        #deltaP/hs  = ResistanceCoeff * (AreaPerPackingVol/2 + 2/ColumnDiameter) * 1/((VoidFraction-hl)^3) * (uV^2) * rhoV;
     1863
     1864
    18621865        when STAGES(i).InletVapour.F < 1e-6 * 'kmol/h' switchto "off";
    18631866       
     
    19101913for i in 1:NumberOfStages do
    19111914
    1912 #"The initial temperature of the STAGES"
    1913 #       STAGES(i).OutletLiquid.T = INITIALIZATION.TopStageTemperature+(INITIALIZATION.BottomStageTemperature-INITIALIZATION.TopStageTemperature)*((i-1)/(NumberOfStages-1));
    1914 
    1915 #"The Liquid Holdup of the STAGES"
    1916 #       STAGES(i).ML = INITIALIZATION.LiquidMolarHoldup;
    1917 
    1918 end
    1919 
    1920 #*for i in 1:NComp-1 do
     1915"The initial temperature of the STAGES"
     1916        STAGES(i).OutletLiquid.T = INITIALIZATION.TopStageTemperature+(INITIALIZATION.BottomStageTemperature-INITIALIZATION.TopStageTemperature)*((i-1)/(NumberOfStages-1));
     1917
     1918"The Liquid Holdup of the STAGES"
     1919        STAGES(i).hl = INITIALIZATION.ColumnHoldup;
     1920
     1921end
     1922
     1923for i in 1:NComp-1 do
    19211924       
    19221925for j in 1:NumberOfStages do
     
    19281931
    19291932end
    1930 *#
     1933
    19311934end
    19321935
Note: See TracChangeset for help on using the changeset viewer.