erf(x)：误差函数

误差函数。

声明

语法

retval = erf(x)
elemental real function erf(x)

参数

x ，输入值必须是实数类型。

返回值

返回值是 real 类型，与输入参数 x 的类型相同。

描述

erf(x) 计算 x 的误差函数。结果位于以下范围内：

\(-1 \leq erf (x) \leq 1\)

它是使用以下方法计算的：

\(\frac{2}{\sqrt\pi}\int_0^xe^{-t^2}dt\)

类型

支持的参数类型是实数。

interface erf
    module procedure serf, derf
end interface

contains

elemental real(sp) function serf(x)
real(sp), intent(in) :: x
end function

elemental real(dp) function derf(x)
real(dp), intent(in) :: x
end function

示例

program intrinsics_erf
	print *, erf(0.5)
end program

结果：

0.520499877

也可以看看

erfc.