1/* e_j1f.c -- float version of e_j1.c.
2 * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
3 */
4
5/*
6 * ====================================================
7 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8 *
9 * Developed at SunPro, a Sun Microsystems, Inc. business.
10 * Permission to use, copy, modify, and distribute this
11 * software is freely granted, provided that this notice
12 * is preserved.
13 * ====================================================
14 */
15
16#include <sys/cdefs.h>
| 1/* e_j1f.c -- float version of e_j1.c.
2 * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
3 */
4
5/*
6 * ====================================================
7 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8 *
9 * Developed at SunPro, a Sun Microsystems, Inc. business.
10 * Permission to use, copy, modify, and distribute this
11 * software is freely granted, provided that this notice
12 * is preserved.
13 * ====================================================
14 */
15
16#include <sys/cdefs.h>
|
17__FBSDID("$FreeBSD: stable/11/lib/msun/src/e_j1f.c 283032 2015-05-17 16:27:06Z kargl $");
| 17__FBSDID("$FreeBSD: stable/11/lib/msun/src/e_j1f.c 336196 2018-07-11 12:12:49Z markj $");
|
18
19/*
20 * See e_j1.c for complete comments.
21 */
22
23#include "math.h"
24#include "math_private.h"
25
26static __inline float ponef(float), qonef(float);
27
28static const volatile float vone = 1, vzero = 0;
29
30static const float
31huge = 1e30,
32one = 1.0,
33invsqrtpi= 5.6418961287e-01, /* 0x3f106ebb */
34tpi = 6.3661974669e-01, /* 0x3f22f983 */
| 18
19/*
20 * See e_j1.c for complete comments.
21 */
22
23#include "math.h"
24#include "math_private.h"
25
26static __inline float ponef(float), qonef(float);
27
28static const volatile float vone = 1, vzero = 0;
29
30static const float
31huge = 1e30,
32one = 1.0,
33invsqrtpi= 5.6418961287e-01, /* 0x3f106ebb */
34tpi = 6.3661974669e-01, /* 0x3f22f983 */
|
35 /* R0/S0 on [0,2] */
| 35/* R0/S0 on [0,2] */
|
36r00 = -6.2500000000e-02, /* 0xbd800000 */
37r01 = 1.4070566976e-03, /* 0x3ab86cfd */
38r02 = -1.5995563444e-05, /* 0xb7862e36 */
39r03 = 4.9672799207e-08, /* 0x335557d2 */
40s01 = 1.9153760746e-02, /* 0x3c9ce859 */
41s02 = 1.8594678841e-04, /* 0x3942fab6 */
42s03 = 1.1771846857e-06, /* 0x359dffc2 */
43s04 = 5.0463624390e-09, /* 0x31ad6446 */
--- 297 unchanged lines hidden --- | 36r00 = -6.2500000000e-02, /* 0xbd800000 */
37r01 = 1.4070566976e-03, /* 0x3ab86cfd */
38r02 = -1.5995563444e-05, /* 0xb7862e36 */
39r03 = 4.9672799207e-08, /* 0x335557d2 */
40s01 = 1.9153760746e-02, /* 0x3c9ce859 */
41s02 = 1.8594678841e-04, /* 0x3942fab6 */
42s03 = 1.1771846857e-06, /* 0x359dffc2 */
43s04 = 5.0463624390e-09, /* 0x31ad6446 */
--- 297 unchanged lines hidden --- |