DotProduct

function DotProduct(

  const vector1: TPointD;

  const vector2: TPointD

):Double; overload;

function DotProduct(

  const pt1: TPointD;

  const pt2: TPointD;

  const pt3: TPointD

):Double; overload;