eq_dr Function

public elemental function eq_dr(lhs, rhs)

Arguments

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

Return Value logical