physicalProperties.f90 File Reference

Calculates material properties of the system. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	physicalproperties::createmodels (ngas)
	Creates Modena models. More...
subroutine	physicalproperties::destroymodels (ngas)
	Destroys Modena models. More...
real(dp) function	physicalproperties::polymerdensity (temp)
	Calculation of density of polymer. More...
real(dp) function	physicalproperties::gasmixtureconductivity (temp, xg, ngas)
	Thermal conductivity of mixture of blowing agents. More...
real(dp) function	physicalproperties::gasconductivity (temp, index)
	Thermal conductivity of carbon dioxide. More...
real(dp) function	physicalproperties::solubility (temp, index)
	Solubility of gas. More...
real(dp) function	physicalproperties::diffusivity (temp, index)
	Diffusivity of gas. More...
real(dp) function	physicalproperties::gasdiffusivity (temp)
	Diffusivity of gases in gas phase. More...
real(dp) function	physicalproperties::cdheatcapacity (temp)
	Heat capacity of carbon dioxide at constant pressure (J/mol/K). More...
real(dp) function	physicalproperties::cypheatcapacity (temp)
	Heat capacity of cyclo-pentane at constant pressure (J/mol/K). More...
real(dp) function	physicalproperties::airheatcapacity (temp)
	Heat capacity of air at constant pressure (J/mol/K). More...
real(dp) function	physicalproperties::nitrheatcapacity (temp)
	Heat capacity of nitrogen at constant pressure (J/mol/K). More...
real(dp) function	physicalproperties::oxyheatcapacity (temp)
	Heat capacity of oxygen at constant pressure (J/mol/K). More...
subroutine	physicalproperties::strutcontent (strut_content, foam_density)
	Calculation of strut content. More...

Variables
integer(c_int)	physicalproperties::ret
type(c_ptr)	physicalproperties::rhopmodena = c_null_ptr
type(c_ptr)	physicalproperties::rhopinputs = c_null_ptr
type(c_ptr)	physicalproperties::rhopoutputs = c_null_ptr
integer(c_size_t)	physicalproperties::rhoptemppos
type(c_ptr)	physicalproperties::kfoammodena = c_null_ptr
type(c_ptr)	physicalproperties::kfoaminputs = c_null_ptr
type(c_ptr)	physicalproperties::kfoamoutputs = c_null_ptr
integer(c_size_t)	physicalproperties::kfoamepspos
integer(c_size_t)	physicalproperties::kfoamdcellpos
integer(c_size_t)	physicalproperties::kfoamfstrutpos
integer(c_size_t)	physicalproperties::kfoamtemppos
integer(c_size_t), dimension(:), allocatable	physicalproperties::kfoamxg
type(c_ptr)	physicalproperties::kgasmodena = c_null_ptr
type(c_ptr)	physicalproperties::kgasinputs = c_null_ptr
type(c_ptr)	physicalproperties::kgasoutputs = c_null_ptr
integer(c_size_t)	physicalproperties::kgastemppos
integer(c_size_t), dimension(:), allocatable	physicalproperties::kgasxg
type(c_ptr), dimension(:), allocatable	physicalproperties::sgmodena
type(c_ptr), dimension(:), allocatable	physicalproperties::sginputs
type(c_ptr), dimension(:), allocatable	physicalproperties::sgoutputs
integer(c_size_t), dimension(:), allocatable	physicalproperties::sgtemppos
integer(c_size_t), dimension(:), allocatable	physicalproperties::sgxl1pos
integer(c_size_t), dimension(:), allocatable	physicalproperties::sgxl2pos
type(c_ptr), dimension(:), allocatable	physicalproperties::dgmodena
type(c_ptr), dimension(:), allocatable	physicalproperties::dginputs
type(c_ptr), dimension(:), allocatable	physicalproperties::dgoutputs
integer(c_size_t), dimension(:), allocatable	physicalproperties::dgtemppos
type(c_ptr), dimension(:), allocatable	physicalproperties::kgmodena
type(c_ptr), dimension(:), allocatable	physicalproperties::kginputs
type(c_ptr), dimension(:), allocatable	physicalproperties::kgoutputs
integer(c_size_t), dimension(:), allocatable	physicalproperties::kgtemppos

Detailed Description

Calculates material properties of the system.

Author

Michal Vonka

Pavel Ferkl

Also defines all Modena variables and models.

Definition in file physicalProperties.f90.

Function/Subroutine Documentation

airheatcapacity()

real(dp) function physicalproperties::airheatcapacity

(

real(dp), intent(in)

temp

)

Heat capacity of air at constant pressure (J/mol/K).

Calculated from oxygen and nitrogen.

Parameters

[in]

temp

temperature

Definition at line 331 of file physicalProperties.f90.

cdheatcapacity()

real(dp) function physicalproperties::cdheatcapacity

(

real(dp), intent(in)

temp

)

Heat capacity of carbon dioxide at constant pressure (J/mol/K).

link

Parameters

[in]

temp

temperature

Definition at line 293 of file physicalProperties.f90.

createmodels()

subroutine physicalproperties::createmodels

(

integer

ngas

)

Creates Modena models.

Names of models and inputs are hardcoded here.

Definition at line 52 of file physicalProperties.f90.

References globals::diffmodel, and globals::solmodel.

cypheatcapacity()

real(dp) function physicalproperties::cypheatcapacity

(

real(dp), intent(in)

temp

)

Heat capacity of cyclo-pentane at constant pressure (J/mol/K).

Fitted to data from link

Parameters

[in]

temp

temperature

Definition at line 312 of file physicalProperties.f90.

destroymodels()

subroutine physicalproperties::destroymodels

(

integer, intent(in)

ngas

)

Destroys Modena models.

Cleans Modena models, inputs and outputs from memory.

Definition at line 139 of file physicalProperties.f90.

References globals::diffmodel, and globals::solmodel.

diffusivity()

real(dp) function physicalproperties::diffusivity	(	real(dp), intent(in)	temp,
		integer, intent(in)	index
	)

Diffusivity of gas.

Modena call.

Parameters

[in]	index	index of gas
[in]	temp	temperature

Definition at line 248 of file physicalProperties.f90.

gasconductivity()

real(dp) function physicalproperties::gasconductivity	(	real(dp), intent(in)	temp,
		integer, intent(in)	index
	)

Thermal conductivity of carbon dioxide.

Modena call.

Parameters

[in]	index	index of gas
[in]	temp	temperature

Definition at line 209 of file physicalProperties.f90.

gasdiffusivity()

real(dp) function physicalproperties::gasdiffusivity

(

real(dp), intent(in)

temp

)

Diffusivity of gases in gas phase.

Accoriding to Bird 1975, p.505, eq. 16.3-1.

Parameters

[in]

temp

temperature

Definition at line 265 of file physicalProperties.f90.

References globals::pressure.

gasmixtureconductivity()

real(dp) function physicalproperties::gasmixtureconductivity	(	real(dp), intent(in)	temp,
		real(dp), dimension(:), intent(in)	xg,
		integer, intent(in)	ngas
	)

Thermal conductivity of mixture of blowing agents.

Modena call.

Parameters

[in]	ngas	number of gases
[in]	temp	temperature
[in]	xg	molar fractions of gases

Definition at line 187 of file physicalProperties.f90.

nitrheatcapacity()

real(dp) function physicalproperties::nitrheatcapacity

(

real(dp), intent(in)

temp

)

Heat capacity of nitrogen at constant pressure (J/mol/K).

link

Parameters

[in]

temp

temperature

Definition at line 342 of file physicalProperties.f90.

oxyheatcapacity()

real(dp) function physicalproperties::oxyheatcapacity

(

real(dp), intent(in)

temp

)

Heat capacity of oxygen at constant pressure (J/mol/K).

link

Parameters

[in]

temp

temperature

Definition at line 361 of file physicalProperties.f90.

polymerdensity()

real(dp) function physicalproperties::polymerdensity

(

real(dp), intent(in)

temp

)

Calculation of density of polymer.

Modena call.

Parameters

[in]

temp

temperature

Definition at line 171 of file physicalProperties.f90.

solubility()

real(dp) function physicalproperties::solubility	(	real(dp), intent(in)	temp,
		integer, intent(in)	index
	)

Solubility of gas.

Modena call.

Parameters

[in]	index	index of gas
[in]	temp	temperature

Definition at line 226 of file physicalProperties.f90.

strutcontent()

subroutine public physicalproperties::strutcontent	(	real(dp), intent(out)	strut_content,
		real(dp), intent(in)	foam_density
	)

Calculation of strut content.

Modena call.

Parameters

[out]	strut_content	strut content
[in]	foam_density	foam density
[out]	strut_content	strut content
[in]	foam_density	foam density

Definition at line 380 of file physicalProperties.f90.