| 1 | /*
|
|---|
| 2 | * localmath.h - This header is used by the mathematical library.
|
|---|
| 3 | */
|
|---|
| 4 | /* $Header: /cvsup/minix/src/lib/ack/h/pc_math.h,v 1.1 2005/10/10 15:27:44 beng Exp $ */
|
|---|
| 5 |
|
|---|
| 6 | /* some constants (Hart & Cheney) */
|
|---|
| 7 | #define M_PI 3.14159265358979323846264338327950288
|
|---|
| 8 | #define M_2PI 6.28318530717958647692528676655900576
|
|---|
| 9 | #define M_3PI_4 2.35619449019234492884698253745962716
|
|---|
| 10 | #define M_PI_2 1.57079632679489661923132169163975144
|
|---|
| 11 | #define M_3PI_8 1.17809724509617246442349126872981358
|
|---|
| 12 | #define M_PI_4 0.78539816339744830961566084581987572
|
|---|
| 13 | #define M_PI_8 0.39269908169872415480783042290993786
|
|---|
| 14 | #define M_1_PI 0.31830988618379067153776752674502872
|
|---|
| 15 | #define M_2_PI 0.63661977236758134307553505349005744
|
|---|
| 16 | #define M_4_PI 1.27323954473516268615107010698011488
|
|---|
| 17 | #define M_E 2.71828182845904523536028747135266250
|
|---|
| 18 | #define M_LOG2E 1.44269504088896340735992468100189213
|
|---|
| 19 | #define M_LOG10E 0.43429448190325182765112891891660508
|
|---|
| 20 | #define M_LN2 0.69314718055994530941723212145817657
|
|---|
| 21 | #define M_LN10 2.30258509299404568401799145468436421
|
|---|
| 22 | #define M_SQRT2 1.41421356237309504880168872420969808
|
|---|
| 23 | #define M_1_SQRT2 0.70710678118654752440084436210484904
|
|---|
| 24 | #define M_EULER 0.57721566490153286060651209008240243
|
|---|
| 25 |
|
|---|
| 26 | /* macros for constructing polynomials */
|
|---|
| 27 | #define POLYNOM1(x, a) ((a)[1]*(x)+(a)[0])
|
|---|
| 28 | #define POLYNOM2(x, a) (POLYNOM1((x),(a)+1)*(x)+(a)[0])
|
|---|
| 29 | #define POLYNOM3(x, a) (POLYNOM2((x),(a)+1)*(x)+(a)[0])
|
|---|
| 30 | #define POLYNOM4(x, a) (POLYNOM3((x),(a)+1)*(x)+(a)[0])
|
|---|
| 31 | #define POLYNOM5(x, a) (POLYNOM4((x),(a)+1)*(x)+(a)[0])
|
|---|
| 32 | #define POLYNOM6(x, a) (POLYNOM5((x),(a)+1)*(x)+(a)[0])
|
|---|
| 33 | #define POLYNOM7(x, a) (POLYNOM6((x),(a)+1)*(x)+(a)[0])
|
|---|
| 34 | #define POLYNOM8(x, a) (POLYNOM7((x),(a)+1)*(x)+(a)[0])
|
|---|
| 35 | #define POLYNOM9(x, a) (POLYNOM8((x),(a)+1)*(x)+(a)[0])
|
|---|
| 36 | #define POLYNOM10(x, a) (POLYNOM9((x),(a)+1)*(x)+(a)[0])
|
|---|
| 37 | #define POLYNOM11(x, a) (POLYNOM10((x),(a)+1)*(x)+(a)[0])
|
|---|
| 38 | #define POLYNOM12(x, a) (POLYNOM11((x),(a)+1)*(x)+(a)[0])
|
|---|
| 39 | #define POLYNOM13(x, a) (POLYNOM12((x),(a)+1)*(x)+(a)[0])
|
|---|
| 40 |
|
|---|
| 41 | #define M_LN_MAX_D (M_LN2 * DBL_MAX_EXP)
|
|---|
| 42 | #define M_LN_MIN_D (M_LN2 * (DBL_MIN_EXP - 1))
|
|---|
