diff options
Diffstat (limited to 'libm/s_tanh.c')
| -rw-r--r-- | libm/s_tanh.c | 17 |
1 files changed, 1 insertions, 16 deletions
diff --git a/libm/s_tanh.c b/libm/s_tanh.c index edadbfe21..89ee2718b 100644 --- a/libm/s_tanh.c +++ b/libm/s_tanh.c @@ -1,4 +1,3 @@ -/* @(#)s_tanh.c 5.1 93/09/24 */ /* * ==================================================== * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. @@ -10,10 +9,6 @@ * ==================================================== */ -#if defined(LIBM_SCCS) && !defined(lint) -static char rcsid[] = "$NetBSD: s_tanh.c,v 1.7 1995/05/10 20:48:22 jtc Exp $"; -#endif - /* Tanh(x) * Return the Hyperbolic Tangent of x * @@ -41,19 +36,9 @@ static char rcsid[] = "$NetBSD: s_tanh.c,v 1.7 1995/05/10 20:48:22 jtc Exp $"; #include "math.h" #include "math_private.h" - -#ifdef __STDC__ static const double one=1.0, two=2.0, tiny = 1.0e-300; -#else -static double one=1.0, two=2.0, tiny = 1.0e-300; -#endif -#ifdef __STDC__ - double tanh(double x) -#else - double tanh(x) - double x; -#endif +double tanh(double x) { double t,z; int32_t jx,ix; |