|
@@ -26,8 +26,8 @@ cross2 :: proc(a, b: $T/[2]$E) -> E {
|
|
|
|
|
|
cross3 :: proc(a, b: $T/[3]$E) -> (c: T) {
|
|
|
c[0] = +(a[1]*b[2] - b[1]*a[2]);
|
|
|
- c[1] = -(a[2]*b[3] - b[2]*a[3]);
|
|
|
- c[2] = +(a[3]*b[1] - b[3]*a[1]);
|
|
|
+ c[1] = -(a[2]*b[0] - b[2]*a[0]);
|
|
|
+ c[2] = +(a[0]*b[1] - b[0]*a[1]);
|
|
|
return;
|
|
|
}
|
|
|
|