check_eps ("erf (0.7) == 0.6778011938...", FUNC(erf) (0.7),
0.67780119383741847297L, CHOOSE (0, 2e-16, 0));
+
+ check ("erf (1.2) == 0.9103139782...", FUNC(erf) (1.2),
+ 0.91031397822963538024L);
}
check_eps ("erfc (0.7) == 0.3221988061...", FUNC(erfc) (0.7),
0.32219880616258152702L, CHOOSE (0, 6e-17, 0));
+
+ check_eps ("erfc (1.2) == 0.0896860218...", FUNC(erfc) (1.2),
+ 0.089686021770364619762L, CHOOSE (0, 0, 8e-9));
}