Re: HP12C program Message #6 Posted by Gerson W. Barbosa on 22 Feb 2012, 4:12 a.m., in response to message #1 by Gerson W. Barbosa
While we're at it, here's another one for another constant:
001 1 019 CHS
002 0 020 STO+ 0
003 x<>y 021 STO* 2
004 y^x 022 RCL 0
005 STO 0 023 2
006 ENTER 024 *
007 * 025 +
008 8 026 ENTER
009 * 027 *
010 6 028 1/x
011 + 029 RCL 2
012 1/x 030 *
013 STO 1 031 STO+ 1
014 1 032 RCL 0
015 STO+ 0 033 g x=0
016 STO+ 1 034 g GTO 36
017 STO 2 035 g GTO 18
018 1 036 RCL 1
037 g GTO 00
Checking the archives, I found an old minichallenge of Valentin's which is worth mentioning. Crawl's program in Message #52 appears to explore the same idea. I certainly read the thread at the time, but I'd completely forgotten about his particular program. It's worth reading Valentin's original solutions and other therein:
http://www.hpmuseum.org/cgisys/cgiwrap/hpmuseum/archv016.cgi?read=95861
I've come up with a slightly faster series. I've started to implement it on the HP15C LE, but the initialization alone takes up 37 steps. If I manage to optimize it a bit, I'll present it later.
