Physiolibrary.Thermal.Examples

Examples that demonstrate usage of the Pressure flow components

Information

Extends from Modelica.Icons.ExamplesPackage (Icon for packages containing runnable examples).

Package Content

Name Description
Physiolibrary.Thermal.Examples.SkinHeatFlow SkinHeatFlow  
Physiolibrary.Thermal.Examples.MuscleHeat MuscleHeat  
Physiolibrary.Thermal.Examples.ThermalBody_QHP ThermalBody_QHP  
Physiolibrary.Thermal.Examples.SkinHeatTransferOnBloodFlow SkinHeatTransferOnBloodFlow  

Physiolibrary.Thermal.Examples.SkinHeatFlow Physiolibrary.Thermal.Examples.SkinHeatFlow


Physiolibrary.Thermal.Examples.SkinHeatFlow

Information

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

Modelica definition

model SkinHeatFlow extends Modelica.Icons.Example; Components.IdealRadiator skinCirculation(MassFlow(displayUnit="g/min")= 0.0028333333333333) "Blood flow through skin"; Sources.UnlimitedHeat bodyCore(T(displayUnit="degC") = 310.15); Sources.UnlimitedHeat skin(T(displayUnit="degC") = 301.15); equation connect(skinCirculation.q_in, bodyCore.port); connect(skin.port, skinCirculation.q_out); end SkinHeatFlow;

Physiolibrary.Thermal.Examples.MuscleHeat Physiolibrary.Thermal.Examples.MuscleHeat


Physiolibrary.Thermal.Examples.MuscleHeat

Information

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

Modelica definition

model MuscleHeat extends Modelica.Icons.Example; Components.HeatAccumulation muscle( relativeHeat_start=52125.66, SpecificHeat=3475.044, Weight(displayUnit="kg") = 15); Components.IdealRadiator muscleCirculation(MassFlow(displayUnit="g/min") = 0.0114) "Blood circulation in skeletal muscle"; Modelica.Thermal.HeatTransfer.Sources.FixedHeatFlow generatedHeat(Q_flow=13.956) "Heat energy created by muscle"; Sources.UnlimitedHeat body(T(displayUnit="degC")= 310.15); equation connect(muscle.q_in, generatedHeat.port); connect(muscleCirculation.q_in, body.port); connect(muscle.q_in, muscleCirculation.q_out); end MuscleHeat;

Physiolibrary.Thermal.Examples.ThermalBody_QHP Physiolibrary.Thermal.Examples.ThermalBody_QHP


Physiolibrary.Thermal.Examples.ThermalBody_QHP

Information

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

Modelica definition

model ThermalBody_QHP import Physiolibrary; extends Modelica.Icons.Example; Thermal.Components.HeatAccumulation core(SpecificHeat=3475.044, Weight=10.75); Thermal.Components.HeatAccumulation GILumen(Weight=1); Thermal.Components.HeatAccumulation skeletalMuscle(SpecificHeat=3475.044, Weight=7.05); Thermal.Components.IdealRadiator muscleBloodFlow( MassFlow(displayUnit="g/min") = 0.0114, useMassFlowInput=false, SpecificHeat=3851.856); Thermal.Sources.MassOutflow urination; Thermal.Sources.MassOutflow lungsVapor( VaporizationHeat(displayUnit="kcal/g") = 2428344, SpecificHeat(displayUnit="kcal/(kg.K)"), MassFlow(displayUnit="g/min") = 4.6666666666667e-06); Thermal.Components.HeatAccumulation skin( relativeHeat_start=-8373.6, SpecificHeat=3475.044, Weight=0.56); Thermal.Components.IdealRadiator skinBloodFlow( MassFlow(displayUnit="g/min") = 0.0028333333333333, useMassFlowInput=false, SpecificHeat=3851.856); Thermal.Sources.MassOutflow insensibleVapor( VaporizationHeat(displayUnit="kcal/g") = 2428344, SpecificHeat(displayUnit="kcal/(kg.K)"), MassFlow(displayUnit="g/min") = 6.5e-06); Thermal.Sources.MassOutflow sweating(VaporizationHeat( displayUnit="kcal/g") = 2428344, SpecificHeat(displayUnit= "kcal/(kg.K)")); Modelica.Thermal.HeatTransfer.Components.ThermalConductor lumenVolume(G( displayUnit="kcal/(min.K)") = 1); Modelica.Thermal.HeatTransfer.Components.ThermalConductor air(G( displayUnit="kcal/(min.K)") = 2.4423); Thermal.Sources.UnlimitedHeat ambient(T=295.15); Modelica.Thermal.HeatTransfer.Sources.FixedHeatFlow skinMetabolicHeat(Q_flow= 1.95384); Modelica.Thermal.HeatTransfer.Sources.FixedHeatFlow coreMetabolicHeat(Q_flow= 55.824); Modelica.Thermal.HeatTransfer.Sources.FixedHeatFlow muscleMetabolicHeat(Q_flow( displayUnit="kcal/min") = 9.7692); Modelica.Thermal.HeatTransfer.Sources.FixedHeatFlow foodHeatIntake(Q_flow=0); Thermal.Components.Stream foodAbsorption(SpecificHeat=4186.8); equation connect(core.q_in, muscleBloodFlow.q_in); connect(skeletalMuscle.q_in, muscleBloodFlow.q_out); connect(core.q_in, urination.q_in); connect(core.q_in, lungsVapor.q_in); connect(skinBloodFlow.q_in, lungsVapor.q_in); connect(skin.q_in, skinBloodFlow.q_out); connect(skin.q_in, insensibleVapor.q_in); connect(sweating.q_in, insensibleVapor.q_in); connect(GILumen.q_in, lumenVolume.port_a); connect(core.q_in, lumenVolume.port_b); connect(skin.q_in, air.port_b); connect(skin.q_in, skinMetabolicHeat.port); connect(GILumen.q_in, foodHeatIntake.port); connect(skeletalMuscle.q_in, muscleMetabolicHeat.port); connect(core.q_in, coreMetabolicHeat.port); connect(skinBloodFlow.q_in, core.q_in); connect(GILumen.q_in,foodAbsorption. q_in); connect(foodAbsorption.q_out, core.q_in); connect(ambient.port, air.port_a); end ThermalBody_QHP;

Physiolibrary.Thermal.Examples.SkinHeatTransferOnBloodFlow Physiolibrary.Thermal.Examples.SkinHeatTransferOnBloodFlow


Physiolibrary.Thermal.Examples.SkinHeatTransferOnBloodFlow

Information

This flow rate can affect how much heat leaves the body, especially in cold conditions. This is shown in this model, where modeling constant temperatures of the body core (37°C) and skin (28°C), with a skin blood flow of 170 g/min and blood specific heat of 0.92 kcal/(kg.K), gives heat losses of about 1.4 kcal/min.

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

Modelica definition

model SkinHeatTransferOnBloodFlow extends Modelica.Icons.Example; Components.IdealRadiator skinCirculation(MassFlow(displayUnit="g/min")= 0.0028333333333333) "Blood circulation through skin"; Sources.UnlimitedHeat core(T(displayUnit="degC")= 310.15); Sources.UnlimitedHeat skin(T(displayUnit="degC") = 301.15); equation connect(skinCirculation.q_in, core.port); connect(skin.port, skinCirculation.q_out); end SkinHeatTransferOnBloodFlow;

Automatically generated Tue Sep 15 22:53:51 2015.