source: mso/sample/stage_separators/sample_condenser.mso @ 19

Last change on this file since 19 was 1, checked in by Rafael de Pelegrini Soares, 16 years ago

Initial import of the library

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 1.6 KB
Line 
1using "stage_separators/condenser";
2using "mixers_splitters/splitter";
3
4# condenser with splitter dividing liquid outlet
5FlowSheet condenser_Test
6        PARAMETERS
7        PP      as CalcObject(Brief="Physical Properties",File="vrpp");
8        NComp   as Integer;
9
10        VARIABLES
11        Q       as heat_rate (Brief="Heat supplied");
12       
13        SET
14        PP.Components = [ "isobutane", "n-pentane"];
15        PP.LiquidModel = "PR";
16        PP.VapourModel = "PR";
17        NComp = PP.NumberOfComponents;
18       
19        DEVICES
20        c1 as condenser;
21        sp as splitter;
22        s1 as stream_therm;
23       
24        CONNECTIONS
25        s1 to c1.InletV;
26        c1.OutletL to sp.Inlet;
27        Q to c1.Q;
28       
29        SPECIFY
30        s1.P = 152 * "kPa";
31        s1.T = 298.6 * "K";
32        s1.F = 153 * "kmol/h";
33        s1.z = [0.664, 0.336];
34        s1.v = 1.0;
35       
36        sp.frac = 0.444445;
37        c1.OutletV.F = 0 * "kmol/h";
38        c1.OutletL.F = 153 * "kmol/h";
39
40        Q = -3.71e6 * "kJ/h";
41
42        SET
43        c1.V = 2 * "m^3";
44        c1.Across = 1 * "m^2";
45
46        INITIAL
47        c1.OutletL.T = 280 *"K";
48        c1.Level = 1 * "m";
49        c1.OutletL.z(1) = 0.65;
50       
51        OPTIONS
52        outputLevel = "medium";
53        time = [0:20:1000];
54end
55
56FlowSheet condenserSteady_Test
57        PARAMETERS
58        PP      as CalcObject(Brief="Physical Properties",File="vrpp");
59        NComp   as Integer;
60
61        VARIABLES
62        Q       as heat_rate (Brief="Heat supplied");
63       
64        SET
65        PP.Components = [ "isobutane", "n-pentane"];
66        PP.LiquidModel = "PR";
67        PP.VapourModel = "PR";
68        NComp = PP.NumberOfComponents;
69       
70        DEVICES
71        c1 as condenserSteady;
72        s1 as stream_therm;
73       
74        CONNECTIONS
75        s1 to c1.InletV;
76        Q to c1.Q;
77       
78        SPECIFY
79        s1.P = 152 * "kPa";
80        s1.T = 298.6 * "K";
81        s1.F = 153 * "kmol/h";
82        s1.z = [0.664, 0.336];
83        s1.v = 1.0;
84        Q = 3.71e6 * "kJ/h";
85
86        SET
87        c1.DP = 100 * "kPa";
88
89        OPTIONS
90        mode = "steady";
91        outputLevel = "medium";
92        time = [0:20:1000];
93end
Note: See TracBrowser for help on using the repository browser.