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

quit: