vectors.lua

function vec(x,y)
	local v = {x = x, y = y}
	setmetatable(v, _vector)
	return v
end

_vector = {
__add = function(a,b)
	if type(b) == "table" then
		return vec(a.x + b.x, a.y + b.y)
	else
		return vec(a.x + b, a.y + b)
	end
end;

__sub = function(a,b)
	if type(b) == "table" then
		return vec(a.x - b.x, a.y - b.y)
	else
		return vec(a.x - b, a.y - b)
	end
end;

__mul = function(a, b)--Dot
	if type(b) == "table" then
		return a.x * b.x + a.y * b.y
	else
		return vec(a.x * b, a.y * b)
	end
end;

__div = function(a, b)
	return vec(a.x / b, a.y / b)
end;

__unm = function(a)
	return vec(-a.x, -a.y)
end;

__tostring = function(v) return "("..v.x..", "..v.y..")" end;

}