%CALCOLA DISTANZA TRA PUNTO P(x,y) e RETTA r(a,b,c)

function d=distanza_punto_retta(P,r)

d=abs(r(1)*P(1)+r(2)*P(2)+r(3))/sqrt(r(1)^2 + r(2)^2);