kijk_exp_tdep Subroutine

public subroutine kijk_exp_tdep(self, T, ai, daidt, daidt2, a, dadt, dadt2)

Uses

- yaeos__models_ar_cubic_mixing_base
Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Combining rule that uses $k_{ijk}$ as a function of temperature.

$k_{ijk} = k_{ijk} + k_{ijk}^0 \exp \left(-T/T^{*}\)$

$a_{ijk} = \sqrt[3]{a_i a_j a_k} (1 - k_{ijk})$

Type Bound

Arguments

Type	Intent	Optional	Attributes		Name
class(CMRTD),	intent(in)			::	self
real(kind=pr),	intent(in)			::	T	Temperature [K]
real(kind=pr),	intent(in)			::	ai(:)	Pure components attractive parameters (\a_i)
real(kind=pr),	intent(in)			::	daidt(:)	$\frac{da_i}{dT}$
real(kind=pr),	intent(in)			::	daidt2(:)	$\frac{d^2a_i}{dT^2}$
real(kind=pr),	intent(out)			::	a(:,:,:)	$a_{ijk}$ Matrix
real(kind=pr),	intent(out)			::	dadt(:,:,:)	$\frac{da_{ijk}{dT}$
real(kind=pr),	intent(out)			::	dadt2(:,:,:)	$\frac{d^2a_{ijk}{dT^2}$

Calls

Help

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=pr),	private		::	c(size(ai),size(ai),size(ai))
real(kind=pr),	private		::	dkdt(size(ai),size(ai),size(ai))
real(kind=pr),	private		::	dkdt2(size(ai),size(ai),size(ai))
integer,	private		::	i
integer,	private		::	j
real(kind=pr),	private		::	k(size(ai),size(ai),size(ai))
integer,	private		::	l
integer,	private		::	nc