Buildings.Fluid.HeatExchangers.CoolingTowers.Examples.BaseClasses

Package with base classes for examples

Information

Extends from Modelica.Fluid.Icons.BaseClassLibrary (Icon for library).

Package Content

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


Buildings.Fluid.HeatExchangers.CoolingTowers.Examples.BaseClasses.PartialStaticTwoPortCoolingTower

Buildings.Fluid.HeatExchangers.CoolingTowers.Examples.BaseClasses.PartialStaticTwoPortCoolingTower

Parameters

TypeNameDefaultDescription
PartialStaticTwoPortCoolingTowertowredeclare Buildings.Fluid.He...Cooling tower
Nominal condition
MassFlowRatemWat0_flow0.15Design air flow rate [kg/s]
MassFlowRatemAir0_flow1.64*1.2Design air flow rate [kg/s]

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.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;

Buildings.Fluid.HeatExchangers.CoolingTowers.Examples.BaseClasses.PartialStaticTwoPortCoolingTowerWetBulb

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

Buildings.Fluid.HeatExchangers.CoolingTowers.Examples.BaseClasses.PartialStaticTwoPortCoolingTowerWetBulb

Information

Extends from PartialStaticTwoPortCoolingTower.

Parameters

TypeNameDefaultDescription
PartialStaticTwoPortCoolingTowertowredeclare Buildings.Fluid.He...Cooling tower
Nominal condition
MassFlowRatemWat0_flow0.15Design air flow rate [kg/s]
MassFlowRatemAir0_flow1.64*1.2Design air flow rate [kg/s]

Modelica definition

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";
equation 
  connect(PAtm.y, wetBulTem.p);
  connect(Xi.y, wetBulTem.Xi[1]);
  connect(wetBulTem.Twb, tow.TAir);
  connect(TOut.y, wetBulTem.Tdb);
end PartialStaticTwoPortCoolingTowerWetBulb;

HTML-documentation generated by Dymola Thu Jun 24 16:54:16 2010.