[VA] SRC #009 - Pi Day 2021 Special

[robve]

(03-21-2021 07:00 PM)rprosperi Wrote:  

(03-21-2021 06:48 PM)robve Wrote:  HP-71B FORTH with MultiMod (forthcoming: where can I find the pdf manual?)

The 71B Forth/Assembler Manual is part of the MoHPC Document Set (which I presume you have by now) but is also available here if you don't have that.

Great, many thanks! I had done some searches online but didn't find it before. I immediately ordered the MoHPC Document Set and used the link to the pdf to figure out how to use floating point in HP-71B FORTH and its editor. It's very easy. Within minutes after skimming the documentation I had my program entered as SCREEN, running and spitting out \( pi \).

The program:

FVARIABLE P
FVARIABLE Q
: VIETE
  2. SQRT P STO
  2. F/ Q STO
  BEGIN
    2. P RCL F+ SQRT P STO
    2. F/ Q RCL F* Q STO
    2. P RCL X>=Y?
  UNTIL
  2. Q RCL F/ F.
;
VIETE

- Rob