oil_b71 Function

public function oil_b71() result(fluid)

Arguments

None

Return Value type(FixtureFluid)


Calls

proc~~oil_b71~~CallsGraph proc~oil_b71 oil_b71 proc~pengrobinson78 PengRobinson78 proc~oil_b71->proc~pengrobinson78 proc~set_mixrule CubicEoS%set_mixrule proc~oil_b71->proc~set_mixrule

Variables

Type Visibility Attributes Name Initial
type(CubicEoS), public :: ar_model
real(kind=pr), public :: kij(nc,nc)
real(kind=pr), public :: lij(nc,nc)
type(QMR), public :: mixrule
integer, public, parameter :: nc = 16
real(kind=pr), public :: pc(nc)
real(kind=pr), public :: tc(nc)
real(kind=pr), public :: w(nc)