max_dr Function

public elemental function max_dr(v1, v2) result(v3)

Arguments

Type	Intent	Optional	Attributes		Name
type(hyperdual),	intent(in)			::	v1
real(kind=pr),	intent(in)			::	v2

Return Value type(hyperdual)