Lisp怎么求圆弧坐标

img


图中红色圈住的坐标,想实现功能,按照原来圆弧重画一个一模一样的