summaryrefslogtreecommitdiff
path: root/src/code/code_800FCE80.c
diff options
context:
space:
mode:
authormzxrules <mzxrules@gmail.com>2024-06-19 00:00:23 -0400
committerGitHub <noreply@github.com>2024-06-19 00:00:23 -0400
commit8d83727429602d422a524d00244f16f46ea8e70e (patch)
tree0db634a792b3004792aa1e598def34543aac68ef /src/code/code_800FCE80.c
parent06bbdf88f1a38bec6300ce451b061522802e3371 (diff)
Experiment: remove global.h dependency from sys_math, sys_math3d, z_lib (#1956)
* split sys_math, sys_math3d, z_lib from global.h * suggestions * forgot this * more math stuff * nit fix * re-add ichain.h * resolve tharo's comments
Diffstat (limited to 'src/code/code_800FCE80.c')
-rw-r--r--src/code/code_800FCE80.c176
1 files changed, 0 insertions, 176 deletions
diff --git a/src/code/code_800FCE80.c b/src/code/code_800FCE80.c
deleted file mode 100644
index 8ac46833d..000000000
--- a/src/code/code_800FCE80.c
+++ /dev/null
@@ -1,176 +0,0 @@
-#include "global.h"
-
-s32 gUseAtanContFrac;
-
-/**
- * @param angle radians
- * @return tan(angle)
- */
-f32 Math_FTanF(f32 angle) {
- f32 sin = sinf(angle);
- f32 cos = cosf(angle);
-
- return sin / cos;
-}
-
-f32 Math_FFloorF(f32 x) {
- return floorf(x);
-}
-
-f32 Math_FCeilF(f32 x) {
- return ceilf(x);
-}
-
-f32 Math_FRoundF(f32 x) {
- return roundf(x);
-}
-
-f32 Math_FTruncF(f32 x) {
- return truncf(x);
-}
-
-f32 Math_FNearbyIntF(f32 x) {
- return nearbyintf(x);
-}
-
-/* Arctangent approximation using a Taylor series (one quadrant) */
-f32 Math_FAtanTaylorQF(f32 x) {
- static const f32 coeffs[] = {
- -1.0f / 3, +1.0f / 5, -1.0f / 7, +1.0f / 9, -1.0f / 11, +1.0f / 13, -1.0f / 15, +1.0f / 17, 0.0f,
- };
-
- f32 poly = x;
- f32 sq = SQ(x);
- f32 exp = x * sq;
- const f32* c = coeffs;
- f32 term;
-
- while (true) {
- term = *c++ * exp;
- if (poly + term == poly) {
- break;
- }
- poly += term;
- exp *= sq;
- }
-
- return poly;
-}
-
-/* Ditto for two quadrants */
-f32 Math_FAtanTaylorF(f32 x) {
- f32 t;
- f32 q;
-
- if (x > 0.0f) {
- t = x;
- } else if (x < 0.0f) {
- t = -x;
- } else if (x == 0.0f) {
- return 0.0f;
- } else {
- return qNaN0x10000;
- }
-
- if (t <= M_SQRT2 - 1.0f) {
- return Math_FAtanTaylorQF(x);
- }
-
- if (t >= M_SQRT2 + 1.0f) {
- q = M_PI / 2 - Math_FAtanTaylorQF(1.0f / t);
- } else {
- q = M_PI / 4 - Math_FAtanTaylorQF((1.0f - t) / (1.0f + t));
- }
-
- if (x > 0.0f) {
- return q;
- } else {
- return -q;
- }
-}
-
-/* Arctangent approximation using a continued fraction */
-f32 Math_FAtanContFracF(f32 x) {
- s32 sector;
- f32 z;
- f32 conv;
- f32 sq;
- s32 i;
-
- if (x >= -1.0f && x <= 1.0f) {
- sector = 0;
- } else if (x > 1.0f) {
- sector = 1;
- x = 1.0f / x;
- } else if (x < -1.0f) {
- sector = -1;
- x = 1.0f / x;
- } else {
- return qNaN0x10000;
- }
-
- sq = SQ(x);
- conv = 0.0f;
- z = 8.0f;
- for (i = 8; i != 0; i--) {
- conv = SQ(z) * sq / (2.0f * z + 1.0f + conv);
- z -= 1.0f;
- }
- conv = x / (1.0f + conv);
-
- if (sector == 0) {
- return conv;
- } else if (sector > 0) {
- return M_PI / 2 - conv;
- } else {
- return -M_PI / 2 - conv;
- }
-}
-
-/**
- * @return arctan(x) in radians, in (-pi/2,pi/2) range
- */
-f32 Math_FAtanF(f32 x) {
- if (!gUseAtanContFrac) {
- return Math_FAtanTaylorF(x);
- } else {
- return Math_FAtanContFracF(x);
- }
-}
-
-/**
- * @return angle to (x,y) from vector (1,0) around (0,0) in radians, in (-pi,pi] range
- */
-f32 Math_FAtan2F(f32 y, f32 x) {
- if (x == 0.0f) {
- if (y == 0.0f) {
- return 0.0f;
- } else if (y > 0.0f) {
- return M_PI / 2;
- } else if (y < 0.0f) {
- return -M_PI / 2;
- } else {
- return qNaN0x10000;
- }
- } else if (x >= 0.0f) {
- return Math_FAtanF(y / x);
- } else if (y < 0.0f) {
- return Math_FAtanF(y / x) - M_PI;
- } else {
- return M_PI - Math_FAtanF(-(y / x));
- }
-}
-
-/**
- * @return arcsin(x) in radians, in [-pi/2,pi/2] range
- */
-f32 Math_FAsinF(f32 x) {
- return Math_FAtan2F(x, sqrtf(1.0f - SQ(x)));
-}
-
-/**
- * @return arccos(x) in radians, in [0,pi] range
- */
-f32 Math_FAcosF(f32 x) {
- return M_PI / 2 - Math_FAsinF(x);
-}