1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
within Simulator.UnitOperations;
model RecycleBlock
extends Simulator.Files.Icons.Mixer;
//========================================================================================
Real Fin(start = Fg) "inlet mixture molar flow rate";
Real Fout(start = Fg) "outlet mixture molar flow rate";
Real Pin(start = Pg) "Inlet pressure";
Real Pout(start = Pg) "Outlet pressure";
Real Tin(start = Tg) "Inlet Temperature";
Real Tout(start = Tg) "Outlet Temperature";
//========================================================================================
Real xin_c[Nc](each min = 0, each max = 1, start = xguess) "mixture mole fraction";
Real xout_c[Nc](each min = 0, each max = 1, start = xguess);
parameter Integer Nc "number of components";
parameter Simulator.Files.ChemsepDatabase.GeneralProperties C[Nc];
//========================================================================================
Simulator.Files.Interfaces.matConn inlet(Nc = Nc) annotation(
Placement(visible = true, transformation(origin = {-100, 0}, extent = {{-10, -10}, {10, 10}}, rotation = 0), iconTransformation(origin = {-100, 0}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
Simulator.Files.Interfaces.matConn outlet(Nc = Nc) annotation(
Placement(visible = true, transformation(origin = {100, 0}, extent = {{-10, -10}, {10, 10}}, rotation = 0), iconTransformation(origin = {100, -2}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
//=========================================================================================
extends Simulator.GuessModels.InitialGuess;
equation
//connector equations
inlet.P = Pin;
inlet.T = Tin;
inlet.Fmol = Fin;
inlet.xfrac[1, :] = xin_c[:];
outlet.P = Pout;
outlet.T = Tout;
outlet.Fmol = Fout;
outlet.xfrac[1, :] = xout_c[:];
//=============================================================================================
Fin = Fout;
//material balance
xin_c = xout_c;
//energy balance
Pin = Pout;
//pressure calculation
Tin = Tout;
//temperature calculation
end RecycleBlock;
|
