反算渐开线函数是一个叠代法求原值的问题,论坛上无数的高者都给出了自编的小程序,现在在计算齿轮类公式时一般都嵌入程序中了,根本的计算语句就这么几句:
INPUT "INV A ="; B
T = B
Q = .7
R = 0
10 S = TAN(Q) - Q - T
Q = Q - S / TAN(Q) ^ 2
IF R = S THEN 20
IF ABS(S) > 1E-09 THEN LET R = S: GOTO 10
20 A = Q
第一行是输入要求的渐开线函数值,用三个变量来表示:T是目标函数,Q是原函数的变化值,也是最终值,R是误差值,最后的A值是目标值原函数的弧度值。也就是所求值,转成角度即可。
本人曾编过一个小程序,打开后如下: