3535 IF X>0 THEN CHI=CHI+(TI(M,1)-X)^2/X : IGL=IGL+1