| Name | Description |
|---|---|
| Manifold | |
| MassExchange | Test model for latent heat exchange |
| Type | Name | Default | Description |
|---|---|---|---|
| replaceable package Medium | Buildings.Media.ConstantProp... | ||
| Integer | nPipPar | 3 | Number of parallel pipes |
| Integer | nPipSeg | 4 | Number of pipe segments |
| Type | Name | Description |
|---|---|---|
| replaceable package Medium | ||
model Manifold
package Medium = Buildings.Media.ConstantPropertyLiquidWater;
parameter Integer nPipPar = 3 "Number of parallel pipes";
parameter Integer nPipSeg = 4 "Number of pipe segments";
Modelica.Blocks.Sources.Constant POut(k=101325);
Buildings.Fluids.Sources.PrescribedBoundary_pTX sin_1(T=283.15, redeclare
package Medium = Medium);
Buildings.Fluids.Sources.PrescribedBoundary_pTX sou_1(
T=293.15,
redeclare package Medium = Medium,
p=101335);
Fluids.FixedResistances.FixedResistanceDpM res_1(
m0_flow=5,
redeclare package Medium = Medium,
dp0=10,
use_dh=true,
from_dp=false);
Modelica_Fluid.Sensors.MassFlowRate[nPipPar] mfr_1(redeclare each package
Medium = Medium);
Modelica.Blocks.Sources.Ramp TDb(
height=1,
duration=1,
offset=293.15);
Modelica.Blocks.Sources.Ramp P(
duration=1,
height=40,
offset=101305);
Buildings.HeatExchangers.BaseClasses.PipeManifoldFixedResistance pipFixRes_1(
redeclare package Medium = Medium,
nPipPar=nPipPar,
m0_flow=5,
dp0=10,
linearized=false,
mStart_flow_a=5);
Buildings.HeatExchangers.BaseClasses.PipeManifoldNoResistance pipNoRes_1(
redeclare package Medium = Medium, nPipPar=nPipPar,
mStart_flow_a=5);
Modelica.Blocks.Sources.Constant POut1(
k=101325);
Buildings.Fluids.Sources.PrescribedBoundary_pTX sin_2(T=283.15, redeclare
package Medium = Medium);
Buildings.Fluids.Sources.PrescribedBoundary_pTX sou_2(
T=293.15,
redeclare package Medium = Medium,
p=101335);
Fluids.FixedResistances.FixedResistanceDpM res_2(
m0_flow=5,
redeclare package Medium = Medium,
dp0=10,
use_dh=true,
from_dp=false);
Modelica_Fluid.Sensors.MassFlowRate[nPipPar, nPipSeg] mfr_2(redeclare each
package Medium =
Medium);
Modelica.Blocks.Sources.Ramp TDb1(
height=1,
duration=1,
offset=293.15);
Modelica.Blocks.Sources.Ramp P1(
duration=1,
height=40,
offset=101305);
Buildings.HeatExchangers.BaseClasses.DuctManifoldFixedResistance ducFixRes_2(
redeclare package Medium = Medium,
nPipPar=nPipPar,
nPipSeg=nPipSeg,
m0_flow=5,
dp0=10,
linearized=false,
mStart_flow_a=5);
Buildings.HeatExchangers.BaseClasses.DuctManifoldNoResistance ducNoRes_2(
redeclare package Medium = Medium,
nPipPar=nPipPar,
nPipSeg=nPipSeg,
mStart_flow_a=5);
Buildings.HeatExchangers.BaseClasses.CoilHeader hea1(
redeclare package Medium = Medium,
nPipPar=nPipPar,
mStart_flow_a=5) "Header for water-side heat exchanger register";
Buildings.HeatExchangers.BaseClasses.CoilHeader hea2(
redeclare package Medium = Medium,
nPipPar=nPipPar,
mStart_flow_a=5) "Header for water-side heat exchanger register";
equation
connect(POut.y, sin_1.p_in);
connect(sin_1.port, res_1.port_b);
connect(TDb.y, sou_1.T_in);
connect(P.y, sou_1.p_in);
connect(sou_1.port, pipFixRes_1.port_a);
connect(res_1.port_a, pipNoRes_1.port_a);
connect(POut1.y, sin_2.p_in);
connect(sin_2.port,res_2. port_b);
connect(TDb1.y, sou_2.T_in);
connect(P1.y, sou_2.p_in);
connect(sou_2.port,ducFixRes_2. port_a);
connect(res_2.port_a,ducNoRes_2. port_a);
connect(pipFixRes_1.port_b, hea1.port_a);
connect(hea1.port_b, mfr_1.port_a);
connect(mfr_1.port_b, hea2.port_a);
connect(hea2.port_b, pipNoRes_1.port_b);
connect(ducFixRes_2.port_b, mfr_2.port_a);
connect(mfr_2.port_b, ducNoRes_2.port_b);
end Manifold;
| Type | Name | Default | Description |
|---|---|---|---|
| replaceable package Medium | Buildings.Media.PerfectGases... | ||
| Type | Name | Description |
|---|---|---|
| replaceable package Medium | ||
model MassExchange "Test model for latent heat exchange"
package Medium = Buildings.Media.PerfectGases.MoistAir;
Buildings.HeatExchangers.BaseClasses.MassExchange masExc(redeclare package
Medium = Medium) "Model for mass exchange";
Modelica.Blocks.Sources.Ramp TSur(
duration=1,
height=20,
offset=273.15 + 5) "Surface temperature";
Modelica.Blocks.Sources.Constant XWat(k=0.01)
"Humidity mass fraction in medium";
Modelica.Blocks.Sources.Constant Gc(k=1)
"Sensible convective thermal conductance";
equation
connect(TSur.y, masExc.TSur);
connect(Gc.y, masExc.Gc);
connect(XWat.y, masExc.XInf);
end MassExchange;