Ignore:
Timestamp:
Oct 2, 2008, 6:19:24 PM (14 years ago)
Author:
gerson bicca
Message:

updates

File:
1 edited

Legend:

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

    r654 r655  
    721721       
    722722PARAMETERS
    723         VapourFlow as Switcher(Valid = ["on", "off"], Default = "on",Hidden=true);
     723        CondenserVapourFlow as Switcher(Valid = ["on", "off"], Default = "on",Hidden=true);
    724724
    725725VARIABLES
     
    757757        ConnectorReboilerLout.z = BottomProduct.z;
    758758       
    759         switch VapourFlow
     759        switch CondenserVapourFlow
    760760                case "on":
    761761                CondenserUnity.InletV.F*trays(1).vV = alfaTopo * Ah * sqrt(2*(trays(1).OutletV.P -
     
    798798*       - a splitter which separate reflux and distillate;
    799799*       - a pump in reflux stream;
    800 *---------------------------------------------------------------------*
    801 Model RectifierTeste
    802         ATTRIBUTES
     800*---------------------------------------------------------------------*#
     801Model Rectifier as Section_ColumnBasic
     802
     803ATTRIBUTES
    803804        Pallete         = true;
    804805        Icon            = "icon/RefluxedCond";
     
    824825";
    825826
    826         PARAMETERS
    827         outer PP as Plugin(Brief = "External Physical Properties", Type="PP");
    828         outer NComp as Integer;
    829         NumberOfTrays as Integer(Brief="Number of trays", Default=2);
    830         topdown as Integer(Brief="Trays counting (1=top-down, -1=bottom-up)", Default=1);
    831         top as Integer(Brief="Number of top tray");
    832         bot as Integer(Brief="Number of bottom tray");
    833         VapourFlow as Switcher(Valid = ["on", "off"], Default = "on");
    834 
    835         SET
    836         top = (NumberOfTrays-1)*(1-topdown)/2+1;
    837         bot = NumberOfTrays/top;
    838        
    839         VARIABLES
    840         trays(NumberOfTrays) as trayTeste;
    841         cond as condenser;
    842         sptop as splitter;
    843         pump1 as pump;
     827PARAMETERS
     828        CondenserVapourFlow as Switcher(Valid = ["on", "off"], Default = "on",Hidden=true);
     829
     830VARIABLES
     831        CondenserUnity as condenser;
     832        SplitterTop as splitter;
     833        PumpUnity as pump;
    844834        alfaTopo as Real;
    845835
    846         EQUATIONS
    847         switch VapourFlow
    848                 case "on":
    849                 cond.InletV.F*trays(top).vV = alfaTopo * trays(top).Ah * sqrt(2*(trays(top).OutletV.P -
    850                 cond.OutletL.P + 1e-8 * 'atm') / (trays(top).alfa*trays(top).rhoV));
    851                 when cond.InletV.F < 1e-6 * 'kmol/h' switchto "off";
     836        in              VapourInlet             as stream                               (Brief="Vapour Inlet in the section", PosX=0.18, PosY=1);
     837        out     LiquidOutlet            as liquid_stream                (Brief="Liquid Outlet in the section", PosX=0.25, PosY=1);
     838       
     839        out             HeatToCondenser         as power                                (Brief="Heat supplied to Condenser",Hidden=true);
     840       
     841        VapourConnector as stream       (Brief="Vapour connection at the middle trays", PosX=0.55, PosY=0,Hidden=true);
     842       
     843EQUATIONS
     844
     845switch CondenserVapourFlow
     846
     847        case "on":
     848                CondenserUnity.InletV.F*trays(1).vV = alfaTopo * Ah * sqrt(2*(trays(1).OutletV.P -
     849                CondenserUnity.OutletL.P + 1e-8 * 'atm') / (alfa*trays(1).rhoV));
     850                when CondenserUnity.InletV.F < 1e-6 * 'kmol/h' switchto "off";
    852851               
    853                 case "off":
    854                 cond.InletV.F = 0 * 'mol/s';
    855                 when trays(top).OutletV.P > cond.OutletL.P + 1e-1 * 'atm' switchto "on";
    856         end     
    857        
    858         CONNECTIONS
    859         #vapor
    860         trays([top+topdown:topdown:bot]).OutletV to trays([top:topdown:bot-topdown]).InletV;
    861         trays(top).OutletV to cond.InletV;
    862        
    863         #liquid
    864         cond.OutletL to sptop.Inlet;   
    865         sptop.Outlet2 to pump1.Inlet;   
    866         pump1.Outlet to trays(top).InletL;
    867         trays([top:topdown:bot-topdown]).OutletL to trays([top+topdown:topdown:bot]).InletL;
     852        case "off":
     853                CondenserUnity.InletV.F = 0 * 'mol/s';
     854                when trays(1).OutletV.P > CondenserUnity.OutletL.P + 1e-1 * 'atm' switchto "on";
     855
     856end     
     857
     858        LiquidOutlet.F= trays(NumberOfTrays).OutletL.F;
     859        LiquidOutlet.T = trays(NumberOfTrays).OutletL.T;
     860        LiquidOutlet.P = trays(NumberOfTrays).OutletL.P;
     861        LiquidOutlet.z = trays(NumberOfTrays).OutletL.z;
     862
     863        VapourConnector.F= VapourInlet.F;
     864        VapourConnector.T = VapourInlet.T;
     865        VapourConnector.P = VapourInlet.P;
     866        VapourConnector.z = VapourInlet.z;
     867        VapourConnector.v = VapourInlet.v;
     868        VapourConnector.h = VapourInlet.h;
     869
     870CONNECTIONS
     871#vapor
     872        trays(1).OutletV to CondenserUnity.InletV;
     873
     874#liquid
     875        CondenserUnity.OutletL to SplitterTop.Inlet;   
     876        SplitterTop.Outlet2 to PumpUnity.Inlet;
     877        PumpUnity.Outlet to trays(1).InletL;
     878
     879#Connectors
     880HeatToCondenser         to CondenserUnity.InletQ;
     881VapourConnector to trays(NumberOfTrays).InletV;
     882
    868883end
    869884
     
    17271742
    17281743end
    1729 
     1744*#
Note: See TracChangeset for help on using the changeset viewer.