AR_D_B Subroutine

public subroutine AR_D_B(model, n, nb, nd, ndb, v, vb, vd, vdb, t, tb, td, tdb, arval, arvalb, arvald, arvaldb)

Type Bound

PCSAFT

Arguments

Type IntentOptional Attributes Name
class(PCSAFT), intent(in) :: model
real(kind=pr), intent(in) :: n(:)
real(kind=pr) :: nb(:)
real(kind=pr), intent(in) :: nd(:)
real(kind=pr) :: ndb(:)
real(kind=pr), intent(in) :: v
real(kind=pr) :: vb
real(kind=pr), intent(in) :: vd
real(kind=pr) :: vdb
real(kind=pr), intent(in) :: t
real(kind=pr) :: tb
real(kind=pr), intent(in) :: td
real(kind=pr) :: tdb
real(kind=pr) :: arval
real(kind=pr) :: arvalb
real(kind=pr) :: arvald
real(kind=pr) :: arvaldb

Calls

proc~~ar_d_b~~CallsGraph proc~ar_d_b PCSAFT%AR_D_B interface~popinteger4 popinteger4 proc~ar_d_b->interface~popinteger4 interface~popreal8 POPREAL8 proc~ar_d_b->interface~popreal8 interface~popreal8array POPREAL8ARRAY proc~ar_d_b->interface~popreal8array interface~pushinteger4 pushinteger4 proc~ar_d_b->interface~pushinteger4 interface~pushreal8 pushreal8 proc~ar_d_b->interface~pushreal8 interface~pushreal8array pushreal8array proc~ar_d_b->interface~pushreal8array popcontrol1b popcontrol1b proc~ar_d_b->popcontrol1b pushcontrol1b pushcontrol1b proc~ar_d_b->pushcontrol1b

Variables

Type Visibility Attributes Name Initial
real(kind=pr), public :: a1_term_disp
real(kind=pr), public :: a1_term_dispb
real(kind=pr), public :: a1_term_dispd
real(kind=pr), public :: a1_term_dispdb
real(kind=pr), public :: a2_term_disp
real(kind=pr), public :: a2_term_dispb
real(kind=pr), public :: a2_term_dispd
real(kind=pr), public :: a2_term_dispdb
real(kind=pr), public :: a_k
real(kind=pr), public :: a_kb
real(kind=pr), public :: a_kd
real(kind=pr), public :: a_kdb
integer, public :: ad_to
integer, public :: ad_to0
real(kind=pr), public :: ar_chain
real(kind=pr), public :: ar_chainb
real(kind=pr), public :: ar_chaind
real(kind=pr), public :: ar_chaindb
real(kind=pr), public :: ar_dispersion
real(kind=pr), public :: ar_dispersionb
real(kind=pr), public :: ar_dispersiond
real(kind=pr), public :: ar_dispersiondb
real(kind=pr), public :: ar_hs
real(kind=pr), public :: ar_hsb
real(kind=pr), public :: ar_hsd
real(kind=pr), public :: ar_hsdb
real(kind=pr), public :: arg1
real(kind=pr), public, DIMENSION(SIZE(n)) :: arg10
real(kind=pr), public, DIMENSION(SIZE(n)) :: arg10b
real(kind=pr), public, DIMENSION(SIZE(n)) :: arg10d
real(kind=pr), public, DIMENSION(SIZE(n)) :: arg10db
integer, public :: arg11
real(kind=pr), public :: arg1b
real(kind=pr), public :: arg1d
real(kind=pr), public :: arg1db
real(kind=pr), public :: b_k
real(kind=pr), public :: b_kb
real(kind=pr), public :: b_kd
real(kind=pr), public :: b_kdb
integer(kind=4), public :: branch
real(kind=pr), public :: c1
real(kind=pr), public :: c1b
real(kind=pr), public :: c1d
real(kind=pr), public :: c1db
real(kind=pr), public :: d(SIZE(n))
real(kind=pr), public :: db(SIZE(n))
real(kind=pr), public :: dd(SIZE(n))
real(kind=pr), public :: ddb(SIZE(n))
real(kind=pr), public :: di_2
real(kind=pr), public :: di_2b
real(kind=pr), public :: di_2d
real(kind=pr), public :: di_2db
real(kind=pr), public :: eps_ij
real(kind=pr), public :: epsilon_k(SIZE(n))
real(kind=pr), public :: eta
real(kind=pr), public :: etab
real(kind=pr), public :: etad
real(kind=pr), public :: etadb
real(kind=pr), public :: g_ii
real(kind=pr), public :: g_iib
real(kind=pr), public :: g_iid
real(kind=pr), public :: g_iidb
integer, public :: i
real(kind=pr), public :: i1
real(kind=pr), public :: i1b
real(kind=pr), public :: i1d
real(kind=pr), public :: i1db
real(kind=pr), public :: i2
real(kind=pr), public :: i2b
real(kind=pr), public :: i2d
real(kind=pr), public :: i2db
integer, public :: j
integer, public :: k
real(kind=pr), public :: kij(SIZE(n),SIZE(n))
real(kind=pr), public :: kij_val
real(kind=pr), public :: m(SIZE(n))
real(kind=pr), public :: m2_e2s3
real(kind=pr), public :: m2_e2s3b
real(kind=pr), public :: m2_e2s3d
real(kind=pr), public :: m2_e2s3db
real(kind=pr), public :: m2_es3
real(kind=pr), public :: m2_es3b
real(kind=pr), public :: m2_es3d
real(kind=pr), public :: m2_es3db
real(kind=pr), public :: m_ave
real(kind=pr), public :: m_aveb
real(kind=pr), public :: m_aved
real(kind=pr), public :: m_avedb
logical, public, DIMENSION(SIZE(n)) :: mask
logical, public, DIMENSION(SIZE(n)) :: mask0
logical, public, DIMENSION(SIZE(n)) :: mask1
logical, public, DIMENSION(SIZE(n)) :: mask2
logical, public, DIMENSION(SIZE(n)) :: mask3
real(kind=pr), public :: n_tot
real(kind=pr), public :: n_totb
real(kind=pr), public :: n_totd
real(kind=pr), public :: n_totdb
integer, public :: nc
real(kind=pr), public :: result1
real(kind=pr), public :: result10
real(kind=pr), public :: rho
real(kind=pr), public :: rho_disp
real(kind=pr), public :: rho_dispb
real(kind=pr), public :: rho_dispd
real(kind=pr), public :: rho_dispdb
real(kind=pr), public :: rhob
real(kind=pr), public :: rhod
real(kind=pr), public :: rhodb
real(kind=pr), public :: sig_ij
real(kind=pr), public :: sigma(SIZE(n))
real(kind=pr), public :: temp
real(kind=pr), public, DIMENSION(SIZE(n)) :: temp0
real(kind=pr), public, DIMENSION(SIZE(n)) :: temp0b
real(kind=pr), public :: temp1
real(kind=pr), public :: temp10
real(kind=pr), public :: temp1b
real(kind=pr), public :: temp2
real(kind=pr), public :: temp2b
real(kind=pr), public, DIMENSION(SIZE(n, 1)) :: temp3
real(kind=pr), public :: temp4
real(kind=pr), public :: temp5
real(kind=pr), public :: temp6
real(kind=pr), public :: temp7
real(kind=pr), public :: temp8
real(kind=pr), public :: temp9
real(kind=pr), public :: tempb
real(kind=pr), public, DIMENSION(SIZE(n, 1)) :: tempb0
real(kind=pr), public, DIMENSION(SIZE(n, 1)) :: tempb1
real(kind=pr), public :: tempb2
real(kind=pr), public, DIMENSION(SIZE(n)) :: tempb3
real(kind=pr), public :: tempb4
real(kind=pr), public :: tempb5
real(kind=pr), public :: tempb6
real(kind=pr), public :: tempb7
real(kind=pr), public :: tempb8
real(kind=pr), public :: tempb9
real(kind=pr), public, DIMENSION(SIZE(n)) :: tempd
real(kind=pr), public :: tempd0
real(kind=pr), public :: tempd0b
real(kind=pr), public, DIMENSION(SIZE(n)) :: tempdb
real(kind=pr), public :: term1_hs
real(kind=pr), public :: term1_hsb
real(kind=pr), public :: term1_hsd
real(kind=pr), public :: term1_hsdb
real(kind=pr), public :: term2_hs
real(kind=pr), public :: term2_hsb
real(kind=pr), public :: term2_hsd
real(kind=pr), public :: term2_hsdb
real(kind=pr), public :: term3_hs
real(kind=pr), public :: term3_hsb
real(kind=pr), public :: term3_hsd
real(kind=pr), public :: term3_hsdb
real(kind=pr), public :: term_disp
real(kind=pr), public :: term_dispb
real(kind=pr), public :: term_dispd
real(kind=pr), public :: term_dispdb
real(kind=pr), public :: x(SIZE(n))
real(kind=pr), public :: xb(SIZE(n))
real(kind=pr), public :: xd(SIZE(n))
real(kind=pr), public :: xdb(SIZE(n))
real(kind=pr), public :: zetas(0:3)
real(kind=pr), public :: zetasb(0:3)
real(kind=pr), public :: zetasd(0:3)
real(kind=pr), public :: zetasdb(0:3)