Index: tests/vector/.expect/vec4_float.txt
===================================================================
--- tests/vector/.expect/vec4_float.txt	(revision 5b24ee2335601c4337a02d51dc76da8c8ae382e0)
+++ tests/vector/.expect/vec4_float.txt	(revision 5b24ee2335601c4337a02d51dc76da8c8ae382e0)
@@ -0,0 +1,30 @@
+ctor(x,y):<1.,2.,3.,4.>
+copy ctor:<1.,2.,3.,4.>
+assignment:<3.,4.2,-2.,-100.>
+move assignment:<1.,2.,3.,4.>
+zero-init:<0.,0.,0.,0.>
+zero-assign:<0.,0.,0.,0.>
+fill-ctor:<1.23,1.23,1.23,1.23>
+?-?:<0.02,0.43,-0.999998,-1e-06.>
+?-=?:<0.02,0.43,-0.999998,-1e-06.>
+-?:<-0.02,-0.43,0.999998,1e-06.>
+?+?:<2.3,2.45,-9.2,-12.5>
+?+=?:<2.3,2.45,-9.2,-12.5>
+v*s:<4.5,8.25,300.9,-6.>
+s*v:<4.5,8.25,300.9,-6.>
+?*=?:<4.5,8.25,300.9,-6.>
+?/?:<0.666667,-0.0333333,15.,-5.>
+?/=?:<0.666667,-0.0333333,15.,-5.>
+dot_1:0.
+dot_2:47.7345
+length:5.47723
+length_squared:30.
+distance:10.9563
+normalize:<0.433872,-0.231399,0.072312,0.867745>
+project:<-0.,-0.,-0.,-1.>
+project_2:<2.91736,0.291736,1.16694,0.583471>
+reflect:<5.26163,6.,-1.19906,1.52327>
+refract:<0.608838,0.730606,0.284084,0.121768>
+refract:<0.457773,0.822893,-0.333534,-0.0452281>
+faceforward_nochange:<4.,5.5,2.,2.>
+faceforward_flip:<4.,5.5,2.,2.>
Index: tests/vector/glm_equivalents/vec4_float.cc
===================================================================
--- tests/vector/glm_equivalents/vec4_float.cc	(revision 5b24ee2335601c4337a02d51dc76da8c8ae382e0)
+++ tests/vector/glm_equivalents/vec4_float.cc	(revision 5b24ee2335601c4337a02d51dc76da8c8ae382e0)
@@ -0,0 +1,114 @@
+#include <glm/glm.hpp>
+#include <iostream>
+#include <ostream>
+
+using namespace glm;
+
+std::ostream& operator<<(std::ostream& os, glm::tvec4<float>& v) {
+    os << "<" << v.x << "," << v.y << "," << v.z << "," << v.w << ">";
+    return os;
+}
+std::ostream& operator<<(std::ostream& os, glm::tvec4<float>&& v) {
+    os << "<" << v.x << "," << v.y << "," << v.z << "," << v.w << ">";
+    return os;
+}
+
+float length_squared(glm::tvec4<float> v) {
+    return glm::length(v) * glm::length(v);
+}
+
+tvec4<float> project(glm::tvec4<float> u, glm::tvec4<float> v) {
+    return normalize(v) * dot(u, normalize(v));
+}
+
+int main(void) {
+    tvec4<float> v1 = {1.f,2.f,3.f,4.f};
+    std::cout << "ctor(x,y):" << v1 << std::endl;
+
+    tvec4<float> v2 = v1;
+    std::cout << "copy ctor:" << v2 << std::endl;
+
+    v2 = (tvec4<float>){3.f,4.2f,-2.f,-100.f};
+    std::cout << "assignment:" << v2 << std::endl;
+
+    v2 = v1;
+    std::cout << "move assignment:" << v2 << std::endl;
+
+    // tvec4<float> v3 = 0;
+    // std::cout << "zero-init:" << v3 << std::endl;
+
+    // v1 = 0;
+    // std::cout << "zero-assign:" << v1 << std::endl;
+    //
+    // tvec4<float> v4 = {1.23f};
+    // std::cout << "fill-ctor:" << v4 << std::endl;
+    //
+    v1 = (tvec4<float>){1.23f, 3.43f, 0.000002f, -0.000002f};
+    std::cout << "?-?:" << (v1 - (tvec4<float>){1.21f,3,1,-0.000001f}) << std::endl;
+
+    v1 -= (tvec4<float>){1.21f,3,1,-0.000001f};
+    std::cout << "?-=?:" << v1 << std::endl;
+
+    v1 = -v1;
+    std::cout << "-?:" << v1 << std::endl;
+
+
+    v1 = (tvec4<float>){1.5f, 2.75f, -14.2f, -13.5f};
+    std::cout << "?+?:" << (v1 + (tvec4<float>){0.8f, -0.3f, 5, 1}) << std::endl;
+
+    v1 += (tvec4<float>){0.8f, -0.3f, 5, 1};
+    std::cout << "?+=?:" << v1 << std::endl;
+
+    v1 = (tvec4<float>){1.5f, 2.75f, 100.3f, -2.f};
+    std::cout << "v*s:" << v1 * 3.f << std::endl;
+
+    std::cout << "s*v:" << 3.f * v1 << std::endl;
+
+    v1 *= 3;
+    std::cout << "?*=?:" << v1 << std::endl;
+
+    v1 = (tvec4<float>){2, -0.1f, 45, -15};
+    std::cout << "?/?:" << (v1 / 3.f) << std::endl;
+
+    v1 /= 3.f;
+    std::cout << "?/=?:" << v1 << std::endl;
+
+
+    v1 = (tvec4<float>){4,3,2,1};
+    v2 = (tvec4<float>){0,4,-3,-6};
+    std::cout << "dot_1:" << dot(v1, v2) << std::endl;
+
+    v2 = (tvec4<float>){1.3f, -2, 12.2, 24.1345};
+    std::cout << "dot_2:" << dot(v1, v2) << std::endl;
+
+
+    v1 = (tvec4<float>){1,2,3,4};
+    std::cout << "length:" << length(v1) << std::endl;
+
+    std::cout << "length_squared:" << length_squared(v1) << std::endl;
+
+    v2 = (tvec4<float>){6, -3.2f, 1, 12};
+    std::cout << "distance:" << distance(v1, v2) << std::endl;
+
+    std::cout << "normalize:" << normalize(v2) << std::endl;
+
+    std::cout << "project:" << project((tvec4<float>){5,6,0,-1}, (tvec4<float>){0, 0, 0, 1}) << std::endl;
+    std::cout << "project_2:" << project((tvec4<float>){5,6,3.2f,-16.75f}, (tvec4<float>){10, 1, 4, 2}) << std::endl;
+
+    v1 = (tvec4<float>){5,6,2.333f,1};
+    v2 = (tvec4<float>){1,0,-13.5f,2};
+    std::cout << "reflect:" << reflect(v1,normalize(v2)) << std::endl;
+
+    v2 = (tvec4<float>){0,-1,2,0.5f};
+    std::cout << "refract:" << refract(normalize(v1),normalize(v2),1.f) << std::endl;
+    std::cout << "refract:" << refract(normalize(v1),normalize(v2),1.f/1.33f) << std::endl;
+
+    tvec4<float> geometric_normal = {5,6,1,2};
+    tvec4<float> perturbed_normal = {4,5.5f,2,2};
+    tvec4<float> eyeline = {-1,0.002f,-1.0345f,-2};
+    std::cout << "faceforward_nochange:" << faceforward(perturbed_normal, eyeline, geometric_normal) << std::endl;
+
+    eyeline = (tvec4<float>){1,0.002f,-1.0345f,-2};
+    std::cout << "faceforward_flip:" << faceforward(perturbed_normal, eyeline, geometric_normal) << std::endl;
+}
+
Index: tests/vector/vec4_float.cfa
===================================================================
--- tests/vector/vec4_float.cfa	(revision 5b24ee2335601c4337a02d51dc76da8c8ae382e0)
+++ tests/vector/vec4_float.cfa	(revision 5b24ee2335601c4337a02d51dc76da8c8ae382e0)
@@ -0,0 +1,90 @@
+#include "../../libcfa/src/vec/vec4.hfa"
+#include <fstream.hfa>
+
+int main(void) {
+    vec4(float) v1 = {1.f,2.f,3.f,4.f};
+    sout | "ctor(x,y):" | v1;
+
+    vec4(float) v2 = v1;
+    sout | "copy ctor:" | v2;
+
+    v2 = (vec4(float)){3.f,4.2f,-2.f,-100.f};
+    sout | "assignment:" | v2;
+
+    v2 = v1;
+    sout | "move assignment:" | v2;
+
+    vec4(float) v3 = 0;
+    sout | "zero-init:" | v3;
+
+    v1 = 0;
+    sout | "zero-assign:" | v1;
+
+    vec4(float) v4 = {1.23f};
+    sout | "fill-ctor:" | v4;
+
+    v1 = (vec4(float)){1.23f, 3.43f, 0.000002f, -0.000002f};
+    sout | "?-?:" | (v1 - (vec4(float)){1.21f,3,1,-0.000001f});
+
+    v1 -= (vec4(float)){1.21f,3,1,-0.000001f};
+    sout | "?-=?:" | v1;
+
+    v1 = -v1;
+    sout | "-?:" | v1;
+
+    v1 = (vec4(float)){1.5f, 2.75f, -14.2f, -13.5f};
+    sout | "?+?:" | (v1 + (vec4(float)){0.8f, -0.3f, 5, 1});
+
+    v1 += (vec4(float)){0.8f, -0.3f, 5, 1};
+    sout | "?+=?:" | v1;
+
+    v1 = (vec4(float)){1.5f, 2.75f, 100.3f, -2.f};
+    sout | "v*s:" | v1 * 3.f;
+
+    sout | "s*v:" | 3.f * v1;
+
+    v1 *= 3;
+    sout | "?*=?:" | v1;
+
+    v1 = (vec4(float)){2, -0.1f, 45, -15};
+    sout | "?/?:" | (v1 / 3.f);
+
+    v1 /= 3.f;
+    sout | "?/=?:" | v1;
+
+    v1 = (vec4(float)){4,3,2,1};
+    v2 = (vec4(float)){0,4,-3,-6};
+    sout | "dot_1:" | dot(v1, v2);
+
+    v2 = (vec4(float)){1.3f, -2, 12.2f, 24.1345f};
+    sout | "dot_2:" | dot(v1, v2);
+
+    v1 = (vec4(float)){1,2,3,4};
+    sout | "length:" | length(v1);
+
+    sout | "length_squared:" | length_squared(v1);
+
+    v2 = (vec4(float)){6, -3.2f, 1, 12};
+    sout | "distance:" | distance(v1, v2);
+
+    sout | "normalize:" | normalize(v2);
+
+    sout | "project:" | project((vec4(float)){5,6,0,-1}, (vec4(float)){0, 0, 0, 1});
+    sout | "project_2:" | project((vec4(float)){5,6,3.2f,-16.75f}, (vec4(float)){10, 1, 4, 2});
+
+    v1 = (vec4(float)){5,6,2.333f,1};
+    v2 = (vec4(float)){1,0,-13.5f,2};
+    sout | "reflect:" | reflect(v1,v2);
+
+    v2 = (vec4(float)){0,-1,2,0.5f};
+    sout | "refract:" | refract(normalize(v1),normalize(v2),1.f);
+    sout | "refract:" | refract(normalize(v1),normalize(v2),1.f/1.33f);
+
+    vec4(float) geometric_normal = {5,6,1,2};
+    vec4(float) perturbed_normal = {4,5.5f,2,2};
+    vec4(float) eyeline = {-1,0.002f,-1.0345f,-2};
+    sout | "faceforward_nochange:" | faceforward(perturbed_normal, eyeline, geometric_normal);
+
+    eyeline = (vec4(float)){1,0.002f,-1.0345f,-2};
+    sout | "faceforward_flip:" | faceforward(perturbed_normal, eyeline, geometric_normal);
+}