Source position: graphmath.pp line 103
function RotatePoint(
const APoint: TPoint;
AAngle: Double
):TPoint;