modelParallelRectangularEqualSurfaces

View factor calculation of two parallel equal rectangular surfaces with the edge lengths W1 and W2 and the distance H

Extends from Modelica.Icons.Example (Icon for runnable examples).

Information

Example that calculates the view factors of two parallel equal rectangular surfaces with the edge lengths W1 and W2 and the distance H. W1 varies with the time from 0 to 1.

Parameters

TypeNameDefaultDescription
Modelica.Units.SI.LengthW21.0
Modelica.Units.SI.LengthH1.0
Modelica.Units.SI.Length[3]vertex1{0.0, 0.0, 0.0}
Modelica.Units.SI.Length[3]vertex4{0.0, W2, 0.0}
Modelica.Units.SI.Length[3]vertex7{0.0, W2, H}
Modelica.Units.SI.Length[3]vertex8{0.0, 0.0, H}
IntegernRect2
Integer[nRect]r{1, 1}
Integer[nRect]z{10 for i in 1:nRect}

Components

TypeNameDefaultDescription
Modelica.Units.SI.LengthW1
Modelica.Units.SI.Length[3]vertex2{W1, 0.0, 0.0}
Modelica.Units.SI.Length[3]vertex3{W1, W2, 0.0}
Modelica.Units.SI.Length[3]vertex5{W1, 0.0, H}
Modelica.Units.SI.Length[3]vertex6{W1, W2, H}
Real[nRect]a1{vertex1[1], vertex8[1]}
Real[nRect]a2{vertex1[2], vertex8[2]}
Real[nRect]a3{vertex1[3], vertex8[3]}
Real[nRect]b1{vertex2[1], vertex7[1]}
Real[nRect]b2{vertex2[2], vertex7[2]}
Real[nRect]b3{vertex2[3], vertex7[3]}
Real[nRect]c1{vertex3[1], vertex6[1]}
Real[nRect]c2{vertex3[2], vertex6[2]}
Real[nRect]c3{vertex3[3], vertex6[3]}
Real[nRect]d1{vertex4[1], vertex5[1]}
Real[nRect]d2{vertex4[2], vertex5[2]}
Real[nRect]d3{vertex4[3], vertex5[3]}
Real[nRect,nRect]viewFacBuildingSystems.Buildings.Geometries.Viewfactors.Functions.PhiRect(nRect, a1, a2, a3, b1, b2, b3, c1, c2, c3, d1, d2, d3, r, z, false)
RealxW1/H
RealyW2/H
Realx1sqrt(1.0 + x^2)
Realy1sqrt(1.0 + y^2)
RealF121.0/(Modelica.Constants.pi*x*y)*(Modelica.Math.log((x1^2*y1^2)/(x1^2 + y1^2 - 1.0)) + 2.0*x*(y1*Modelica.Math.atan(x/y1) - Modelica.Math.atan(x)) + 2.0*y*(x1*Modelica.Math.atan(y/x1) - Modelica.Math.atan(y)))

Revisions

  • April 28, 2022, by Christoph Nytsch-Geusen:
    First implementation.