1#![cfg(not(test))]
2
3// These symbols are all defined by `libm`,
4// or by `compiler-builtins` on unsupported platforms.
5unsafe extern "C" {
6 pub safe fn acos(n: f64) -> f64;
7 pub safe fn asin(n: f64) -> f64;
8 pub safe fn atan(n: f64) -> f64;
9 pub safe fn atan2(a: f64, b: f64) -> f64;
10 pub safe fn cosh(n: f64) -> f64;
11 pub safe fn expm1(n: f64) -> f64;
12 pub safe fn expm1f(n: f32) -> f32;
13 #[cfg_attr(target_env = "msvc", link_name = "_hypot")]
14 pub safe fn hypot(x: f64, y: f64) -> f64;
15 #[cfg_attr(target_env = "msvc", link_name = "_hypotf")]
16 pub safe fn hypotf(x: f32, y: f32) -> f32;
17 pub safe fn log1p(n: f64) -> f64;
18 pub safe fn log1pf(n: f32) -> f32;
19 pub safe fn sinh(n: f64) -> f64;
20 pub safe fn tan(n: f64) -> f64;
21 pub safe fn tanh(n: f64) -> f64;
22 pub safe fn tgamma(n: f64) -> f64;
23 pub safe fn tgammaf(n: f32) -> f32;
24 pub safe fn lgamma_r(n: f64, s: &mut i32) -> f64;
25 #[cfg(not(target_os = "aix"))]
26 pub safe fn lgammaf_r(n: f32, s: &mut i32) -> f32;
27 pub safe fn erf(n: f64) -> f64;
28 pub safe fn erff(n: f32) -> f32;
29 pub safe fn erfc(n: f64) -> f64;
30 pub safe fn erfcf(n: f32) -> f32;
31
32 pub safe fn acosf128(n: f128) -> f128;
33 pub safe fn asinf128(n: f128) -> f128;
34 pub safe fn atanf128(n: f128) -> f128;
35 pub safe fn atan2f128(a: f128, b: f128) -> f128;
36 pub safe fn cbrtf128(n: f128) -> f128;
37 pub safe fn coshf128(n: f128) -> f128;
38 pub safe fn expm1f128(n: f128) -> f128;
39 pub safe fn hypotf128(x: f128, y: f128) -> f128;
40 pub safe fn log1pf128(n: f128) -> f128;
41 pub safe fn sinhf128(n: f128) -> f128;
42 pub safe fn tanf128(n: f128) -> f128;
43 pub safe fn tanhf128(n: f128) -> f128;
44 pub safe fn tgammaf128(n: f128) -> f128;
45 pub safe fn lgammaf128_r(n: f128, s: &mut i32) -> f128;
46 pub safe fn erff128(n: f128) -> f128;
47 pub safe fn erfcf128(n: f128) -> f128;
48
49 cfg_if::cfg_if! {
50 if #[cfg(not(all(target_os = "windows", target_env = "msvc", target_arch = "x86")))] {
51 pub safe fn acosf(n: f32) -> f32;
52 pub safe fn asinf(n: f32) -> f32;
53 pub safe fn atan2f(a: f32, b: f32) -> f32;
54 pub safe fn atanf(n: f32) -> f32;
55 pub safe fn coshf(n: f32) -> f32;
56 pub safe fn sinhf(n: f32) -> f32;
57 pub safe fn tanf(n: f32) -> f32;
58 pub safe fn tanhf(n: f32) -> f32;
59 }}
60}
61
62// On AIX, we don't have lgammaf_r only the f64 version, so we can
63// use the f64 version lgamma_r
64#[cfg(target_os = "aix")]
65pub fn lgammaf_r(n: f32, s: &mut i32) -> f32 {
66 lgamma_r(n.into(), s) as f32
67}
68
69// On 32-bit x86 MSVC these functions aren't defined, so we just define shims
70// which promote everything to f64, perform the calculation, and then demote
71// back to f32. While not precisely correct should be "correct enough" for now.
72cfg_if::cfg_if! {
73if #[cfg(all(target_os = "windows", target_env = "msvc", target_arch = "x86"))] {
74 #[inline]
75 pub fn acosf(n: f32) -> f32 {
76 f64::acos(n as f64) as f32
77 }
78
79 #[inline]
80 pub fn asinf(n: f32) -> f32 {
81 f64::asin(n as f64) as f32
82 }
83
84 #[inline]
85 pub fn atan2f(n: f32, b: f32) -> f32 {
86 f64::atan2(n as f64, b as f64) as f32
87 }
88
89 #[inline]
90 pub fn atanf(n: f32) -> f32 {
91 f64::atan(n as f64) as f32
92 }
93
94 #[inline]
95 pub fn coshf(n: f32) -> f32 {
96 f64::cosh(n as f64) as f32
97 }
98
99 #[inline]
100 pub fn sinhf(n: f32) -> f32 {
101 f64::sinh(n as f64) as f32
102 }
103
104 #[inline]
105 pub fn tanf(n: f32) -> f32 {
106 f64::tan(n as f64) as f32
107 }
108
109 #[inline]
110 pub fn tanhf(n: f32) -> f32 {
111 f64::tanh(n as f64) as f32
112 }
113}}
114