Changeset 611 for branches/gui


Ignore:
Timestamp:
Aug 26, 2008, 6:27:59 PM (14 years ago)
Author:
gerson bicca
Message:

testing column

Location:
branches/gui
Files:
1 added
2 edited

Legend:

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

    r610 r611  
    4444*---------------------------------------------------------------------*#
    4545Model Section_ColumnTeste
    46         ATTRIBUTES
     46
     47ATTRIBUTES
    4748        Pallete         = true;
    4849        Icon            = "icon/SectionColumn";
    49         Brief           = "Model of a column section.";
     50        Brief   = "Model of a column section.";
    5051        Info            =
    5152"== Model of a column section containing ==
     
    6869        outer NComp     as Integer;
    6970        NTrays                          as Integer      (Brief="Number of trays", Default=2);
    70         FeedTray                        as Integer      (Brief="Number of Feed tray", Default=1);
     71        FeedTray                        as Integer      (Brief="Number of Feed tray", Default=2);
    7172        topdown                         as Integer      (Brief="Trays counting (1=top-down, -1=bottom-up)", Default=1);
    7273        top                                     as Integer      (Brief="Number of top tray");
     
    7879
    7980VARIABLES
     81        zero                    as stream                               (Brief="Dummy stream",Hidden=true);
     82        cond                    as liquid_stream;
     83        in      Inlet           as stream                               (Brief="Feed stream", PosX=0, PosY=0.5);
    8084        trays(NTrays) as trayTeste;
    81 in      Inlet                   as stream                (Brief="Feed stream", PosX=0, PosY=0.5);
     85        reb                             as vapour_stream;
    8286
    8387CONNECTIONS
    8488        trays([top+topdown:topdown:bot]).OutletV        to trays([top:topdown:bot-topdown]).InletV;
    8589        trays([top:topdown:bot-topdown]).OutletL        to trays([top+topdown:topdown:bot]).InletL;
     90       
     91        reb             to trays(2).InletV;
     92        cond    to trays(1).InletL;
     93       
     94EQUATIONS
     95
     96# Zero stream definition
     97        zero.F = 0 * 'kmol/h';
     98        zero.T = 300 * 'K';
     99        zero.P = 1 * 'atm';
     100        zero.z =  1/NComp;
     101        zero.v = 0;
     102        zero.h = 0 * 'J/mol';
     103
     104# Connecting Feed Tray
     105        Inlet.F = trays(FeedTray).Inlet.F;
     106        Inlet.T = trays(FeedTray).Inlet.T;
     107        Inlet.P = trays(FeedTray).Inlet.P;
     108        Inlet.z = trays(FeedTray).Inlet.z;
     109        Inlet.v = trays(FeedTray).Inlet.v;
     110        Inlet.h = trays(FeedTray).Inlet.h;
     111       
     112for i in [1:FeedTray-1] do # pay atention to index
     113       
     114        zero.F = trays(i).Inlet.F;
     115        zero.T = trays(i).Inlet.T;
     116        zero.P = trays(i).Inlet.P;
     117        zero.z = trays(i).Inlet.z;
     118        zero.v = trays(i).Inlet.v;
     119        zero.h = trays(i).Inlet.h;
     120
     121end
    86122
    87123end
     
    125161";
    126162       
    127         PARAMETERS
    128         outer PP as Plugin(Brief = "External Physical Properties", Type="PP");
    129         outer NComp as Integer;
    130         NTrays as Integer(Brief="Number of trays", Default=2);
    131         topdown as Integer(Brief="Trays counting (1=top-down, -1=bottom-up)", Default=1);
    132         top as Integer(Brief="Number of top tray");
    133         bot as Integer(Brief="Number of bottom tray");
    134         VapourFlow as Switcher(Valid = ["on", "off"], Default = "on");
    135        
    136         SET
    137         top = (NTrays-1)*(1-topdown)/2+1;
    138         bot = NTrays/top;
    139        
    140         VARIABLES
    141         trays(NTrays) as trayTeste;
    142         cond as condenser;
    143         reb as reboiler;
    144         sptop as splitter;
    145         pump1 as pump;
    146         alfaTopo as Real;
    147        
    148         EQUATIONS
     163PARAMETERS
     164        outer PP                        as Plugin               (Brief = "External Physical Properties", Type="PP");
     165        outer NComp     as Integer;
     166        NTrays                          as Integer              (Brief="Number of trays", Default=2);
     167        topdown                         as Integer              (Brief="Trays counting (1=top-down, -1=bottom-up)", Default=1);
     168        top                                     as Integer              (Brief="Number of top tray");
     169        bot                                     as Integer              (Brief="Number of bottom tray");
     170        VapourFlow              as Switcher     (Valid = ["on", "off"], Default = "on");
     171       
     172SET
     173        top = (NTrays-1)*(1-topdown)/2+1;
     174        bot = NTrays/top;
     175       
     176VARIABLES
     177        trays(NTrays)   as trayTeste;
     178        cond                            as condenser;
     179        reb                                     as reboiler;
     180        sptop                           as splitter;
     181        pump1                           as pump;
     182        alfaTopo                        as Real;
     183       
     184EQUATIONS
     185
    149186        switch VapourFlow
    150187                case "on":
     
    158195        end     
    159196
    160         CONNECTIONS
    161         #vapor
     197CONNECTIONS
     198#vapor
    162199        reb.OutletV to trays(bot).InletV;
    163200        trays([top+topdown:topdown:bot]).OutletV to trays([top:topdown:bot-topdown]).InletV;
    164201        trays(top).OutletV to cond.InletV;
    165        
    166         #liquid
     202
     203#liquid
    167204        cond.OutletL to sptop.Inlet;   
    168205        sptop.Outlet2 to pump1.Inlet;
     
    170207        trays([top:topdown:bot-topdown]).OutletL to trays([top+topdown:topdown:bot]).InletL;
    171208        trays(bot).OutletL to reb.InletL;
     209
    172210end
    173211
  • branches/gui/eml/stage_separators/trayTeste.mso

    r610 r611  
    3737";
    3838       
    39         PARAMETERS
    40 outer PP as Plugin(Brief = "External Physical Properties", Type="PP");
    41 outer NComp as Integer;
    42         V as volume(Brief="Total Volume of the tray");
    43         Q as heat_rate (Brief="Rate of heat supply");
    44         Ap as area (Brief="Plate area = Atray - Adowncomer");
    45        
    46         VARIABLES
    47 in      Inlet as stream (Brief="Feed stream", PosX=0, PosY=0.4932, Symbol="_{in}");
    48 in      InletL as stream (Brief="Inlet liquid stream", PosX=0.5195, PosY=0, Symbol="_{inL}");
    49 in      InletV as stream (Brief="Inlet vapour stream", PosX=0.4994, PosY=1, Symbol="_{inV}");
    50 out     OutletL as liquid_stream (Brief="Outlet liquid stream", PosX=0.8277, PosY=1, Symbol="_{outL}");
    51 out     OutletV as vapour_stream (Brief="Outlet vapour stream", PosX=0.8043, PosY=0, Symbol="_{outV}");
     39PARAMETERS
     40outer PP                        as Plugin               (Brief = "External Physical Properties", Type="PP");
     41outer NComp     as Integer;
     42        V                                       as volume               (Brief="Total Volume of the tray");
     43        Q                                       as heat_rate    (Brief="Rate of heat supply");
     44        Ap                              as area                         (Brief="Plate area = Atray - Adowncomer");
     45       
     46VARIABLES
     47
     48#in     Inlet                   as stream                               (Brief="Feed stream", PosX=0, PosY=0.4932, Symbol="_{in}");
     49        Inlet                   as stream                               (Brief="Feed stream", PosX=0, PosY=0.4932, Symbol="_{in}");
     50in      InletL                  as stream                               (Brief="Inlet liquid stream", PosX=0.5195, PosY=0, Symbol="_{inL}");
     51in      InletV                  as stream                               (Brief="Inlet vapour stream", PosX=0.4994, PosY=1, Symbol="_{inV}");
     52out     OutletL         as liquid_stream        (Brief="Outlet liquid stream", PosX=0.8277, PosY=1, Symbol="_{outL}");
     53out     OutletV         as vapour_stream        (Brief="Outlet vapour stream", PosX=0.8043, PosY=0, Symbol="_{outV}");
    5254
    5355        M(NComp) as mol (Brief="Molar Holdup in the tray");
     
    197199        end
    198200       
    199         btemp = 1 - 0.3593/'Pa^0.0888545'*(OutletV.F*sum(Mw*OutletV.z)/(Ap*1.3)/sqrt(rhoV))^0.177709; #/'(kg/m)^0.0888545/s^0.177709';
     201        btemp = 1 - 0.3593/'Pa^0.0888545'*abs(OutletV.F*sum(Mw*OutletV.z)/(Ap*1.3)/sqrt(rhoV))^0.177709; #/'(kg/m)^0.0888545/s^0.177709';
    200202
    201203        switch VapourFlow
Note: See TracChangeset for help on using the changeset viewer.