solve_VxVyT Subroutine

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

Variables

Type Visibility Attributes Name Initial
real(kind=pr), public :: F(size(X))
real(kind=pr), public :: Xold(size(X))
real(kind=pr), public :: dF(size(X),size(X))
real(kind=pr), public :: dFdS(size(X))
real(kind=pr), public :: dPdVy
real(kind=pr), public :: dPdVz
real(kind=pr), public :: dx(size(X))
real(kind=pr), public :: dx_old(size(x))
integer, public :: nc