source: mso/sample/stage_separators/sample_reboiler.mso @ 42

Last change on this file since 42 was 42, checked in by Paula Bettio Staudt, 16 years ago

Stage separators modifications

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 1.6 KB
Line 
1using "stage_separators/reboiler";
2
3FlowSheet reboiler_Test
4        PARAMETERS
5        PP      as CalcObject(Brief="Physical Properties",File="vrpp");
6        NComp   as Integer;
7
8        VARIABLES
9        Q       as heat_rate (Brief="Heat supplied");
10
11        SET
12        PP.Components = [ "isobutane", "n-pentane"];
13        PP.LiquidModel = "PR";
14        PP.VapourModel = "PR";
15        NComp = PP.NumberOfComponents;
16       
17        DEVICES
18        r1 as reboiler;
19        feed as stream_therm;
20        s1 as stream_therm;
21
22        CONNECTIONS
23        feed to r1.Inlet;
24        s1 to r1.InletL;
25        Q to r1.Q;
26       
27        SPECIFY
28        feed.F = 0 * "kmol/h";
29        feed.T = 328 * "K";
30        feed.P = 180 * "kPa";
31        feed.z = [0.5, 0.5];
32        feed.v = 0;
33
34        s1.P = 185 * "kPa";
35        s1.T = 327.7 * "K";
36        s1.F = 180 * "kmol/h";
37        s1.z = [0.006061, 0.9939];
38        s1.v = 0.0;
39       
40        r1.OutletL.F = 28.4 * "kmol/h";
41        r1.OutletV.F = 151.6 * "kmol/h";
42
43        Q = 3.7743e6 * "kJ/h";
44
45        SET
46        r1.V = 2 * "m^3";
47        r1.Across = 1 * "m^2";
48       
49        INITIAL
50        r1.OutletL.T = 320 *"K";
51        r1.Level = 1 * "m";
52        r1.OutletL.z(2) = 0.9;
53       
54        OPTIONS
55        relativeAccuracy = 1e-5;
56       
57        time = [0:20:1000];
58end
59
60
61FlowSheet reboilerSteady_Test
62        PARAMETERS
63        PP      as CalcObject(Brief="Physical Properties",File="vrpp");
64        NComp   as Integer;
65
66        VARIABLES
67        Q       as heat_rate (Brief="Heat supplied");
68
69        SET
70        PP.Components = [ "isobutane", "n-pentane"];
71        PP.LiquidModel = "PR";
72        PP.VapourModel = "PR";
73        NComp = PP.NumberOfComponents;
74       
75        DEVICES
76        r1 as reboilerSteady;
77        s1 as stream_therm;
78
79        CONNECTIONS
80        s1 to r1.InletL;
81        Q to r1.Q;
82       
83        SPECIFY
84        s1.P = 185 * "kPa";
85        s1.T = 327.7 * "K";
86        s1.F = 180 * "kmol/h";
87        s1.z = [0.006061, 0.9939];
88        s1.v = 0.0;
89       
90#       Q = 3.7743e6 * "kJ/h";
91        r1.OutletV.T = 350 * "K";
92
93        SET
94        r1.DP = 10 * "kPa";
95       
96        OPTIONS
97        relativeAccuracy = 1e-5;
98        mode = "steady";
99end
Note: See TracBrowser for help on using the repository browser.