Artifact f70b95dcaab989adb1b682eedfc355afa3aecdcf0b42cd1b2e6ad5bd42655b0b:

• File Arbitrary_Precision.red — part of check-in [f2c04ccdad] at 2021-03-03 07:48:17 on branch master — icas-bundled (2020-03-13) (user: trnsz@pobox.com, size: 258) [annotate] [blame] [check-ins using] [more...]

%%%%%%%%%%%%%%%%%%%%%
%  ARBITRARY PRECISION
%%%%%%%%%%%%%%%%%%%%%

% Use real arithmetic
on rounded$

% Set precision to 50 digits
precision(50)$

% Print Pi
pi;

% Set precision back to default (12)
precision(12)$

% Restore precise arithmetic
off rounded$