read pi14Prog:
Digits:=10000:
RatPi(1000):

quit: