v/vlib/math/math.c.v

293 lines
4.9 KiB
V
Raw Normal View History

// Copyright (c) 2019-2020 Alexander Medvednikov. All rights reserved.
// Use of this source code is governed by an MIT license
// that can be found in the LICENSE file.
module math
#include <math.h>
2020-06-19 12:54:56 +02:00
$if windows {
$if tinyc {
#flag @VROOT/thirdparty/tcc/lib/openlibm.o
}
}
fn C.acos(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.asin(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.atan(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.atan2(y f64, x f64) f64
2020-10-15 14:42:16 +02:00
fn C.cbrt(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.ceil(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.cos(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.cosf(x f32) f32
2020-10-15 14:42:16 +02:00
fn C.cosh(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.erf(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.erfc(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.exp(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.exp2(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.fabs(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.floor(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.fmod(x f64, y f64) f64
2020-10-15 14:42:16 +02:00
fn C.hypot(x f64, y f64) f64
2020-10-15 14:42:16 +02:00
fn C.log(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.log2(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.log10(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.lgamma(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.pow(x f64, y f64) f64
2020-10-15 14:42:16 +02:00
fn C.powf(x f32, y f32) f32
2020-10-15 14:42:16 +02:00
fn C.round(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.sin(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.sinf(x f32) f32
2020-10-15 14:42:16 +02:00
fn C.sinh(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.sqrt(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.sqrtf(x f32) f32
2020-10-15 14:42:16 +02:00
fn C.tgamma(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.tan(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.tanf(x f32) f32
2020-10-15 14:42:16 +02:00
fn C.tanh(x f64) f64
2020-10-15 14:42:16 +02:00
fn C.trunc(x f64) f64
// NOTE
// When adding a new function, please make sure it's in the right place.
// All functions are sorted alphabetically.
// Returns the absolute value.
[inline]
pub fn abs(a f64) f64 {
return C.fabs(a)
}
// acos calculates inverse cosine (arccosine).
[inline]
pub fn acos(a f64) f64 {
return C.acos(a)
}
// asin calculates inverse sine (arcsine).
[inline]
pub fn asin(a f64) f64 {
return C.asin(a)
}
// atan calculates inverse tangent (arctangent).
[inline]
pub fn atan(a f64) f64 {
return C.atan(a)
}
// atan2 calculates inverse tangent with two arguments, returns the angle between the X axis and the point.
[inline]
2020-10-15 14:42:16 +02:00
pub fn atan2(a f64, b f64) f64 {
return C.atan2(a, b)
}
// cbrt calculates cubic root.
[inline]
pub fn cbrt(a f64) f64 {
return C.cbrt(a)
}
// ceil returns the nearest f64 greater or equal to the provided value.
[inline]
pub fn ceil(a f64) f64 {
return C.ceil(a)
}
// cos calculates cosine.
[inline]
pub fn cos(a f64) f64 {
return C.cos(a)
}
// cosf calculates cosine. (float32)
[inline]
pub fn cosf(a f32) f32 {
return C.cosf(a)
}
// cosh calculates hyperbolic cosine.
[inline]
pub fn cosh(a f64) f64 {
return C.cosh(a)
}
// exp calculates exponent of the number (math.pow(math.E, a)).
[inline]
pub fn exp(a f64) f64 {
return C.exp(a)
}
// erf computes the error function value
[inline]
pub fn erf(a f64) f64 {
return C.erf(a)
}
// erfc computes the complementary error function value
[inline]
pub fn erfc(a f64) f64 {
return C.erfc(a)
}
// exp2 returns the base-2 exponential function of a (math.pow(2, a)).
[inline]
pub fn exp2(a f64) f64 {
return C.exp2(a)
}
// floor returns the nearest f64 lower or equal of the provided value.
[inline]
pub fn floor(a f64) f64 {
return C.floor(a)
}
// fmod returns the floating-point remainder of number / denom (rounded towards zero):
[inline]
2020-10-15 14:42:16 +02:00
pub fn fmod(a f64, b f64) f64 {
return C.fmod(a, b)
}
// gamma computes the gamma function value
[inline]
pub fn gamma(a f64) f64 {
return C.tgamma(a)
}
// Returns hypotenuse of a right triangle.
[inline]
2020-10-15 14:42:16 +02:00
pub fn hypot(a f64, b f64) f64 {
return C.hypot(a, b)
}
// log calculates natural (base-e) logarithm of the provided value.
[inline]
pub fn log(a f64) f64 {
return C.log(a)
}
// log2 calculates base-2 logarithm of the provided value.
[inline]
pub fn log2(a f64) f64 {
return C.log2(a)
}
// log10 calculates the common (base-10) logarithm of the provided value.
[inline]
pub fn log10(a f64) f64 {
return C.log10(a)
}
// log_gamma computes the log-gamma function value
[inline]
pub fn log_gamma(a f64) f64 {
return C.lgamma(a)
}
// log_n calculates base-N logarithm of the provided value.
[inline]
2020-10-15 14:42:16 +02:00
pub fn log_n(a f64, b f64) f64 {
return C.log(a) / C.log(b)
}
// pow returns base raised to the provided power.
[inline]
2020-10-15 14:42:16 +02:00
pub fn pow(a f64, b f64) f64 {
return C.pow(a, b)
}
// powf returns base raised to the provided power. (float32)
[inline]
2020-10-15 14:42:16 +02:00
pub fn powf(a f32, b f32) f32 {
return C.powf(a, b)
}
// round returns the integer nearest to the provided value.
[inline]
pub fn round(f f64) f64 {
return C.round(f)
}
// sin calculates sine.
[inline]
pub fn sin(a f64) f64 {
return C.sin(a)
}
// sinf calculates sine. (float32)
[inline]
pub fn sinf(a f32) f32 {
return C.sinf(a)
}
// sinh calculates hyperbolic sine.
[inline]
pub fn sinh(a f64) f64 {
return C.sinh(a)
}
// sqrt calculates square-root of the provided value.
[inline]
pub fn sqrt(a f64) f64 {
return C.sqrt(a)
}
// sqrtf calculates square-root of the provided value. (float32)
[inline]
pub fn sqrtf(a f32) f32 {
return C.sqrtf(a)
}
// tan calculates tangent.
[inline]
pub fn tan(a f64) f64 {
return C.tan(a)
}
// tanf calculates tangent. (float32)
[inline]
pub fn tanf(a f32) f32 {
return C.tanf(a)
}
// tanh calculates hyperbolic tangent.
[inline]
pub fn tanh(a f64) f64 {
return C.tanh(a)
}
// trunc rounds a toward zero, returning the nearest integral value that is not
// larger in magnitude than a.
[inline]
pub fn trunc(a f64) f64 {
return C.trunc(a)
}