齿轮过渡线 请高手指点

l2003

   经典图书

本人看了一段别人用vb编的齿轮齿根过渡线程序，但是一直没有弄懂该程序用的是什么线作为过渡线的，亦不知道他的这种过渡线程序对不对。
附上程序如下，恳请高手指教，帮解释一下。
'''''''''''''绘制在齿根处点的坐标：
k = (y(1) - y(2)) / (x(1) - x(2))
bj = y(2) - k * x(2)
x(0) = (-2 * k * bj + (4 * k * k * bj * bj - 4 * (1 + k * k) * (bj * bj - rf * rf)) ^ (1 / 2)) / (2 * (1 + k * k))
y(0) = k * x(0) + bj
Part.CreatePoint2 x(0), y(0), 0