8352 IF P(1)=0 THEN P(1)=.001