5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c: %%%%%%%%%%%%%%%%%%%%%
5f892713c3 2021-03-03 trnsz@pobox.c: % 10,000 DIGITS OF PI
5f892713c3 2021-03-03 trnsz@pobox.c: %%%%%%%%%%%%%%%%%%%%%
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c: % This file shows the power of iCAS
5f892713c3 2021-03-03 trnsz@pobox.c: % in computing PI to 10,000 digits
5f892713c3 2021-03-03 trnsz@pobox.c: %
5f892713c3 2021-03-03 trnsz@pobox.c: % NOTE WELL-- After computing
5f892713c3 2021-03-03 trnsz@pobox.c: % PI has finished, BE SURE to
5f892713c3 2021-03-03 trnsz@pobox.c: % scroll down to reset iCAS to
5f892713c3 2021-03-03 trnsz@pobox.c: % its standard settings (or else ALL
5f892713c3 2021-03-03 trnsz@pobox.c: % of your computations will be to
5f892713c3 2021-03-03 trnsz@pobox.c: % to 10,000 digits!)
5f892713c3 2021-03-03 trnsz@pobox.c: %
5f892713c3 2021-03-03 trnsz@pobox.c: % Use real arithmetic
5f892713c3 2021-03-03 trnsz@pobox.c: on rounded$
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c: % Set precision to 10000 digits
5f892713c3 2021-03-03 trnsz@pobox.c: precision(10000)$
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c: % Print Pi
5f892713c3 2021-03-03 trnsz@pobox.c: pi;
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c: % Set precision back to default (12)
5f892713c3 2021-03-03 trnsz@pobox.c: precision(12)$
5f892713c3 2021-03-03 trnsz@pobox.c:
5f892713c3 2021-03-03 trnsz@pobox.c: % Restore precise arithmetic
5f892713c3 2021-03-03 trnsz@pobox.c: off rounded$