libm/src/math/expo2.rs
C Jones 0a33394d17 Implement sinh
This also adds expo2 for the __expo2 function, and combine_words() to replace
the INSERT_WORDS macro.

Closes #35
2018-07-14 19:37:30 -04:00

14 lines
516 B
Rust

use super::{combine_words, exp};
/* exp(x)/2 for x >= log(DBL_MAX), slightly better than 0.5*exp(x/2)*exp(x/2) */
pub(crate) fn expo2(x: f64) -> f64 {
/* k is such that k*ln2 has minimal relative error and x - kln2 > log(DBL_MIN) */
const K: i32 = 2043;
let kln2 = f64::from_bits(0x40962066151add8b);
/* note that k is odd and scale*scale overflows */
let scale = combine_words(((0x3ff + K / 2) as u32) << 20, 0);
/* exp(x - k ln2) * 2**(k-1) */
return exp(x - kln2) * scale * scale;
}