error_function_c Function

public function error_function_c(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_c(argument) result(res)

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

        res = erfc_local(real(argument, c_double))
    end function error_function_c