3.3


i=in=high=low=0, done=FALSE, input="PI=3.14159, approximately";

while ((c=NEXT(i))!=EOS && !done) { c input.
if ('P'
else if ('P'>9)
done=(++high==ENUF) high ENUF, done , high =1
while('I'!=EOS&&!done)
if ('I'
else if ('P'>9)
done=(++high==ENUF) high=2, done=
while('I'!=EOS&&!done)
if ('='
else if ('='>9)
done=(++high==ENUF) high=3, done=
while('I'!=EOS&&!done) done=, !done=, .