Source position: graphmath.pp line 101
function RadialPoint(
EccentricAngle: Extended;
const Rect: TRect
):TPoint;