ed/Odin
1
0
Fork 0
mirror of https://github.com/Ed94/Odin.git synced 2026-07-31 11:50:07 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix array of array arithmetic

Browse Source
This commit is contained in:
gingerBill
2017-11-07 23:02:53 +00:00
parent 9df3a94d33
commit b1d1497f4b
3 changed files with 31 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files
core/math.odin
+8 -22
View File
@@ -122,9 +122,11 @@ to_degrees :: proc(radians: f32) -> f32 do return radians * 360 / TAU;
dot :: proc(a, b: $T/[2]$E) -> E { c := a*b; return c[0] + c[1]; }
dot :: proc(a, b: $T/[3]$E) -> E { c := a*b; return c[0] + c[1] + c[2]; }
dot :: proc(a, b: $T/[4]$E) -> E { c := a*b; return c[0] + c[1] + c[2] + c[3]; }
dot :: proc(a, b: $T/[$N]$E) -> E {
res: E;
for i in 0..N do res += a[i] * b[i];
return res;
}
cross :: proc(x, y: $T/[3]$E) -> T {
a := swizzle(x, 1, 2, 0) * swizzle(y, 2, 0, 1);
@@ -133,27 +135,11 @@ cross :: proc(x, y: $T/[3]$E) -> T {
}
mag :: proc(v: $T/[2]$E) -> E do return sqrt(dot(v, v));
mag :: proc(v: $T/[3]$E) -> E do return sqrt(dot(v, v));
mag :: proc(v: $T/[4]$E) -> E do return sqrt(dot(v, v));
mag :: proc(v: $T/[$N]$E) -> E do return sqrt(dot(v, v));
norm :: proc(v: $T/[2]$E) -> T do return v / mag(v);
norm :: proc(v: $T/[3]$E) -> T do return v / mag(v);
norm :: proc(v: $T/[4]$E) -> T do return v / mag(v);
norm :: proc(v: $T/[$N]$E) -> T do return v / mag(v);
norm0 :: proc(v: $T/[2]$E) -> T {
m := mag(v);
if m == 0 do return 0;
return v/m;
}
norm0 :: proc(v: $T/[3]$E) -> T {
m := mag(v);
if m == 0 do return 0;
return v/m;
}
norm0 :: proc(v: $T/[4]$E) -> T {
norm0 :: proc(v: $T/[$N]$E) -> T {
m := mag(v);
if m == 0 do return 0;
return v/m;