Happy Pi day everyone!!

[Gerson W. Barbosa]

Just for the occasion, yet another wp34s \(\pi\) program. Optimization and conversion to HP calculators are left as an exercise for the reader.

0001 **LBL A
0002 RCL X
0003 # 012
0004 [sqrt]
0005 .
0006 7
0007 5
0008 RCL[times] Y
0009 RCL[times] Y
0010 [sqrt]
0011 ||
0012 STO+ X
0013 RCL L
0014 DSE Z
0015 BACK 006
0016 RCL[times] Y
0017 [sqrt]
0018 R[^]
0019 INC X
0020 # 072
0021 [times]
0022 RCL Y
0023 1/x
0024 [cmplx]CONJ
0025 +
0026 DEC X
0027 # 036
0028 /
0029 2[^x]
0030 # 002
0031 +
0032 STO[times] Y
0033 INC X
0034 R[v]
0035 +
0036 RCL/ Z
0037 END

 4 A --> 3.141592653668149565494622891088879

20 A --> 3.141592653589793238462643383279505