Buildings.Utilities.Comfort.Validation
Result comparison with a different comfort evaluation tool
Information
This package contains validation cases for the Fanger model that can be found in Buildings.Utilities.Comfort.
Extends from Modelica.Icons.ExamplesPackage (Icon for packages containing runnable examples).
Package Content
| Name | Description |
|---|---|
 FangerCBE
|
Script for comparing the PMV model with the CBE thermal comfort tool |
Buildings.Utilities.Comfort.Validation.FangerCBE
Script for comparing the PMV model with the CBE thermal comfort tool
Information
This example validates the PMV values against values calculated with the CBE (Center for the Built Environment, UC Berkeley) Thermal Comfort Tool for a variety of cases.
Extends from Modelica.Icons.Example (Icon for runnable examples).
Modelica definition
model FangerCBE
"Script for comparing the PMV model with the CBE thermal comfort tool"
extends Modelica.Icons.Example;
Buildings.Utilities.Comfort.Fanger com(
use_vAir_in=true,
use_M_in=true,
use_ICl_in=true,
use_pAir_in=false,
M=58,
ICl=0.6) "Thermal comfort model";
Modelica.Blocks.Sources.CombiTimeTable inp(
table=[
0, 293.15, 0.1, 0.5, 58, 0.6;
100, 295.15, 0.1, 0.5, 58, 0.6;
200, 297.15, 0.1, 0.5, 58, 0.6;
300, 299.15, 0.1, 0.5, 58, 0.6;
400, 301.15, 0.1, 0.5, 58, 0.6;
500, 303.15, 0.1, 0.5, 58, 0.6;
600, 297.15, 0.05, 0.5, 58, 0.6;
700, 297.15, 0.15, 0.5, 58, 0.6;
800, 297.15, 0.1, 0.2, 58, 0.6;
900, 297.15, 0.1, 0.3, 58, 0.6;
1000, 297.15, 0.1, 0.4, 58, 0.6;
1100, 297.15, 0.1, 0.5, 58, 0.6;
1200, 297.15, 0.1, 0.6, 58, 0.6;
1300, 297.15, 0.1, 0.7, 58, 0.6;
1400, 297.15, 0.1, 0.5, 72.5, 0.6;
1500, 297.15, 0.1, 0.5, 87, 0.6;
1600, 297.15, 0.1, 0.5, 101.5, 0.6;
1700, 297.15, 0.1, 0.5, 58, 0.4;
1800, 297.15, 0.1, 0.5, 58, 0.6;
1900, 297.15, 0.1, 0.5, 58, 0.8;
2000, 297.15, 0.1, 0.5, 58, 1;
2100, 297.15, 0.1, 0.5, 58, 1],
smoothness=Modelica.Blocks.Types.Smoothness.ConstantSegments)
"PMV input conditions";
Modelica.Blocks.Interaction.Show.RealValue realValue(significantDigits=3);
Modelica.Blocks.Sources.CombiTimeTable PMVRef(
table=[
0, -1.91;
100, -1.20;
200, -0.52;
300, 0.17;
400, 0.87;
500, 1.58;
600, -0.48;
700, -0.70;
800, -0.76;
900, -0.68;
1000, -0.60;
1100, -0.52;
1200, -0.44;
1300, -0.36;
1400, 0.08;
1500, 0.45;
1600, 0.73;
1700, -1.04;
1800, -0.52;
1900, -0.12;
2000, 0.20;
2100, 0.20],
smoothness=Modelica.Blocks.Types.Smoothness.ConstantSegments)
"PMV value calculated by the CBE Thermal Comfort Tool";
equation
connect(com.PMV, realValue.numberPort);
connect(inp.y[1], com.TAir);
connect(inp.y[1], com.TRad);
connect(inp.y[2], com.vAir_in);
connect(inp.y[3], com.phi);
connect(inp.y[4], com.M_in);
connect(inp.y[5], com.ICl_in);
end FangerCBE;