source: mso/sample/pressure_changers/sample_pump.mso @ 57

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

Added new pressure_changers models

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 1.3 KB
Line 
1using "pressure_changers/pump";
2
3FlowSheet Pump_P1
4       
5        DEVICES
6        S1 as streamTP;
7        P1 as centrifugal_pump;
8       
9        CONNECTIONS
10        S1 to P1.Inlet;
11       
12        PARAMETERS
13        PP              as CalcObject   (Brief="External Physical Properties", File="vrpp");
14        Mw              as positive     (Brief = "Molar Mass", Unit = "kg/kmol");
15        NComp   as Integer              (Default= 1);
16
17        SET
18        PP.Components = ["water", "benzene"];   
19        PP.LiquidModel = "PR";
20        PP.VapourModel = "PR";
21        NComp = PP.NumberOfComponents;
22        PP.Derivatives = 0;
23        P1.N = 1000                     * "rpm";               
24        P1.Lev = 0                      * "m";
25        P1.Meff = 0.95;
26        P1.Eff = 0.72;
27        P1.Beta = 425e-6        * "1/K";
28       
29        SPECIFY
30        S1.F = 1000             * "kmol/h";
31        S1.P = 10                       * "atm";
32        S1.T = 298                      * "K" ;
33        S1.z = [1,0];   
34        P1.Pdiff = 8            * "kPa";
35        #P1.Outlet.P = 2        * "atm";
36        #P1.BPower = 1          * "kW";
37       
38end
39
40FlowSheet pump_Test
41        PARAMETERS
42        PP      as CalcObject(Brief="Physical Properties",File="vrpp");
43        NComp   as Integer;
44
45        SET
46        PP.Components = ["ethane", "propane", "propylene","1,3-butadiene","n-hexane"];
47        PP.LiquidModel = "PR";
48        PP.VapourModel = "PR";
49        NComp = PP.NumberOfComponents;
50       
51        DEVICES
52        p1 as pump;
53        s1 as stream_therm;
54       
55        CONNECTIONS
56        s1 to p1.Inlet;
57
58        SPECIFY
59        s1.F = 826 * "kmol/h";
60        s1.P = 549 * "kPa";
61        s1.T = 313 * "K";
62        s1.z = 1/NComp;
63        s1.v = 0.68;
64        p1.dP = 90 * "kPa";
65
66        OPTIONS
67        time = [0:20:1000];
68        mode = "steady";
69end
Note: See TracBrowser for help on using the repository browser.