Ticket #5391: HX_Pump_2_Superheater_2_HPTurbine.mo

File HX_Pump_2_Superheater_2_HPTurbine.mo, 5.2 KB (added by KieranF <kieran.fung@…>, 6 years ago)
Line 
1model HX_Pump_2_Superheater_2_HPTurbine
2 
3  //Heat Exchanger - Steam entering HX (compressed liquid) --> Steam exiting HX (super heated vapor)//
4  //Steam Turbine - High Pressure Turbine and is (1) of (2) in series with one another. Exit pressure should be intermediate pressure level before being reheated and directed towards Low Pressure Turbine//
5 
6  ThermoPower.PowerPlants.HRSG.Components.HE HX(
7    FluidPhaseStart = ThermoPower.Choices.FluidPhase.FluidPhases.Liquid, 
8    Tstartbar_G (displayUnit = "K") = 787.87, 
9    dpnom_F(displayUnit = "Pa") = 0, 
10    dpnom_G = 0, 
11    exchSurface_F = 4.739, 
12    exchSurface_G = 4.739, 
13    extSurfaceTub = 9.479, 
14    fluidNomFlowRate = 26.397, 
15    fluidNomPressure = 8e+06, 
16    fluidVol = 0.0296, 
17    gasNomFlowRate = 169.755, 
18    gasNomPressure = 101325, 
19    gasVol = 0.0296, 
20    lambda = 20, 
21    metalVol = 5, 
22    pstart_F = 8e+06, 
23    pstart_G = 101325, 
24    rhomcm = 1, 
25    rhonom_F(displayUnit = "kg/m3") = 0.6, 
26    rhonom_G(displayUnit = "kg/m3") = 0.33)  annotation(
27    Placement(visible = true, transformation(origin = {-1.9984e-15, 14}, extent = {{-20, -20}, {20, 20}}, rotation = 0)));
28 
29  ThermoPower.Gas.SinkPressure sinkPressure1(
30    redeclare package Medium = ThermoPower.Media.FlueGas, 
31    T = 106.86 + 273, 
32    p0 = 101325) annotation(
33    Placement(visible = true, transformation(origin = {92, 14}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
34 
35  ThermoPower.Gas.SensT sensT1(
36    redeclare package Medium = ThermoPower.Media.FlueGas, 
37    allowFlowReversal = false) annotation(
38    Placement(visible = true, transformation(origin = {-50, 18}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
39 
40  ThermoPower.Gas.SensT sensT2(
41    redeclare package Medium = ThermoPower.Media.FlueGas, 
42    allowFlowReversal = false) annotation(
43    Placement(visible = true, transformation(origin = {50, 18}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
44 
45  ThermoPower.Water.SinkPressure sinkPressure2(
46    redeclare package Medium = ThermoPower.Water.StandardWater, 
47    T = 165 + 273, 
48    h = 2536.2092e5, 
49    p0 = 7.0e5) annotation(
50    Placement(visible = true, transformation(origin = {92, -60}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
51 
52  ThermoPower.Water.SensT sensT3(
53    redeclare package Medium = ThermoPower.Water.StandardWater) annotation(
54    Placement(visible = true, transformation(origin = {4, 64}, extent = {{-10, -10}, {10, 10}}, rotation = -90)));
55 
56  ThermoPower.Water.SensT sensT4(
57    redeclare package Medium = ThermoPower.Water.StandardWater, 
58    allowFlowReversal = false) annotation(
59    Placement(visible = true, transformation(origin = {4, -32}, extent = {{-10, -10}, {10, 10}}, rotation = -90)));
60 
61  inner ThermoPower.System system annotation(
62    Placement(visible = true, transformation(origin = {-90, 90}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
63 
64  ThermoPower.Gas.SourceMassFlow sourceMassFlow1(
65    redeclare package Medium = ThermoPower.Media.FlueGas, 
66    T = 514 + 273, 
67    p0 = 101325,
68    w0 = 169.755) annotation(
69    Placement(visible = true, transformation(origin = {-90, 14}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
70 
71  ThermoPower.Water.SourceMassFlow sourceMassFlow2(
72    redeclare package Medium = ThermoPower.Water.StandardWater, 
73    T = 42.88 + 273, 
74    h = 183.1e3, 
75    p0 = 80e5, 
76    use_T = true, 
77    w0 = 26.397) annotation(
78    Placement(visible = true, transformation(origin = {2, 92}, extent = {{-10, -10}, {10, 10}}, rotation = -90)));
79 
80  ThermoPower.Water.SteamTurbineStodola steamTurbineStodola1(
81    Kt = 0.01328, 
82    PRstart = 11.43, 
83    explicitIsentropicEnthalpy = false, 
84    pnom = 80.0e5, 
85    pout(fixed = false), 
86    w(fixed = false), 
87    wnom = 26.397, 
88    wstart = 26.397)  annotation(
89    Placement(visible = true, transformation(origin = {12, -72}, extent = {{-14, -14}, {14, 14}}, rotation = 0)));
90
91equation
92  connect(sensT2.outlet, sinkPressure1.flange) annotation(
93    Line(points = {{56, 14}, {82, 14}}, color = {159, 159, 223}));
94  connect(steamTurbineStodola1.outlet, sinkPressure2.flange) annotation(
95    Line(points = {{24, -60}, {82, -60}, {82, -60}, {82, -60}}, color = {0, 0, 255}));
96  connect(sensT4.outlet, steamTurbineStodola1.inlet) annotation(
97    Line(points = {{0, -38}, {0, -38}, {0, -60}, {0, -60}}, color = {0, 0, 255}));
98  connect(HX.waterOut, sensT4.inlet) annotation(
99    Line(points = {{0, -6}, {0, -26}}, color = {0, 0, 255}));
100  connect(sourceMassFlow1.flange, sensT1.inlet) annotation(
101    Line(points = {{-80, 14}, {-56, 14}}, color = {159, 159, 223}));
102  connect(sensT3.outlet, HX.waterIn) annotation(
103    Line(points = {{0, 58}, {0, 58}, {0, 34}, {0, 34}}, color = {0, 0, 255}));
104  connect(sourceMassFlow2.flange, sensT3.inlet) annotation(
105    Line(points = {{0, 82}, {0, 70}}, color = {0, 0, 255}));
106  connect(HX.gasOut, sensT2.inlet) annotation(
107    Line(points = {{20, 14}, {44, 14}, {44, 14}, {44, 14}}, color = {159, 159, 223}));
108  connect(sensT1.outlet, HX.gasIn) annotation(
109    Line(points = {{-44, 14}, {-20, 14}, {-20, 14}, {-20, 14}}, color = {159, 159, 223}));
110  annotation(
111    uses(ThermoPower(version = "3.1"), Modelica(version = "3.2.3")));end HX_Pump_2_Superheater_2_HPTurbine;