Projection of the point  (Subscript[T, 0]) = ((Subscript[x, 0]) , (Subscript[y, 0])) to the normalized line αx + βy + γ = 0,  (α^2) +(β^2) = 1, in the plane

Input: parameters α, β, γ, (α^2)+(β^2) = 1 of the normalized line, point (Subscript[T, 0]) =((Subscript[x, 0]),(Subscript[y, 0]));
Output: distance from the point (Subscript[T, 0]) to the line and projection of the point (Subscript[T, 0]) to the line; 
Submodules: none needed

Proj[line_,T_]:=Module[{n0,u0,d,Tp},
n0={line[[1]],line[[2]]};
u0={-line[[2]],line[[1]]};
d=Abs[line[[1]]T[[1]]+line[[2]]T[[2]]+line[[3]]];
Tp=(T.u0)u0-line[[3]] n0;
{d,Tp}
]