Filter
Top Products
EL-9600/9400 Graphing Calculator
Involute
(Inverse Involute)
Use the involute function for calculating gears etc. to find the angle of obliquity
from the initial value and involute value.
Conversely, calculate the involute value from the angle of obliquity.
Calculation
Involute function : inv θ = tan θ - θ[rad]
Use Newton's method to find the inverse involute:
FLOWCHART
PARAMETERS
PROGRAMME LIST
(REAL MODE)
Selection of type
Entry of initial
value and
involute value
Calculation of
angle of obliquity
Display of angle of obliquity
Start
End
start
Y
ANGLE
INVO
CALPRESS
Y
Y
N
N
N
Calculation of involute
value (display)
Entry of angle
of obliquity
Enter 1 or 2.
To calculation of involute
Calculation of involute.
Enter initial value and
involute value.
Angle of obliquity
calculated.
Judgment on repetition
of calculation of angle
of obliquity.
Calculation of inverse
involute. Enter angle
of obliquity.
Involute value calculated.
Involute value displayed.
To inverse involute calculation
Returns to START if entry
neither 1 nor 2.
θ
i +1
=
θ
i
-=
θ
i
-
f(θ
i
)
f'(θ)
tan
2
θ
i
tanθ
i
-
θ
i
-a
f (
θ
) = a - inv
θ
SP : involute curve
S : involute starting point
θ : angle of obliquity of point P
Name of parameter
D, R, T, J
S
Z
Content
working variable for calculating
selecting calculation type
(S=1: involute calculation)
(S=2: inverse involute calculation)
initial value, angle of obliquity
Name of parameter
θ
I
A
B
Content
angle of obliquity
involute value
input and output of angle
input of initial value
S = 2
int(10
8
D) 0
S = 1
0
q
Rg
P
S
a
θ
θ
Label START
ClrT
Print "SELECT 1/2
Input S
If S=1 Goto ANGLE
If S=2 Goto INVO
Goto START
Label ANGLE
Print "Input BEGIN
Input B
B Z
Print "Input INVO
Input I
I J
Label CALPRESS
tan Z T
π Z/180.0 R
(T-R-J)/T
2
D
180.0 (R-D)/π Z
If int (
10
ˆ8 D)≠0 Goto CALPRESS
Z A
Print "ANGLE
Print A
End
Label INVO
Print "Input ANGLE
Input A
A θ
tanθ -π θ/180 I
Print "INVOLUTE
Print I
End
Title : INVOLUTE
4
HB2.Doc02. 98.10.1, 0:24 PM4