error_function Function

public function error_function(argument) result(res)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in) :: argument

Return Value real(kind=dp)


Contents

Source Code


Source Code

    function error_function(argument) result(res)

        real(dp), intent(in) :: argument
        real(dp) :: res

        res = erf_local(real(argument, c_double))

    end function error_function