X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;ds=inline;f=lib%2Facosl.c;h=122fb9ccb44f393f164fe1ceac70b31e30f77d96;hb=c70a54e290ea07f2ac94169b15aa1919dcb28028;hp=d430254ca15b380a4afa85da7ee00f93a239e4df;hpb=5657b2536d242966c41c268b9ab4fe8df727bb13;p=gnulib.git diff --git a/lib/acosl.c b/lib/acosl.c index d430254ca..122fb9ccb 100644 --- a/lib/acosl.c +++ b/lib/acosl.c @@ -9,7 +9,10 @@ * ==================================================== */ -#include "mathl.h" +#include + +/* Specification. */ +#include /* Long double expansions contributed by @@ -33,8 +36,6 @@ */ -#include - static const long double one = 1.0L, huge = 1.0e+4932L, @@ -186,39 +187,40 @@ acosl (long double x) } #if 0 -main() +int +main (void) { printf ("%.18Lg %.18Lg\n", acosl(1.0L), - 1.5707963267948966192313216916397514420984L - + 1.5707963267948966192313216916397514420984L - 1.5707963267948966192313216916397514420984L); printf ("%.18Lg %.18Lg\n", acosl(0.7071067811865475244008443621048490392848L), - 1.5707963267948966192313216916397514420984L - + 1.5707963267948966192313216916397514420984L - 0.7853981633974483096156608458198757210492L); printf ("%.18Lg %.18Lg\n", acosl(0.5L), - 1.5707963267948966192313216916397514420984L - + 1.5707963267948966192313216916397514420984L - 0.5235987755982988730771072305465838140328L); printf ("%.18Lg %.18Lg\n", acosl(0.3090169943749474241022934171828190588600L), - 1.5707963267948966192313216916397514420984L - + 1.5707963267948966192313216916397514420984L - 0.3141592653589793238462643383279502884196L); printf ("%.18Lg %.18Lg\n", acosl(-1.0L), - 1.5707963267948966192313216916397514420984L - + 1.5707963267948966192313216916397514420984L - -1.5707963267948966192313216916397514420984L); printf ("%.18Lg %.18Lg\n", acosl(-0.7071067811865475244008443621048490392848L), - 1.5707963267948966192313216916397514420984L - + 1.5707963267948966192313216916397514420984L - -0.7853981633974483096156608458198757210492L); printf ("%.18Lg %.18Lg\n", acosl(-0.5L), - 1.5707963267948966192313216916397514420984L - + 1.5707963267948966192313216916397514420984L - -0.5235987755982988730771072305465838140328L); printf ("%.18Lg %.18Lg\n", acosl(-0.3090169943749474241022934171828190588600L), - 1.5707963267948966192313216916397514420984L - + 1.5707963267948966192313216916397514420984L - -0.3141592653589793238462643383279502884196L); } #endif