1 | #pragma once |
---|
2 | |
---|
3 | #include <iostream.hfa> |
---|
4 | #include "vec.hfa" |
---|
5 | |
---|
6 | forall (otype T) { |
---|
7 | struct vec4 { |
---|
8 | T x, y, z, w; |
---|
9 | }; |
---|
10 | } |
---|
11 | |
---|
12 | |
---|
13 | forall (otype T) { |
---|
14 | static inline { |
---|
15 | |
---|
16 | void ?{}(vec4(T)& v, T x, T y, T z, T w) { |
---|
17 | v.[x, y, z, w] = [x, y, z, w]; |
---|
18 | } |
---|
19 | |
---|
20 | forall(| zero_assign(T)) |
---|
21 | void ?{}(vec4(T)& vec, zero_t) with (vec) { |
---|
22 | x = y = z = w = 0; |
---|
23 | } |
---|
24 | |
---|
25 | void ?{}(vec4(T)& vec, T val) with (vec) { |
---|
26 | x = y = z = w = val; |
---|
27 | } |
---|
28 | |
---|
29 | void ?{}(vec4(T)& vec, vec4(T) other) with (vec) { |
---|
30 | [x,y,z,w] = other.[x,y,z,w]; |
---|
31 | } |
---|
32 | |
---|
33 | // Assignment |
---|
34 | void ?=?(vec4(T)& vec, vec4(T) other) with (vec) { |
---|
35 | [x,y,z,w] = other.[x,y,z,w]; |
---|
36 | } |
---|
37 | forall(| zero_assign(T)) |
---|
38 | void ?=?(vec4(T)& vec, zero_t) with (vec) { |
---|
39 | x = y = z = w = 0; |
---|
40 | } |
---|
41 | |
---|
42 | // Primitive mathematical operations |
---|
43 | |
---|
44 | // Subtraction |
---|
45 | |
---|
46 | forall(| subtract(T)) { |
---|
47 | vec4(T) ?-?(vec4(T) u, vec4(T) v) { // TODO( can't make this const ref ) |
---|
48 | return [u.x - v.x, u.y - v.y, u.z - v.z, u.w - v.w]; |
---|
49 | } |
---|
50 | vec4(T)& ?-=?(vec4(T)& u, vec4(T) v) { |
---|
51 | u = u - v; |
---|
52 | return u; |
---|
53 | } |
---|
54 | } |
---|
55 | |
---|
56 | forall(| negate(T)) { |
---|
57 | vec4(T) -?(vec4(T) v) with (v) { |
---|
58 | return [-x, -y, -z, -w]; |
---|
59 | } |
---|
60 | } |
---|
61 | |
---|
62 | // Addition |
---|
63 | forall(| add(T)) { |
---|
64 | vec4(T) ?+?(vec4(T) u, vec4(T) v) { // TODO( can't make this const ref ) |
---|
65 | return [u.x + v.x, u.y + v.y, u.z + v.z, u.w + v.w]; |
---|
66 | } |
---|
67 | vec4(T)& ?+=?(vec4(T)& u, vec4(T) v) { |
---|
68 | u = u + v; |
---|
69 | return u; |
---|
70 | } |
---|
71 | } |
---|
72 | |
---|
73 | // Scalar Multiplication |
---|
74 | forall(| multiply(T)) { |
---|
75 | vec4(T) ?*?(vec4(T) v, T scalar) with (v) { // TODO (can't make this const ref) |
---|
76 | return [x * scalar, y * scalar, z * scalar, w * scalar]; |
---|
77 | } |
---|
78 | vec4(T) ?*?(T scalar, vec4(T) v) { // TODO (can't make this const ref) |
---|
79 | return v * scalar; |
---|
80 | } |
---|
81 | vec4(T)& ?*=?(vec4(T)& v, T scalar) { |
---|
82 | v = v * scalar; |
---|
83 | return v; |
---|
84 | } |
---|
85 | } |
---|
86 | |
---|
87 | // Scalar Division |
---|
88 | forall(| divide(T)) { |
---|
89 | vec4(T) ?/?(vec4(T) v, T scalar) with (v) { |
---|
90 | return [x / scalar, y / scalar, z / scalar, w / scalar]; |
---|
91 | } |
---|
92 | vec4(T)& ?/=?(vec4(T)& v, T scalar) with (v) { |
---|
93 | v = v / scalar; |
---|
94 | return v; |
---|
95 | } |
---|
96 | } |
---|
97 | |
---|
98 | // Relational Operators |
---|
99 | forall(| equality(T)) { |
---|
100 | bool ?==?(vec4(T) u, vec4(T) v) with (u) { |
---|
101 | return x == v.x && y == v.y && z == v.z && w == v.w; |
---|
102 | } |
---|
103 | bool ?!=?(vec4(T) u, vec4(T) v) { |
---|
104 | return !(u == v); |
---|
105 | } |
---|
106 | } |
---|
107 | |
---|
108 | // Geometric functions |
---|
109 | forall(| add(T) | multiply(T)) |
---|
110 | T dot(vec4(T) u, vec4(T) v) { |
---|
111 | return u.x * v.x + u.y * v.y + u.z * v.z + u.w * v.w; |
---|
112 | } |
---|
113 | |
---|
114 | } // static inline |
---|
115 | } |
---|
116 | |
---|
117 | forall(dtype ostype, otype T | writeable(T, ostype)) { |
---|
118 | ostype & ?|?(ostype & os, vec4(T) v) with (v) { |
---|
119 | return os | '<' | x | ',' | y | ',' | z | ',' | w | '>'; |
---|
120 | } |
---|
121 | void ?|?(ostype & os, vec4(T) v ) with (v) { |
---|
122 | (ostype &)(os | v); ends(os); |
---|
123 | } |
---|
124 | } |
---|
125 | |
---|