yaeos__m_s_sp Module

Module to calculate saturation points



Subroutines

public subroutine saturation_F(model, z, X, ns, S, F, dF, dPdVz, dPdVy)

Arguments

Type IntentOptional Attributes Name
class(ArModel), intent(in) :: model
real(kind=pr) :: z(size(model))
real(kind=pr), intent(in) :: X(:)
integer, intent(in) :: ns
real(kind=pr), intent(in) :: S
real(kind=pr), intent(out) :: F(:)
real(kind=pr), intent(out), optional :: dF(:,:)
real(kind=pr), intent(out) :: dPdVz
real(kind=pr), intent(out) :: dPdVy

public subroutine saturation_TP(model, kind, z, X, ns, S, F, dF, dFdS)

Arguments

Type IntentOptional Attributes Name
class(ArModel), intent(in) :: model
character(len=*), intent(in) :: kind
real(kind=pr), intent(in) :: z(size(model))
real(kind=pr), intent(in) :: X(:)
integer, intent(in) :: ns
real(kind=pr), intent(in) :: S
real(kind=pr), intent(out) :: F(:)
real(kind=pr), intent(out) :: dF(:,:)
real(kind=pr), intent(out) :: dFdS(:)

public subroutine solve_TP(model, kind, z, X, ns, S, tol, max_iterations, its)

Arguments

Type IntentOptional Attributes Name
class(ArModel), intent(in) :: model
character(len=*), intent(in) :: kind
real(kind=pr), intent(in) :: z(:)
real(kind=pr), intent(inout) :: X(:)
integer, intent(in) :: ns
real(kind=pr), intent(in) :: S
real(kind=pr), intent(in) :: tol
integer, intent(in) :: max_iterations
integer, intent(out) :: its

public subroutine solve_VxVyT(model, z, X, ns, S, tol, max_iterations, its)

Arguments

Type IntentOptional Attributes Name
class(ArModel), intent(in) :: model
real(kind=pr), intent(in) :: z(:)
real(kind=pr), intent(inout) :: X(:)
integer, intent(in) :: ns
real(kind=pr), intent(in) :: S
real(kind=pr), intent(in) :: tol
integer, intent(in) :: max_iterations
integer, intent(out) :: its