diff options
Diffstat (limited to 'libjava/classpath/native/fdlibm/s_tan.c')
| -rw-r--r-- | libjava/classpath/native/fdlibm/s_tan.c | 53 |
1 files changed, 7 insertions, 46 deletions
diff --git a/libjava/classpath/native/fdlibm/s_tan.c b/libjava/classpath/native/fdlibm/s_tan.c index 20995fcbdee..55cdd336281 100644 --- a/libjava/classpath/native/fdlibm/s_tan.c +++ b/libjava/classpath/native/fdlibm/s_tan.c @@ -1,54 +1,16 @@ -/* @(#)s_tan.c 5.1 93/09/24 */ +/* @(#)s_tan.c 1.3 95/01/18 */ /* * ==================================================== * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. * - * Developed at SunPro, a Sun Microsystems, Inc. business. + * Developed at SunSoft, a Sun Microsystems, Inc. business. * Permission to use, copy, modify, and distribute this - * software is freely granted, provided that this notice + * software is freely granted, provided that this notice * is preserved. * ==================================================== */ - -/* - -FUNCTION - <<tan>>, <<tanf>>---tangent - -INDEX -tan -INDEX -tanf - -ANSI_SYNOPSIS - #include <math.h> - double tan(double <[x]>); - float tanf(float <[x]>); - -TRAD_SYNOPSIS - #include <math.h> - double tan(<[x]>) - double <[x]>; - - float tanf(<[x]>) - float <[x]>; - - -DESCRIPTION -<<tan>> computes the tangent of the argument <[x]>. -Angles are specified in radians. - -<<tanf>> is identical, save that it takes and returns <<float>> values. - -RETURNS -The tangent of <[x]> is returned. - -PORTABILITY -<<tan>> is ANSI. <<tanf>> is an extension. -*/ - /* tan(x) * Return tangent function of x. * @@ -57,8 +19,8 @@ PORTABILITY * __ieee754_rem_pio2 ... argument reduction routine * * Method. - * Let S,C and T denote the sin, cos and tan respectively on - * [-PI/4, +PI/4]. Reduce the argument x to y1+y2 = x-k*pi/2 + * Let S,C and T denote the sin, cos and tan respectively on + * [-PI/4, +PI/4]. Reduce the argument x to y1+y2 = x-k*pi/2 * in [-pi/4 , +pi/4], and let n = k mod 4. * We have * @@ -76,7 +38,7 @@ PORTABILITY * trig(NaN) is that NaN; * * Accuracy: - * TRIG(x) returns trig(x) nearly rounded + * TRIG(x) returns trig(x) nearly rounded */ #include "fdlibm.h" @@ -91,7 +53,7 @@ PORTABILITY #endif { double y[2],z=0.0; - int32_t n,ix; + int32_t n, ix; /* High word of x. */ GET_HIGH_WORD(ix,x); @@ -110,5 +72,4 @@ PORTABILITY -1 -- n odd */ } } - #endif /* _DOUBLE_IS_32BITS */ |
