2011-12-13 19:52:02 -06:00
|
|
|
|
|
|
|
/*
|
|
|
|
Module: f32
|
|
|
|
|
|
|
|
Floating point operations and constants for `f32`
|
|
|
|
|
|
|
|
This exposes the same operations as `math`, just for `f32` even though
|
|
|
|
they do not show up in the docs right now!
|
|
|
|
*/
|
|
|
|
|
2011-12-22 08:19:43 -06:00
|
|
|
export t;
|
2011-12-13 19:52:02 -06:00
|
|
|
|
|
|
|
export
|
2011-12-22 08:19:43 -06:00
|
|
|
acos,
|
|
|
|
asin,
|
|
|
|
atan,
|
|
|
|
atan2,
|
|
|
|
cbrt,
|
|
|
|
ceil,
|
|
|
|
cos,
|
|
|
|
cosh,
|
|
|
|
erf,
|
|
|
|
erfc,
|
|
|
|
exp,
|
|
|
|
expm1,
|
|
|
|
exp2,
|
|
|
|
abs,
|
|
|
|
sub_pos,
|
|
|
|
floor,
|
|
|
|
mul_add,
|
|
|
|
fmax,
|
|
|
|
fmin,
|
|
|
|
nextafter,
|
|
|
|
frexp,
|
|
|
|
hypot,
|
|
|
|
ldexp,
|
|
|
|
lgamma,
|
|
|
|
ln,
|
|
|
|
logb,
|
|
|
|
ln1p,
|
|
|
|
log10,
|
|
|
|
log2,
|
|
|
|
ilogb,
|
|
|
|
modf,
|
|
|
|
pow,
|
|
|
|
rem,
|
|
|
|
rint,
|
|
|
|
round,
|
|
|
|
sin,
|
|
|
|
sinh,
|
|
|
|
sqrt,
|
|
|
|
tan,
|
|
|
|
tanh,
|
|
|
|
tgamma,
|
|
|
|
trunc;
|
|
|
|
|
|
|
|
export consts;
|
2011-12-13 19:52:02 -06:00
|
|
|
|
2011-12-22 05:54:38 -06:00
|
|
|
export radix, mantissa_digits, digits, epsilon, min_value, max_value,
|
|
|
|
min_exp, max_exp, min_10_exp, max_10_exp;
|
|
|
|
|
2011-12-22 08:19:43 -06:00
|
|
|
// PORT
|
|
|
|
|
|
|
|
import cops = cmath::c_float;
|
|
|
|
|
|
|
|
type t = f64;
|
|
|
|
|
|
|
|
import
|
|
|
|
cops::acos,
|
|
|
|
cops::asin,
|
|
|
|
cops::atan,
|
|
|
|
cops::atan2,
|
|
|
|
cops::cbrt,
|
|
|
|
cops::ceil,
|
|
|
|
cops::cos,
|
|
|
|
cops::cosh,
|
|
|
|
cops::erf,
|
|
|
|
cops::erfc,
|
|
|
|
cops::exp,
|
|
|
|
cops::expm1,
|
|
|
|
cops::exp2,
|
|
|
|
cops::abs,
|
|
|
|
cops::sub_pos,
|
|
|
|
cops::floor,
|
|
|
|
cops::mul_add,
|
|
|
|
cops::max,
|
|
|
|
cops::min,
|
|
|
|
cops::nextafter,
|
|
|
|
cops::fmod,
|
|
|
|
cops::frexp,
|
|
|
|
cops::hypot,
|
|
|
|
cops::ldexp,
|
|
|
|
cops::lgamma,
|
|
|
|
cops::ln,
|
|
|
|
cops::logb,
|
|
|
|
cops::ln1p,
|
|
|
|
cops::log10,
|
|
|
|
cops::log2,
|
|
|
|
cops::ilogb,
|
|
|
|
cops::modf,
|
|
|
|
cops::pow,
|
|
|
|
cops::rem,
|
|
|
|
cops::rint,
|
|
|
|
cops::round,
|
|
|
|
cops::sin,
|
|
|
|
cops::sinh,
|
|
|
|
cops::sqrt,
|
|
|
|
cops::tan,
|
|
|
|
cops::tanh,
|
|
|
|
cops::tgamma,
|
|
|
|
cops::trunc;
|
|
|
|
|
2011-12-13 19:52:02 -06:00
|
|
|
|
|
|
|
type t = f32;
|
|
|
|
|
|
|
|
/* Module: consts */
|
|
|
|
mod consts {
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: pi
|
|
|
|
|
|
|
|
Archimedes' constant
|
|
|
|
*/
|
|
|
|
const pi: f32 = 3.14159265358979323846264338327950288f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: frac_pi_2
|
|
|
|
|
|
|
|
pi/2.0
|
|
|
|
*/
|
|
|
|
const frac_pi_2: f32 = 1.57079632679489661923132169163975144f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: frac_pi_4
|
|
|
|
|
|
|
|
pi/4.0
|
|
|
|
*/
|
|
|
|
const frac_pi_4: f32 = 0.785398163397448309615660845819875721f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: frac_1_pi
|
|
|
|
|
|
|
|
1.0/pi
|
|
|
|
*/
|
|
|
|
const frac_1_pi: f32 = 0.318309886183790671537767526745028724f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: frac_2_pi
|
|
|
|
|
|
|
|
2.0/pi
|
|
|
|
*/
|
|
|
|
const frac_2_pi: f32 = 0.636619772367581343075535053490057448f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: frac_2_sqrtpi
|
|
|
|
|
|
|
|
2.0/sqrt(pi)
|
|
|
|
*/
|
|
|
|
const frac_2_sqrtpi: f32 = 1.12837916709551257389615890312154517f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: sqrt2
|
|
|
|
|
|
|
|
sqrt(2.0)
|
|
|
|
*/
|
|
|
|
const sqrt2: f32 = 1.41421356237309504880168872420969808f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: frac_1_sqrt2
|
|
|
|
|
|
|
|
1.0/sqrt(2.0)
|
|
|
|
*/
|
|
|
|
const frac_1_sqrt2: f32 = 0.707106781186547524400844362104849039f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: e
|
|
|
|
|
|
|
|
Euler's number
|
|
|
|
*/
|
|
|
|
const e: f32 = 2.71828182845904523536028747135266250f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: log2_e
|
|
|
|
|
|
|
|
log2(e)
|
|
|
|
*/
|
|
|
|
const log2_e: f32 = 1.44269504088896340735992468100189214f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: log10_e
|
|
|
|
|
|
|
|
log10(e)
|
|
|
|
*/
|
|
|
|
const log10_e: f32 = 0.434294481903251827651128918916605082f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: ln_2
|
|
|
|
|
|
|
|
ln(2.0)
|
|
|
|
*/
|
|
|
|
const ln_2: f32 = 0.693147180559945309417232121458176568f32;
|
|
|
|
|
|
|
|
/*
|
|
|
|
Const: ln_10
|
|
|
|
|
|
|
|
ln(10.0)
|
|
|
|
*/
|
|
|
|
const ln_10: f32 = 2.30258509299404568401799145468436421f32;
|
|
|
|
}
|
|
|
|
|
2011-12-22 05:54:38 -06:00
|
|
|
// These are not defined inside consts:: for consistency with
|
|
|
|
// the integer types
|
|
|
|
|
|
|
|
// PORT check per architecture
|
|
|
|
|
|
|
|
const radix: uint = 2u;
|
|
|
|
|
|
|
|
const mantissa_digits: uint = 24u;
|
|
|
|
const digits: uint = 6u;
|
|
|
|
|
|
|
|
const epsilon: f32 = 1.19209290e-07f32;
|
|
|
|
|
|
|
|
const min_value: f32 = 1.17549435e-38f32;
|
|
|
|
const max_value: f32 = 3.40282347e+38f32;
|
|
|
|
|
|
|
|
const min_exp: int = -125;
|
|
|
|
const max_exp: int = 128;
|
|
|
|
|
|
|
|
const min_10_exp: int = -37;
|
|
|
|
const max_10_exp: int = 38;
|
|
|
|
|
2011-12-13 19:52:02 -06:00
|
|
|
//
|
|
|
|
// Local Variables:
|
|
|
|
// mode: rust
|
|
|
|
// fill-column: 78;
|
|
|
|
// indent-tabs-mode: nil
|
|
|
|
// c-basic-offset: 4
|
|
|
|
// buffer-file-coding-system: utf-8-unix
|
|
|
|
// End:
|
|
|
|
//
|