HP Forums
(33s) OEIS A3602: Kimberling's Paraphrases, a Very Fractal Sequence - Printable Version

+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Software Libraries (/forum-10.html)
+--- Forum: General Software Library (/forum-13.html)
+--- Thread: (33s) OEIS A3602: Kimberling's Paraphrases, a Very Fractal Sequence (/thread-18661.html)



(33s) OEIS A3602: Kimberling's Paraphrases, a Very Fractal Sequence - Gerald H - 08-12-2022 10:19 AM

Takes a real integer from the stack & returns A3602(N) to stack.
Nth member of Kimberling’s paraphrases.
Preserves stack.

https://oeis.org/A003602

Improvements to programme welcome.

Code:
1.    LBL I
2.    CF 1
3.    STO N
4.    CLx
5.    N/2
6.    STO N
7.    FP
8.    x=0?
9.    SF 1
10.    RCL+ N
11.    FS? 1
12.    GTO I
13.    RTN

I: LN = 42