ERFC_SCALED — Error functionERFC_SCALED(X) computes the exponentially-scaled complementary
error function of X.
RESULT = ERFC_SCALED(X)
| X | The type shall be REAL.
|
REAL and of the same kind as X.
program test_erfc_scaled
real(8) :: x = 0.17_8
x = erfc_scaled(x)
end program test_erfc_scaled