| s_tan.c (176360) | s_tan.c (176385) |
|---|---|
| 1/* @(#)s_tan.c 5.1 93/09/24 */ 2/* 3 * ==================================================== 4 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 5 * 6 * Developed at SunPro, a Sun Microsystems, Inc. business. 7 * Permission to use, copy, modify, and distribute this 8 * software is freely granted, provided that this notice 9 * is preserved. 10 * ==================================================== 11 */ 12 | 1/* @(#)s_tan.c 5.1 93/09/24 */ 2/* 3 * ==================================================== 4 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 5 * 6 * Developed at SunPro, a Sun Microsystems, Inc. business. 7 * Permission to use, copy, modify, and distribute this 8 * software is freely granted, provided that this notice 9 * is preserved. 10 * ==================================================== 11 */ 12 |
| 13#ifndef lint 14static char rcsid[] = "$FreeBSD: head/lib/msun/src/s_tan.c 176360 2008-02-17 07:33:12Z das $"; 15#endif | 13#include <sys/cdefs.h> 14__FBSDID("$FreeBSD: head/lib/msun/src/s_tan.c 176385 2008-02-18 14:02:12Z bde $"); |
| 16 17/* tan(x) 18 * Return tangent function of x. 19 * 20 * kernel function: 21 * __kernel_tan ... tangent function on [-pi/4,pi/4] 22 * __ieee754_rem_pio2 ... argument reduction routine 23 * --- 18 unchanged lines hidden (view full) --- 42 * 43 * Accuracy: 44 * TRIG(x) returns trig(x) nearly rounded 45 */ 46 47#include <float.h> 48 49#include "math.h" | 15 16/* tan(x) 17 * Return tangent function of x. 18 * 19 * kernel function: 20 * __kernel_tan ... tangent function on [-pi/4,pi/4] 21 * __ieee754_rem_pio2 ... argument reduction routine 22 * --- 18 unchanged lines hidden (view full) --- 41 * 42 * Accuracy: 43 * TRIG(x) returns trig(x) nearly rounded 44 */ 45 46#include <float.h> 47 48#include "math.h" |
| 49#define INLINE_REM_PIO2 |
|
| 50#include "math_private.h" | 50#include "math_private.h" |
| 51#include "e_rem_pio2.c" |
|
| 51 52double 53tan(double x) 54{ 55 double y[2],z=0.0; 56 int32_t n, ix; 57 58 /* High word of x. */ --- 24 unchanged lines hidden --- | 52 53double 54tan(double x) 55{ 56 double y[2],z=0.0; 57 int32_t n, ix; 58 59 /* High word of x. */ --- 24 unchanged lines hidden --- |