erfc_scaled(x)
computes the exponentially-scaled complementary error function of x
:
Fortran 2008 and later
result = erfc_scaled(x)
x
- The type shall be real
.The return value is of type real
and of the same kind as x
.
program test_erfc_scaled
real(kind(0.0d0)) :: x = 0.17_8
x = erfc_scaled(x)
print *, x ! prints approx. 0.83375830214998126
end program test_erfc_scaled