Property definitions

gamnit $ Vec4 :: defaultinit
# Vector of 4 values, either `x, y, z, w`, `u, v, z, w` or `r, g, b, a`
class Vec4
	super Vec3

	# W value
	var w = 1.0 is writable

	# A value (redirection to `z`)
	fun a: Float do return z

	# Set A value (redirection for `z=`)
	fun a=(value: Float) do z = value

	# Return all values into a new `Array[Float]`
	redef fun to_a do return [x, y, z, w]

	redef fun to_s do return "<{class_name} {x} {y} {z} {w}>"
end
lib/gamnit/model_parsers/model_parser_base.nit:68,1--85,3