Arbitrary_Precision.red

%%%%%%%%%%%%%%%%%%%%%
%  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$