You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

58 lines
2.3 KiB

  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. double calc(BW *bw, unsigned char *s)
  29. {
  30. @@ -414,7 +404,6 @@ double calc(BW *bw, unsigned char *s)
  31. v = get(USTR "tan"); v->func = m_tan;
  32. v = get(USTR "exp"); v->func = m_exp;
  33. v = get(USTR "sqrt"); v->func = m_sqrt;
  34. - v = get(USTR "cbrt"); v->func = m_cbrt;
  35. v = get(USTR "ln"); v->func = m_log;
  36. v = get(USTR "log"); v->func = m_log10;
  37. v = get(USTR "asin"); v->func = m_asin;
  38. @@ -425,19 +414,10 @@ double calc(BW *bw, unsigned char *s)
  39. v = get(USTR "sinh"); v->func = m_sinh;
  40. v = get(USTR "cosh"); v->func = m_cosh;
  41. v = get(USTR "tanh"); v->func = m_tanh;
  42. - v = get(USTR "asinh"); v->func = m_asinh;
  43. - v = get(USTR "acosh"); v->func = m_acosh;
  44. - v = get(USTR "atanh"); v->func = m_atanh;
  45. v = get(USTR "int"); v->func = m_int;
  46. v = get(USTR "floor"); v->func = m_floor;
  47. v = get(USTR "ceil"); v->func = m_ceil;
  48. v = get(USTR "abs"); v->func = m_fabs;
  49. - v = get(USTR "erf"); v->func = m_erf;
  50. - v = get(USTR "erfc"); v->func = m_erfc;
  51. - v = get(USTR "j0"); v->func = m_j0;
  52. - v = get(USTR "j1"); v->func = m_j1;
  53. - v = get(USTR "y0"); v->func = m_y0;
  54. - v = get(USTR "y1"); v->func = m_y1;
  55. }
  56. v = get(USTR "top");