residual_helmholtz Subroutine

public subroutine residual_helmholtz(self, n, v, t, Ar, ArV, ArT, ArTV, ArV2, ArT2, Arn, ArVn, ArTn, Arn2)

Type Bound

Arguments

Type	Intent	Optional	Attributes		Name
class(ArModelAdiff),	intent(in)			::	self
real(kind=pr),	intent(in)			::	n(:)
real(kind=pr),	intent(in)			::	v
real(kind=pr),	intent(in)			::	t
real(kind=pr),	intent(out),	optional		::	Ar
real(kind=pr),	intent(out),	optional		::	ArV
real(kind=pr),	intent(out),	optional		::	ArT
real(kind=pr),	intent(out),	optional		::	ArTV
real(kind=pr),	intent(out),	optional		::	ArV2
real(kind=pr),	intent(out),	optional		::	ArT2
real(kind=pr),	intent(out),	optional,	dimension(size(n))	::	Arn
real(kind=pr),	intent(out),	optional,	dimension(size(n))	::	ArVn
real(kind=pr),	intent(out),	optional,	dimension(size(n))	::	ArTn
real(kind=pr),	intent(out),	optional		::	Arn2(size(n),size(n))

Variables

Type	Visibility	Attributes		Name		Initial
type(hyperdual),	public		::	d_Ar
type(hyperdual),	public		::	d_n(size(n))
type(hyperdual),	public		::	d_t
type(hyperdual),	public		::	d_v

Subroutines

subroutine get_dardn()

Arguments

None

subroutine get_dardn2()

Arguments

None

subroutine get_dardt()

Arguments

None

subroutine get_dardt2()

Arguments

None

subroutine get_dardtn()

Arguments

None

subroutine get_dardv()

Arguments

None

subroutine get_dardv2()

Arguments

None

subroutine get_dardvn()

Arguments

None

subroutine get_dardvt()

Arguments

None

subroutine reset_vars()

Arguments

None