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