RPL mini-challenge - Triangle of Primes (HP-49G/G+,50g)

[Gerson W. Barbosa]

(07-01-2019 05:05 PM)John Keith Wrote:  

(07-01-2019 01:52 PM)Claudio L. Wrote:  ...speed is a different story...
Runs the 99 case in 172 msec ...

Gee, only aboutr 2300* faster!

I really need another HP 50...

I do need a third one.

My newer 50g (CNA2240GYB) is slightly slower than yours: 402.76 seconds for k=99. My program is a bit slower as well: 409.17 seconds.

Code:


# 7A67h
73 bytes










« { } 1 0 DUP 5 ROLL
  START 1 OVER
    START UNROT NEXTPRIME ROT
    NEXT UNROT + LASTARG NIP ROT 2 +
  NEXT DROP2
»