ignition/line_dist.m

   1 function dist=line_dist(x1,y1,x2,y2,x3,y3)
   2
   3 % Volodymyr Kondratenko           August 2011
   4
   5 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   6
   7 % finds the distance from (x3,y3) to line through (x1,y1) and (x2,y2)
   8 A=y1-y2;
   9 B=x2-x1;
  10 C=x1*y2-y1*x2;
  11 dist=(abs(A*x3+B*y3+C))/(sqrt(A*A+B*B));
  12
  13 end
  14
  15
  16
  17
  18
  19