source: mso/sample/stage_separators/sample_tray.mso @ 33

Last change on this file since 33 was 33, checked in by Argimiro Resende Secchi, 16 years ago

clean up.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 1.1 KB
Line 
1using "stage_separators/tray";
2
3FlowSheet tray_Test
4        PARAMETERS
5        PP      as CalcObject(Brief="Physical Properties",File="vrpp");
6        NComp   as Integer;
7
8        SET
9        PP.Components = [ "n-pentane", "isobutane"];
10        PP.LiquidModel = "PR";
11        PP.VapourModel = "PR";
12        NComp = PP.NumberOfComponents;
13       
14        DEVICES
15        t1 as tray;
16        feed as stream_therm;
17        inL as stream_therm;
18        inV as stream_therm;
19       
20        CONNECTIONS
21        feed to t1.Inlet;
22        inL to t1.InletL;
23        inV to t1.InletV;
24       
25        SPECIFY
26        feed.F = 113.4 * "kmol/h";
27        feed.T = 291 * "K";
28        feed.P = 1.66 * "atm";
29        feed.z = [0.5, 0.5];
30        feed.v = 0;
31       
32        inL.P = 165 * "kPa";
33        inL.T = 310 * "K";
34        inL.F = 61.99 * "kmol/h";
35        inL.z = [0.1641, 0.8359];
36        inL.v = 0.0;
37
38        inV.F = 147.1 * "kmol/h";
39        inV.v = 1.0;
40        inV.P = 150 * "kPa";
41        inV.T = 321 * "K";
42        inV.z = [0.0584, 0.9416];
43       
44        t1.Emv = 1;
45        t1.OutletV.F = 147.1 * "kmol/h";
46
47        SET
48        t1.V = 4 * "ft^3";
49        t1.Ah = 0.394 * "ft^2";
50        t1.lw = 20.94 * "in";
51        t1.hw = 0.125 * "ft";
52        t1.Q = 0 * "kW";
53        t1.beta = 0.6;
54        t1.alfa = 4;
55        t1.Ap = 3.94 * "ft^2";
56       
57        INITIAL
58        t1.OutletL.T = 290 *"K";
59        t1.Level = 0.9 * t1.hw;
60        t1.OutletL.z(1) = 0.5;
61       
62        OPTIONS
63        relativeAccuracy = 1e-6;
64        time = [0:1:100];
65end
Note: See TracBrowser for help on using the repository browser.