% Funzione per il calcolo del punto di minima distanza tra tre o più rette
% nello spazio

function [x y z] = min_quad_3D(rette)

a = rette(:,1);
b = rette(:,2);
c = rette(:,3);
d = rette(:,4);

S = [a b c];

sol = -inv(S'*S)*S'*d;

x = sol(1,1);
y = sol(2,1);
z = sol(3,1);
