| Name | Description |
|---|---|
| PartialStaticTwoPortCoolingTower | |
| PartialStaticTwoPortCoolingTowerWetBulb | Partial test model for cooling tower with wet bulb temperature as potential for heat transfer |
| Type | Name | Default | Description |
|---|---|---|---|
| PartialStaticTwoPortCoolingTower | tow | redeclare Buildings.Fluid.He... | Cooling tower |
| Nominal condition | |||
| MassFlowRate | mWat0_flow | 0.15 | Design air flow rate [kg/s] |
| MassFlowRate | mAir0_flow | 1.64*1.2 | Design air flow rate [kg/s] |
partial model PartialStaticTwoPortCoolingTower
package Medium_W = Buildings.Media.ConstantPropertyLiquidWater;
parameter Modelica.SIunits.MassFlowRate mWat0_flow = 0.15
"Design air flow rate";
parameter Modelica.SIunits.MassFlowRate mAir0_flow = 1.64*1.2
"Design air flow rate";
Modelica.Blocks.Sources.Constant TWat(k=273.15 + 35) "Water temperature";
replaceable Buildings.Fluid.HeatExchangers.CoolingTowers.BaseClasses.PartialStaticTwoPortCoolingTower
tow( redeclare package Medium = Medium_W, m_flow_nominal=mWat0_flow,
dp_nominal=10) "Cooling tower";
Buildings.Fluid.Sources.Boundary_pT sin_1( T=283.15, redeclare
package Medium = Medium_W,
p=101325,
nPorts=1);
Buildings.Fluid.Sources.Boundary_pT sou_1(
redeclare package Medium = Medium_W,
nPorts=1,
use_p_in=true,
use_T_in=true,
p=101335,
T=293.15);
Modelica.Blocks.Sources.Constant PWatIn(k=101335);
Modelica.Blocks.Sources.Sine TOut(amplitude=10, offset=293.15)
"Outside air temperature";
inner Modelica.Fluid.System system;
equation
connect(TWat.y, sou_1.T_in);
connect(PWatIn.y, sou_1.p_in);
connect(sou_1.ports[1], tow.port_a);
connect(tow.port_b, sin_1.ports[1]);
end PartialStaticTwoPortCoolingTower;
| Type | Name | Default | Description |
|---|---|---|---|
| PartialStaticTwoPortCoolingTower | tow | redeclare Buildings.Fluid.He... | Cooling tower |
| Nominal condition | |||
| MassFlowRate | mWat0_flow | 0.15 | Design air flow rate [kg/s] |
| MassFlowRate | mAir0_flow | 1.64*1.2 | Design air flow rate [kg/s] |
model PartialStaticTwoPortCoolingTowerWetBulb "Partial test model for cooling tower with wet bulb temperature as potential for heat transfer" import Buildings; extends PartialStaticTwoPortCoolingTower; package Medium_A = Buildings.Media.PerfectGases.MoistAir;Modelica.Blocks.Sources.Constant Xi(k=0.01) "Water vapor concentration"; Buildings.Utilities.Psychrometrics.Twb_TdbXi wetBulTem( redeclare package Medium = Medium_A) "Model for wet bulb temperature"; Modelica.Blocks.Sources.Constant PAtm(k=101325) "Atmospheric pressure"; equationconnect(PAtm.y, wetBulTem.p); connect(Xi.y, wetBulTem.Xi[1]); connect(wetBulTem.Twb, tow.TAir); connect(TOut.y, wetBulTem.Tdb); end PartialStaticTwoPortCoolingTowerWetBulb;