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

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

DP as variable in CondenserSteady?.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 1.5 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        time = [0:20:1000];
53end
54
55FlowSheet condenserSteady_Test
56        PARAMETERS
57        PP      as CalcObject(Brief="Physical Properties",File="vrpp");
58        NComp   as Integer;
59
60        VARIABLES
61        Q       as heat_rate (Brief="Heat supplied");
62       
63        SET
64        PP.Components = [ "isobutane", "n-pentane"];
65        PP.LiquidModel = "PR";
66        PP.VapourModel = "PR";
67        NComp = PP.NumberOfComponents;
68       
69        DEVICES
70        c1 as condenserSteady;
71        s1 as stream_therm;
72       
73        CONNECTIONS
74        s1 to c1.InletV;
75        Q to c1.Q;
76       
77        SPECIFY
78        s1.P = 152 * "kPa";
79        s1.T = 298.6 * "K";
80        s1.F = 153 * "kmol/h";
81        s1.z = [0.664, 0.336];
82        s1.v = 1.0;
83        Q = 3.71e6 * "kJ/h";
84        c1.DP = 100 * "kPa";
85
86        OPTIONS
87        mode = "steady";
88        time = [0:20:1000];
89end
Note: See TracBrowser for help on using the repository browser.