sqrtHyperDual Function

public elemental function sqrtHyperDual(v1) result(v2)

Arguments

Type IntentOptional Attributes Name
type(hyperdual), intent(in) :: v1

Return Value type(hyperdual)


Variables

Type Visibility Attributes Name Initial
real(kind=pr), public, parameter :: expo = 3.0_pr/2.0_pr
real(kind=pr), public :: square