Inverse Sinc Approximation (HP-42S)

[Gerson W. Barbosa]

The approximation is good only when the arguments approach 1 (better on Free42). Anyway, this might be useful in some situations.

Sinc Function

Code:


00 { 66-Byte Prgm }
01>LBL "ASINC"
02 ENTER
03 ENTER
04 ENTER
05 78
06 175
07 ÷
08 ×
09 456
10 175
11 ÷
12 -
13 ×
14 243
15 35
16 ÷
17 +
18 ×
19 2424
20 175
21 ÷
22 -
23 ×
24 1587
25 175
26 ÷
27 +
28 SQRT
29 .END.

\[0.7 \rightarrow 1.4(0990334015)\]
\[0.8 \rightarrow 1.131(05968014)\]
\[0.9 \rightarrow 0.78668(1275111)\]
\[\frac{\sqrt{8}}{\pi }\rightarrow 0.78539(6392174)\]
\[0.95 \rightarrow 0.5519109(01224)\]
\[0.999 \rightarrow 0.077471290(5533)\]
\[0.999 \rightarrow 0.077471290316(5) (Free42)\]




Edited to add plot.