直角齿轮曲线 iShow
The gear curve from mathworld.wolfram.com/GearCurve.html
可参考：极坐标曲线演示 iShow，https://www.geogebra.org/m/fyyjtuwr
r(t) = 1+ a atan(k sin(n t))/atan(k)
曲线((1 + a atand(k sin(n t)) / atand(k); t), t, -π, π)
关键参数：
r(t)=a+((1)/(b)) tanh(b sin(n t))
c=曲线(r(t) cos(t+α),r(t) sin(t+α),t,0,2 π)
d=曲线(r(t) cos(t-α),r(t) sin(t-α),t,0,2 π)
odd=2 round(((n)/(2)))≠n
d'=旋转(d,如果(odd,((π)/(n)),0))
c''=平移(d',(2 a,0))
