solve_point Subroutine

public subroutine solve_point(eos, n, P, T, V, Pcalc, ZETA, ZETMIN, ZETMAX, AT, iter)

Arguments

Type IntentOptional Attributes Name
class(ArModel), intent(in) :: eos
real(kind=pr), intent(in) :: n(:)
real(kind=pr), intent(in) :: P

Objective pressure [bar]
real(kind=pr), intent(in) :: T

Temperature [K]
real(kind=pr), intent(out) :: V

Obtained volume [L]
real(kind=pr), intent(out) :: Pcalc

Calculated pressure at V [bar]
real(kind=pr), intent(inout) :: ZETA
real(kind=pr), intent(inout) :: ZETMIN
real(kind=pr), intent(inout) :: ZETMAX
real(kind=pr), intent(out) :: AT
integer, intent(out) :: iter

Variables

Type Visibility Attributes Name Initial
real(kind=pr), public :: Ar
real(kind=pr), public :: ArV
real(kind=pr), public :: ArV2
real(kind=pr), public :: B
real(kind=pr), public :: del
real(kind=pr), public :: der
real(kind=pr), public :: totn