Buildings.HeatExchangers.CoolingTowers.Examples.BaseClasses

Package with base classes for examples

Package Content

NameDescription
PartialStaticTwoPortCoolingTower  
PartialStaticTwoPortCoolingTowerWetBulb Partial test model for cooling tower with wet bulb temperature as potential for heat transfer


Buildings.HeatExchangers.CoolingTowers.Examples.BaseClasses.PartialStaticTwoPortCoolingTower

Buildings.HeatExchangers.CoolingTowers.Examples.BaseClasses.PartialStaticTwoPortCoolingTower

Parameters

TypeNameDefaultDescription
replaceable package Medium_WBuildings.Media.ConstantProp... 
PartialStaticTwoPortCoolingTowertowredeclare Buildings.HeatExch...Cooling tower
Nominal condition
MassFlowRatemWat0_flow0.15Design air flow rate [kg/s]
MassFlowRatemAir0_flow1.64*1.2Design air flow rate [kg/s]

Connectors

TypeNameDescription
replaceable package Medium_W 

Modelica definition

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.HeatExchangers.CoolingTowers.BaseClasses.PartialStaticTwoPortCoolingTower
    tow(   redeclare package Medium = Medium_W) "Cooling tower";
  Buildings.Fluids.Sources.PrescribedBoundary_pTX sin_1(T=283.15, redeclare 
      package Medium = Medium_W,
    p=101325);
  Buildings.Fluids.Sources.PrescribedBoundary_pTX sou_1(
    T=293.15,
    p=101335,
    redeclare package Medium = Medium_W);
    Fluids.FixedResistances.FixedResistanceDpM res_1(
    from_dp=true,
    dp0=10,
    redeclare package Medium = Medium_W,
    m0_flow=mWat0_flow,
    dh=0.005);
    Modelica.Blocks.Sources.Constant PWatIn(k=101335);
  Modelica.Blocks.Sources.Sine TOut(amplitude=10, offset=293.15) 
    "Outside air temperature";
equation 
  connect(TWat.y, sou_1.T_in);
  connect(sin_1.port, res_1.port_b);
  connect(PWatIn.y, sou_1.p_in);
  connect(tow.port_a, sou_1.port);
  connect(res_1.port_a, tow.port_b);
end PartialStaticTwoPortCoolingTower;

Buildings.HeatExchangers.CoolingTowers.Examples.BaseClasses.PartialStaticTwoPortCoolingTowerWetBulb

Partial test model for cooling tower with wet bulb temperature as potential for heat transfer

Buildings.HeatExchangers.CoolingTowers.Examples.BaseClasses.PartialStaticTwoPortCoolingTowerWetBulb

Parameters

TypeNameDefaultDescription
PartialStaticTwoPortCoolingTowertowredeclare Buildings.HeatExch...Cooling tower
replaceable package Medium_ABuildings.Media.PerfectGases... 
Nominal condition
MassFlowRatemWat0_flow0.15Design air flow rate [kg/s]
MassFlowRatemAir0_flow1.64*1.2Design air flow rate [kg/s]

Connectors

TypeNameDescription
replaceable package Medium_A 

Modelica definition

model PartialStaticTwoPortCoolingTowerWetBulb 
  "Partial test model for cooling tower with wet bulb temperature as potential for heat transfer" 
  extends PartialStaticTwoPortCoolingTower;
 package Medium_A = Buildings.Media.PerfectGases.MoistAir;
    Modelica.Blocks.Sources.Constant phi(k=0.5) "Relative air humidity";
  Utilities.Psychrometrics.WetBulbTemperature wetBulTem(redeclare package 
      Medium = Medium_A) "Model for wet bulb temperature";
    Modelica.Blocks.Sources.Constant PAtm(k=101325) "Atmospheric pressure";
equation 
  connect(PAtm.y, wetBulTem.p);
  connect(TOut.y, wetBulTem.TDryBul);
  connect(phi.y, wetBulTem.phi);
  connect(wetBulTem.TWetBul, tow.TAir);
end PartialStaticTwoPortCoolingTowerWetBulb;

HTML-documentation generated by Dymola Tue Sep 30 14:24:40 2008.