Root/joe-full/patches/001-mathaway.patch

1--- a/umath.c
2+++ b/umath.c
3@@ -378,7 +378,6 @@ double m_cos(double n) { return cos(n);
4 double m_tan(double n) { return tan(n); }
5 double m_exp(double n) { return exp(n); }
6 double m_sqrt(double n) { return sqrt(n); }
7-double m_cbrt(double n) { return cbrt(n); }
8 double m_log(double n) { return log(n); }
9 double m_log10(double n) { return log10(n); }
10 double m_asin(double n) { return asin(n); }
11@@ -387,19 +386,10 @@ double m_atan(double n) { return atan(n)
12 double m_sinh(double n) { return sinh(n); }
13 double m_cosh(double n) { return cosh(n); }
14 double m_tanh(double n) { return tanh(n); }
15-double m_asinh(double n) { return asinh(n); }
16-double m_acosh(double n) { return acosh(n); }
17-double m_atanh(double n) { return atanh(n); }
18 double m_int(double n) { return (int)(n); }
19 double m_floor(double n) { return floor(n); }
20 double m_ceil(double n) { return ceil(n); }
21 double m_fabs(double n) { return fabs(n); }
22-double m_erf(double n) { return erf(n); }
23-double m_erfc(double n) { return erfc(n); }
24-double m_j0(double n) { return j0(n); }
25-double m_j1(double n) { return j1(n); }
26-double m_y0(double n) { return y0(n); }
27-double m_y1(double n) { return y1(n); }
28 
29 double calc(BW *bw, unsigned char *s)
30 {
31@@ -414,7 +404,6 @@ double calc(BW *bw, unsigned char *s)
32         v = get(USTR "tan"); v->func = m_tan;
33         v = get(USTR "exp"); v->func = m_exp;
34         v = get(USTR "sqrt"); v->func = m_sqrt;
35- v = get(USTR "cbrt"); v->func = m_cbrt;
36         v = get(USTR "ln"); v->func = m_log;
37         v = get(USTR "log"); v->func = m_log10;
38         v = get(USTR "asin"); v->func = m_asin;
39@@ -425,19 +414,10 @@ double calc(BW *bw, unsigned char *s)
40         v = get(USTR "sinh"); v->func = m_sinh;
41         v = get(USTR "cosh"); v->func = m_cosh;
42         v = get(USTR "tanh"); v->func = m_tanh;
43- v = get(USTR "asinh"); v->func = m_asinh;
44- v = get(USTR "acosh"); v->func = m_acosh;
45- v = get(USTR "atanh"); v->func = m_atanh;
46         v = get(USTR "int"); v->func = m_int;
47         v = get(USTR "floor"); v->func = m_floor;
48         v = get(USTR "ceil"); v->func = m_ceil;
49         v = get(USTR "abs"); v->func = m_fabs;
50- v = get(USTR "erf"); v->func = m_erf;
51- v = get(USTR "erfc"); v->func = m_erfc;
52- v = get(USTR "j0"); v->func = m_j0;
53- v = get(USTR "j1"); v->func = m_j1;
54- v = get(USTR "y0"); v->func = m_y0;
55- v = get(USTR "y1"); v->func = m_y1;
56     }
57 
58     v = get(USTR "top");
59

Archive Download this file



interactive