oil_gao Function

public function oil_gao()

J. Gao, R. Okuno, and H. A. Li, “An Experimental Study of Multiphase Behavior for n-Butane/Bitumen/Water Mixtures,” SPE Journal, 2016, doi: 10.2118/180736-pa.

Arguments

None

Return Value type(FixtureFluid)


Calls

proc~~oil_gao~~CallsGraph proc~oil_gao oil_gao proc~pengrobinson78 PengRobinson78 proc~oil_gao->proc~pengrobinson78 proc~set_mixrule CubicEoS%set_mixrule proc~oil_gao->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 = 6
real(kind=pr), public :: pc(nc)
real(kind=pr), public :: tc(nc)
real(kind=pr), public :: w(nc)