\ 0: Initial release 11/07/2002, Brad Eckert
\ 1: Made 4tH version, Hans Bezemer
\ 2: Converted to real FP constants
\ 3: Added ANS-94 dependancy
\ 4: Increased precision for 64-bit
\ 5: Removed FCLEAR
\ 6: Made ZenFP version

[UNDEFINED] PI [IF]
[UNDEFINED] S>FLOAT [IF] [ABORT] [THEN]
[UNDEFINED] ZenFP   [IF] [ABORT] [THEN]
FLOAT array PI s" 3.1415926535897932384626433832795028841971693994" s>float PI 2! DOES> 2@ ;
FLOAT array E  s" 2.7182818284590452353602874713526624977572470937" s>float E  2! DOES> 2@ ;
[THEN]
