[glibc.git] / math / math.h

/* Declarations for math functions.
   Copyright (C) 1991, 92, 93, 95, 96, 97 Free Software Foundation, Inc.
   This file is part of the GNU C Library.

   The GNU C Library is free software; you can redistribute it and/or
   modify it under the terms of the GNU Library General Public License as
   published by the Free Software Foundation; either version 2 of the
   License, or (at your option) any later version.

   The GNU C Library is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   Library General Public License for more details.

   You should have received a copy of the GNU Library General Public
   License along with the GNU C Library; see the file COPYING.LIB.  If not,
   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
   Boston, MA 02111-1307, USA.  */

/*
 *	ISO C Standard: 4.5 MATHEMATICS	<math.h>
 */

#ifndef	_MATH_H

#define	_MATH_H	1
#include <features.h>

__BEGIN_DECLS

/* Get machine-dependent HUGE_VAL value (returned on overflow).
   On all IEEE754 machines, this is +Infinity.  */
#include <huge_val.h>

/* Get machine-dependent NAN value (returned for some domain errors).  */
#ifdef	 __USE_GNU
#include <nan.h>
#endif


/* The file <mathcalls.h> contains the prototypes for all the actual
   math functions.  These macros are used for those prototypes, so
   we can easily declare each function as both `name' and `__name',
   and can declare the float versions `namef' and `__namef'.  */

#define __MATHCALL(function,suffix, args)	\
  __MATHDECL (_Mdouble_,function,suffix, args)
#define __MATHDECL(type, function,suffix, args) \
  __MATHDECL_1(type, function,suffix, args); \
  __MATHDECL_1(type, __CONCAT(__,function),suffix, args)
#define __MATHCALLX(function,suffix, args, attrib)	\
  __MATHDECLX (_Mdouble_,function,suffix, args, attrib)
#define __MATHDECLX(type, function,suffix, args, attrib) \
  __MATHDECL_1(type, function,suffix, args) __attribute__ (attrib); \
  __MATHDECL_1(type, __CONCAT(__,function),suffix, args) __attribute__ (attrib)
#define __MATHDECL_1(type, function,suffix, args) \
  extern type __MATH_PRECNAME(function,suffix) args

#define _Mdouble_ 		double
#define __MATH_PRECNAME(name,r)	__CONCAT(name,r)
#include <mathcalls.h>
#undef	_Mdouble_
#undef	__MATH_PRECNAME

#if defined __USE_MISC || defined __USE_ISOC9X


/* Include the file of declarations again, this time using `float'
   instead of `double' and appending f to each function name.  */

#ifndef _Mfloat_
#define _Mfloat_		float
#endif
#define _Mdouble_ 		_Mfloat_
#ifdef __STDC__
#define __MATH_PRECNAME(name,r)	name##f##r
#else
#define __MATH_PRECNAME(name,r) name/**/f/**/r
#endif
#include <mathcalls.h>
#undef	_Mdouble_
#undef	__MATH_PRECNAME

#if __STDC__ - 0 || __GNUC__ - 0
/* Include the file of declarations again, this time using `long double'
   instead of `double' and appending l to each function name.  */

#ifndef _Mlong_double_
#define _Mlong_double_		long double
#endif
#define _Mdouble_ 		_Mlong_double_
#ifdef __STDC__
#define __MATH_PRECNAME(name,r)	name##l##r
#else
#define __MATH_PRECNAME(name,r) name/**/l/**/r
#endif
#include <mathcalls.h>
#undef	_Mdouble_
#undef	__MATH_PRECNAME

#endif /* __STDC__ || __GNUC__ */

#endif	/* Use misc or ISO C 9X.  */
#undef	__MATHDECL_1
#undef	__MATHDECL
#undef	__MATHCALL


#if defined __USE_MISC || defined __USE_XOPEN || defined __USE_ISOC9X
/* This variable is used by `gamma' and `lgamma'.  */
extern int signgam;
#endif


/* ISO C 9X defines some generic macros which work on any data type.  */
#if __USE_ISOC9X

/* All floating-point numbers can be put in one of these categories.  */
enum
  {
    FP_NAN,
#define FP_NAN FP_NAN
    FP_INFINITE,
#define FP_INFINITE FP_INFINITE
    FP_ZERO,
#define FP_ZERO FP_ZERO
    FP_SUBNORMAL,
#define FP_SUBNORMAL FP_SUBNORMAL
    FP_NORMAL
#define FP_NORMAL FP_NORMAL
  };

/* Return number of classification appropriate for X.  */
#define fpclassify(x) \
     (sizeof (x) == sizeof (float) ?					      \
        __fpclassifyf (x)							      \
      : sizeof (x) == sizeof (double) ?					      \
        __fpclassify (x) : __fpclassifyl (x))

/* Return nonzero value if sign of X is negative.  */
#define signbit(x) \
     (sizeof (x) == sizeof (float) ?					      \
        __signbitf (x)							      \
      : sizeof (x) == sizeof (double) ?					      \
        __signbit (x) : __signbitl (x))

/* Return nonzero value if X is not +-Inf or NaN.  */
#define isfinite(x) (fpclassify (x) >= FP_ZERO)

/* Return nonzero value if X is neither zero, subnormal, Inf, nor NaN.  */
#define isnormal(x) (fpclassify (x) == FP_NORMAL)

/* Return nonzero value if X is a NaN.  We could use `fpclassify' but
   we already have this functions `__isnan' and it is faster.  */
#define isnan(x) \
     (sizeof (x) == sizeof (float) ?					      \
        __isnanf (x)							      \
      : sizeof (x) == sizeof (double) ?					      \
        __isnan (x) : __isnanl (x))


/* Conversion functions.  */

/* Round X to nearest integral value according to current rounding
   direction.  */
extern long int rinttol __P ((long double __x));
extern long long int rinttoll __P ((long double __x));

/* Round X to nearest integral value, rounding halfway cases away from
   zero.  */
extern long int roundtol __P ((long double __x));
extern long long int roundtoll __P ((long double __x));


/* Comparison macros.  */

/* Return nonzero value if X is greater than Y.  */
#define isgreater(x, y) (!isunordered ((x), (y)) && (x) > (y))

/* Return nonzero value if X is greater than or equal to Y.  */
#define isgreaterequal(x, y) (!isunordered ((x), (y)) && (x) >= (y))

/* Return nonzero value if X is less than Y.  */
#define isless(x, y) (!isunordered ((x), (y)) && (x) < (y))

/* Return nonzero value if X is less than or equal to Y.  */
#define islessequal(x, y) (!isunordered ((x), (y)) && (x) <= (y))

/* Return nonzero value if either X is less than Y or Y is less than X.  */
#define islessgreater(x, y) \
     (!isunordered ((x), (y)) && ((x) < (y) || (y) < (x)))

/* Return nonzero value if arguments are unordered.  */
#define isunordered(x, y) \
     (fpclassify (x) == FP_NAN || fpclassify (y) == FP_NAN)

#endif /* Use ISO C 9X.  */

#ifdef	__USE_MISC
/* Support for various different standard error handling behaviors.  */

typedef enum { _IEEE_ = -1, _SVID_, _XOPEN_, _POSIX_ } _LIB_VERSION_TYPE;

/* This variable can be changed at run-time to any of the values above to
   affect floating point error handling behavior (it may also be necessary
   to change the hardware FPU exception settings).  */
extern _LIB_VERSION_TYPE _LIB_VERSION;
#endif


#ifdef __USE_SVID
/* In SVID error handling, `matherr' is called with this description
   of the exceptional condition.

   We have a problem when using C++ since `exception' is reserved in
   C++.  */
#ifdef __cplusplus
struct __exception
#else
struct exception
#endif
  {
    int type;
    char *name;
    double arg1;
    double arg2;
    double retval;
  };

#ifdef __cplusplus
extern int __matherr __P ((struct __exception *));
extern int matherr __P ((struct __exception *));
#else
extern int __matherr __P ((struct exception *));
extern int matherr __P ((struct exception *));
#endif

#define X_TLOSS		1.41484755040568800000e+16

/* Types of exceptions in the `type' field.  */
#define	DOMAIN		1
#define	SING		2
#define	OVERFLOW	3
#define	UNDERFLOW	4
#define	TLOSS		5
#define	PLOSS		6

/* SVID mode specifies returning this large value instead of infinity.  */
#define HUGE		FLT_MAX
#include <float.h>		/* Defines FLT_MAX.  */

#else	/* !SVID */

#ifdef __USE_XOPEN
/* X/Open wants another strange constant.  */
#define MAXFLOAT	FLT_MAX
#include <float.h>
#endif

#endif	/* SVID */


#ifdef __USE_BSD

/* Some useful constants.  */
#define	M_E		_Mldbl(2.7182818284590452354)	/* e */
#define	M_LOG2E		_Mldbl(1.4426950408889634074)	/* log 2e */
#define	M_LOG10E	_Mldbl(0.43429448190325182765)	/* log 10e */
#define	M_LN2		_Mldbl(0.69314718055994530942)	/* log e2 */
#define	M_LN10		_Mldbl(2.30258509299404568402)	/* log e10 */
#define	M_PI		_Mldbl(3.14159265358979323846)	/* pi */
#define	M_PI_2		_Mldbl(1.57079632679489661923)	/* pi/2 */
#define	M_PI_4		_Mldbl(0.78539816339744830962)	/* pi/4 */
#define	M_1_PI		_Mldbl(0.31830988618379067154)	/* 1/pi */
#define	M_2_PI		_Mldbl(0.63661977236758134308)	/* 2/pi */
#define	M_2_SQRTPI	_Mldbl(1.12837916709551257390)	/* 2/sqrt(pi) */
#define	M_SQRT2		_Mldbl(1.41421356237309504880)	/* sqrt(2) */
#define	M_SQRT1_2	_Mldbl(0.70710678118654752440)	/* 1/sqrt(2) */

/* Our constants might specify more precision than `double' can represent.
   Use `long double' constants in standard and GNU C, where they are
   supported and the cast to `double'.  */
#if __STDC__ - 0 || __GNUC__ - 0
#define _Mldbl(x) x##L
#else	/* Traditional C.  */
#define _Mldbl(x) x
#endif	/* Standard or GNU C.  */

#endif


/* Get machine-dependent inline versions (if there are any).  */
#if (!defined __NO_MATH_INLINES && defined __OPTIMIZE__) \
    || defined __LIBC_M81_MATH_INLINES
#include <__math.h>
#endif


__END_DECLS


#endif /* math.h  */
Commit	Line	Data
f7eac6eb	1	/* Declarations for math functions.
2f6d1f1b	2	Copyright (C) 1991, 92, 93, 95, 96, 97 Free Software Foundation, Inc.
ba1ffaa1	3	This file is part of the GNU C Library.
28f540f4	4
ba1ffaa1 UD	5	The GNU C Library is free software; you can redistribute it and/or
	6	modify it under the terms of the GNU Library General Public License as
	7	published by the Free Software Foundation; either version 2 of the
	8	License, or (at your option) any later version.
28f540f4	9
ba1ffaa1 UD	10	The GNU C Library is distributed in the hope that it will be useful,
	11	but WITHOUT ANY WARRANTY; without even the implied warranty of
	12	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	13	Library General Public License for more details.
28f540f4	14
ba1ffaa1 UD	15	You should have received a copy of the GNU Library General Public
	16	License along with the GNU C Library; see the file COPYING.LIB. If not,
	17	write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
	18	Boston, MA 02111-1307, USA. */
28f540f4 RM	19
28f540f4 RM	20	/*
ba1ffaa1	21	* ISO C Standard: 4.5 MATHEMATICS <math.h>
28f540f4 RM	22	*/
	23
	24	#ifndef _MATH_H
	25
	26	#define _MATH_H 1
	27	#include <features.h>
	28
	29	__BEGIN_DECLS
	30
f7eac6eb RM	31	/* Get machine-dependent HUGE_VAL value (returned on overflow).
f7eac6eb RM	32	On all IEEE754 machines, this is +Infinity. */
28f540f4 RM	33	#include <huge_val.h>
	34
	35	/* Get machine-dependent NAN value (returned for some domain errors). */
	36	#ifdef __USE_GNU
	37	#include <nan.h>
	38	#endif
	39
	40
f7eac6eb RM	41	/* The file <mathcalls.h> contains the prototypes for all the actual
	42	math functions. These macros are used for those prototypes, so
	43	we can easily declare each function as both `name' and `__name',
	44	and can declare the float versions `namef' and `__namef'. */
	45
	46	#define __MATHCALL(function,suffix, args) \
377a515b	47	__MATHDECL (_Mdouble_,function,suffix, args)
f7eac6eb RM	48	#define __MATHDECL(type, function,suffix, args) \
f7eac6eb RM	49	__MATHDECL_1(type, function,suffix, args); \
377a515b	50	__MATHDECL_1(type, __CONCAT(__,function),suffix, args)
3e5f5557 UD	51	#define __MATHCALLX(function,suffix, args, attrib) \
	52	__MATHDECLX (_Mdouble_,function,suffix, args, attrib)
	53	#define __MATHDECLX(type, function,suffix, args, attrib) \
	54	__MATHDECL_1(type, function,suffix, args) __attribute__ (attrib); \
	55	__MATHDECL_1(type, __CONCAT(__,function),suffix, args) __attribute__ (attrib)
f7eac6eb RM	56	#define __MATHDECL_1(type, function,suffix, args) \
	57	extern type __MATH_PRECNAME(function,suffix) args
	58
	59	#define _Mdouble_ double
377a515b	60	#define __MATH_PRECNAME(name,r) __CONCAT(name,r)
f7eac6eb RM	61	#include <mathcalls.h>
	62	#undef _Mdouble_
	63	#undef __MATH_PRECNAME
	64
377a515b	65	#if defined __USE_MISC \|\| defined __USE_ISOC9X
76060ec0	66
999493cb RM	67
999493cb RM	68	/* Include the file of declarations again, this time using `float'
f7eac6eb RM	69	instead of `double' and appending f to each function name. */
f7eac6eb RM	70
999493cb RM	71	#ifndef _Mfloat_
	72	#define _Mfloat_ float
	73	#endif
	74	#define _Mdouble_ _Mfloat_
377a515b	75	#ifdef __STDC__
f7eac6eb	76	#define __MATH_PRECNAME(name,r) name##f##r
377a515b UD	77	#else
	78	#define __MATH_PRECNAME(name,r) name//f//r
	79	#endif
f7eac6eb RM	80	#include <mathcalls.h>
	81	#undef _Mdouble_
	82	#undef __MATH_PRECNAME
76060ec0	83
377a515b	84	#if __STDC__ - 0 \|\| __GNUC__ - 0
999493cb	85	/* Include the file of declarations again, this time using `long double'
76060ec0 RM	86	instead of `double' and appending l to each function name. */
76060ec0 RM	87
999493cb RM	88	#ifndef _Mlong_double_
	89	#define _Mlong_double_ long double
	90	#endif
	91	#define _Mdouble_ _Mlong_double_
377a515b	92	#ifdef __STDC__
76060ec0	93	#define __MATH_PRECNAME(name,r) name##l##r
377a515b UD	94	#else
	95	#define __MATH_PRECNAME(name,r) name//l//r
	96	#endif
76060ec0 RM	97	#include <mathcalls.h>
	98	#undef _Mdouble_
	99	#undef __MATH_PRECNAME
	100
377a515b UD	101	#endif /* __STDC__ \|\| __GNUC__ */
	102
	103	#endif /* Use misc or ISO C 9X. */
4cca6b86 UD	104	#undef __MATHDECL_1
	105	#undef __MATHDECL
	106	#undef __MATHCALL
	107
	108
	109	#if defined __USE_MISC \|\| defined __USE_XOPEN \|\| defined __USE_ISOC9X
	110	/* This variable is used by `gamma' and `lgamma'. */
	111	extern int signgam;
	112	#endif
377a515b UD	113
	114
	115	/* ISO C 9X defines some generic macros which work on any data type. */
	116	#if __USE_ISOC9X
	117
	118	/* All floating-point numbers can be put in one of these categories. */
	119	enum
	120	{
	121	FP_NAN,
	122	#define FP_NAN FP_NAN
	123	FP_INFINITE,
	124	#define FP_INFINITE FP_INFINITE
	125	FP_ZERO,
	126	#define FP_ZERO FP_ZERO
	127	FP_SUBNORMAL,
	128	#define FP_SUBNORMAL FP_SUBNORMAL
	129	FP_NORMAL
	130	#define FP_NORMAL FP_NORMAL
	131	};
	132
	133	/* Return number of classification appropriate for X. */
	134	#define fpclassify(x) \
	135	(sizeof (x) == sizeof (float) ? \
0d8733c4	136	__fpclassifyf (x) \
377a515b	137	: sizeof (x) == sizeof (double) ? \
0d8733c4	138	__fpclassify (x) : __fpclassifyl (x))
377a515b UD	139
	140	/* Return nonzero value if sign of X is negative. */
	141	#define signbit(x) \
	142	(sizeof (x) == sizeof (float) ? \
	143	__signbitf (x) \
	144	: sizeof (x) == sizeof (double) ? \
	145	__signbit (x) : __signbitl (x))
	146
	147	/* Return nonzero value if X is not +-Inf or NaN. */
	148	#define isfinite(x) (fpclassify (x) >= FP_ZERO)
	149
	150	/* Return nonzero value if X is neither zero, subnormal, Inf, nor NaN. */
	151	#define isnormal(x) (fpclassify (x) == FP_NORMAL)
	152
	153	/* Return nonzero value if X is a NaN. We could use `fpclassify' but
	154	we already have this functions `__isnan' and it is faster. */
	155	#define isnan(x) \
	156	(sizeof (x) == sizeof (float) ? \
	157	__isnanf (x) \
	158	: sizeof (x) == sizeof (double) ? \
	159	__isnan (x) : __isnanl (x))
28f540f4	160
28f540f4	161
377a515b UD	162	/* Conversion functions. */
	163
	164	/* Round X to nearest integral value according to current rounding
	165	direction. */
c131718c UD	166	extern long int rinttol __P ((long double __x));
c131718c UD	167	extern long long int rinttoll __P ((long double __x));
377a515b UD	168
	169	/* Round X to nearest integral value, rounding halfway cases away from
	170	zero. */
c131718c UD	171	extern long int roundtol __P ((long double __x));
c131718c UD	172	extern long long int roundtoll __P ((long double __x));
377a515b UD	173
	174
	175	/* Comparison macros. */
	176
	177	/* Return nonzero value if X is greater than Y. */
	178	#define isgreater(x, y) (!isunordered ((x), (y)) && (x) > (y))
	179
	180	/* Return nonzero value if X is greater than or equal to Y. */
	181	#define isgreaterequal(x, y) (!isunordered ((x), (y)) && (x) >= (y))
	182
	183	/* Return nonzero value if X is less than Y. */
	184	#define isless(x, y) (!isunordered ((x), (y)) && (x) < (y))
	185
	186	/* Return nonzero value if X is less than or equal to Y. */
	187	#define islessequal(x, y) (!isunordered ((x), (y)) && (x) <= (y))
	188
	189	/* Return nonzero value if either X is less than Y or Y is less than X. */
	190	#define islessgreater(x, y) \
	191	(!isunordered ((x), (y)) && ((x) < (y) \|\| (y) < (x)))
	192
	193	/* Return nonzero value if arguments are unordered. */
	194	#define isunordered(x, y) \
	195	(fpclassify (x) == FP_NAN \|\| fpclassify (y) == FP_NAN)
	196
	197	#endif /* Use ISO C 9X. */
	198
28f540f4	199	#ifdef __USE_MISC
f7eac6eb	200	/* Support for various different standard error handling behaviors. */
28f540f4	201
f7eac6eb	202	typedef enum { _IEEE_ = -1, _SVID_, _XOPEN_, _POSIX_ } _LIB_VERSION_TYPE;
28f540f4	203
f7eac6eb RM	204	/* This variable can be changed at run-time to any of the values above to
	205	affect floating point error handling behavior (it may also be necessary
	206	to change the hardware FPU exception settings). */
	207	extern _LIB_VERSION_TYPE _LIB_VERSION;
28f540f4 RM	208	#endif
	209
	210
ceb2d9aa	211	#ifdef __USE_SVID
f7eac6eb	212	/* In SVID error handling, `matherr' is called with this description
2f6d1f1b UD	213	of the exceptional condition.
	214
	215	We have a problem when using C++ since `exception' is reserved in
	216	C++. */
ceb2d9aa UD	217	#ifdef __cplusplus
	218	struct __exception
	219	#else
f7eac6eb	220	struct exception
ceb2d9aa	221	#endif
f7eac6eb RM	222	{
	223	int type;
	224	char *name;
	225	double arg1;
	226	double arg2;
	227	double retval;
	228	};
28f540f4	229
ceb2d9aa UD	230	#ifdef __cplusplus
	231	extern int __matherr __P ((struct __exception *));
	232	extern int matherr __P ((struct __exception *));
	233	#else
23396375	234	extern int __matherr __P ((struct exception *));
f7eac6eb	235	extern int matherr __P ((struct exception *));
ceb2d9aa	236	#endif
28f540f4	237
f7eac6eb	238	#define X_TLOSS 1.41484755040568800000e+16
28f540f4	239
f7eac6eb RM	240	/* Types of exceptions in the `type' field. */
	241	#define DOMAIN 1
	242	#define SING 2
	243	#define OVERFLOW 3
	244	#define UNDERFLOW 4
	245	#define TLOSS 5
	246	#define PLOSS 6
28f540f4	247
f7eac6eb RM	248	/* SVID mode specifies returning this large value instead of infinity. */
	249	#define HUGE FLT_MAX
	250	#include <float.h> /* Defines FLT_MAX. */
28f540f4	251
377a515b UD	252	#else /* !SVID */
	253
	254	#ifdef __USE_XOPEN
	255	/* X/Open wants another strange constant. */
	256	#define MAXFLOAT FLT_MAX
	257	#include <float.h>
	258	#endif
	259
ceb2d9aa	260	#endif /* SVID */
28f540f4	261
28f540f4	262
28f540f4	263	#ifdef __USE_BSD
710f7bab	264
28f540f4	265	/* Some useful constants. */
710f7bab RM	266	#define M_E _Mldbl(2.7182818284590452354) /* e */
	267	#define M_LOG2E _Mldbl(1.4426950408889634074) /* log 2e */
	268	#define M_LOG10E _Mldbl(0.43429448190325182765) /* log 10e */
	269	#define M_LN2 _Mldbl(0.69314718055994530942) /* log e2 */
	270	#define M_LN10 _Mldbl(2.30258509299404568402) /* log e10 */
	271	#define M_PI _Mldbl(3.14159265358979323846) /* pi */
	272	#define M_PI_2 _Mldbl(1.57079632679489661923) /* pi/2 */
	273	#define M_PI_4 _Mldbl(0.78539816339744830962) /* pi/4 */
	274	#define M_1_PI _Mldbl(0.31830988618379067154) /* 1/pi */
	275	#define M_2_PI _Mldbl(0.63661977236758134308) /* 2/pi */
	276	#define M_2_SQRTPI _Mldbl(1.12837916709551257390) /* 2/sqrt(pi) */
	277	#define M_SQRT2 _Mldbl(1.41421356237309504880) /* sqrt(2) */
	278	#define M_SQRT1_2 _Mldbl(0.70710678118654752440) /* 1/sqrt(2) */
	279
	280	/* Our constants might specify more precision than `double' can represent.
	281	Use `long double' constants in standard and GNU C, where they are
	282	supported and the cast to `double'. */
	283	#if __STDC__ - 0 \|\| __GNUC__ - 0
	284	#define _Mldbl(x) x##L
	285	#else /* Traditional C. */
	286	#define _Mldbl(x) x
	287	#endif /* Standard or GNU C. */
	288
28f540f4 RM	289	#endif
	290
	291
4d585333	292	/* Get machine-dependent inline versions (if there are any). */
377a515b UD	293	#if (!defined __NO_MATH_INLINES && defined __OPTIMIZE__) \
377a515b UD	294	\|\| defined __LIBC_M81_MATH_INLINES
4d585333 RM	295	#include <__math.h>
	296	#endif
	297
	298
	299	__END_DECLS
	300
	301
28f540f4	302	#endif /* math.h */