max_rd Function

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

Arguments

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

Return Value type(hyperdual)