Ticket #5371: HX_Check_Successful.mo

File HX_Check_Successful.mo, 4.0 KB (added by KieranF <kieran.fung@…>, 6 years ago)

Heat Exchanger Working Model

Line 
1model HX_Check_Successful
2 
3  ThermoPower.PowerPlants.HRSG.Components.HE HX(FluidPhaseStart = ThermoPower.Choices.FluidPhase.FluidPhases.Steam, Tstartbar_G = 973.15, dpnom_F(displayUnit = "Pa") = 0, dpnom_G = 0, exchSurface_F = 450, exchSurface_G = 2000, extSurfaceTub = 500, fluidNomFlowRate = 55, fluidNomPressure = 100000, fluidVol = 4.5, gasNomFlowRate = 400, gasNomPressure = 100000, gasVol = 10, lambda = 20, metalVol = 1.2, pstart_F = 100000, pstart_G = 100000, rhomcm = 7900, rhonom_F(displayUnit = "kg/m3") = 0.6, rhonom_G(displayUnit = "kg/m3") = 0.33)  annotation(
4    Placement(visible = true, transformation(origin = {-1.9984e-15, 1.9984e-15}, extent = {{-20, -20}, {20, 20}}, rotation = 0)));
5 
6  ThermoPower.Gas.SinkPressure sinkPressure1(
7    redeclare package Medium = ThermoPower.Media.FlueGas) annotation(
8    Placement(visible = true, transformation(origin = {92, 0}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
9 
10  ThermoPower.Gas.SensT sensT1(
11    redeclare package Medium = ThermoPower.Media.FlueGas, allowFlowReversal = false) annotation(
12    Placement(visible = true, transformation(origin = {-50, 4}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
13 
14  ThermoPower.Gas.SensT sensT2(
15    redeclare package Medium = ThermoPower.Media.FlueGas, allowFlowReversal = false) annotation(
16    Placement(visible = true, transformation(origin = {50, 4}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
17 
18  ThermoPower.Water.SinkPressure sinkPressure2(
19    redeclare package Medium = ThermoPower.Water.StandardWater, p0 = 1e5) annotation(
20    Placement(visible = true, transformation(origin = {10, -92}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
21 
22  ThermoPower.Water.SensT sensT3(
23    redeclare package Medium = ThermoPower.Water.StandardWater) annotation(
24    Placement(visible = true, transformation(origin = {4, 50}, extent = {{-10, -10}, {10, 10}}, rotation = -90)));
25 
26  ThermoPower.Water.SensT sensT4(
27    redeclare package Medium = ThermoPower.Water.StandardWater, allowFlowReversal = false) annotation(
28    Placement(visible = true, transformation(origin = {4, -50}, extent = {{-10, -10}, {10, 10}}, rotation = -90)));
29  inner ThermoPower.System system annotation(
30    Placement(visible = true, transformation(origin = {-90, 90}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
31 
32  ThermoPower.Gas.SourceMassFlow sourceMassFlow1(
33    redeclare package Medium = ThermoPower.Media.FlueGas, T = 700, w0 = 400) annotation(
34    Placement(visible = true, transformation(origin = {-92, 0}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
35 
36  ThermoPower.Water.SourceMassFlow sourceMassFlow2(
37    redeclare package Medium = ThermoPower.Water.StandardWater, T = 298.15, p0 = 1e5, use_T = true, w0 = 55) annotation(
38    Placement(visible = true, transformation(origin = {2, 92}, extent = {{-10, -10}, {10, 10}}, rotation = -90)));
39equation
40  connect(sourceMassFlow2.flange, sensT3.inlet) annotation(
41    Line(points = {{0, 82}, {0, 82}, {0, 56}, {0, 56}}, color = {0, 0, 255}));
42  connect(sourceMassFlow1.flange, sensT1.inlet) annotation(
43    Line(points = {{-82, 0}, {-56, 0}, {-56, 0}, {-56, 0}}, color = {159, 159, 223}));
44  connect(sensT2.outlet, sinkPressure1.flange) annotation(
45    Line(points = {{56, 0}, {82, 0}, {82, 0}, {82, 0}}, color = {159, 159, 223}));
46  connect(HX.gasOut, sensT2.inlet) annotation(
47    Line(points = {{20, 0}, {44, 0}, {44, 0}, {44, 0}}, color = {159, 159, 223}));
48  connect(sensT1.outlet, HX.gasIn) annotation(
49    Line(points = {{-44, 0}, {-20, 0}, {-20, 0}, {-20, 0}}, color = {159, 159, 223}));
50  connect(sensT4.outlet, sinkPressure2.flange) annotation(
51    Line(points = {{0, -56}, {0, -56}, {0, -92}, {0, -92}}, color = {0, 0, 255}));
52  connect(HX.waterOut, sensT4.inlet) annotation(
53    Line(points = {{0, -20}, {0, -20}, {0, -44}, {0, -44}}, color = {0, 0, 255}));
54  connect(sensT3.outlet, HX.waterIn) annotation(
55    Line(points = {{0, 44}, {0, 44}, {0, 20}, {0, 20}}, color = {0, 0, 255}));
56  annotation(
57    uses(ThermoPower(version = "3.1")));end HX_Check_Successful;