f2c04ccdad 2021-03-03 1: %%%%%%%%%%%%%%%%%%%%%
f2c04ccdad 2021-03-03 2: % ARBITRARY PRECISION
f2c04ccdad 2021-03-03 3: %%%%%%%%%%%%%%%%%%%%%
f2c04ccdad 2021-03-03 4:
f2c04ccdad 2021-03-03 5: % Use real arithmetic
f2c04ccdad 2021-03-03 6: on rounded$
f2c04ccdad 2021-03-03 7:
f2c04ccdad 2021-03-03 8: % Set precision to 50 digits
f2c04ccdad 2021-03-03 9: precision(50)$
f2c04ccdad 2021-03-03 10:
f2c04ccdad 2021-03-03 11: % Print Pi
f2c04ccdad 2021-03-03 12: pi;
f2c04ccdad 2021-03-03 13:
f2c04ccdad 2021-03-03 14: % Set precision back to default (12)
f2c04ccdad 2021-03-03 15: precision(12)$
f2c04ccdad 2021-03-03 16:
f2c04ccdad 2021-03-03 17: % Restore precise arithmetic
f2c04ccdad 2021-03-03 18: off rounded$