121122123124125126127128129130131
localflag=false; sum=0.0; for (i=0;i<20;i++) { sum += dist2.p(i); c[i]=sum; d[i]=dist2.cdf(i+1); // System.out.printf(c[i]-d[i]); localflag = localflag || abs(c[i]-d[i]) > sbeps; } globalflag = globalflag || localflag; if (localflag) {
137138139140141142143144145146147
lambda=10.0; Poissondist normc = new Poissondist(lambda); sbeps=1.0e-12; localflag=false; for (i=1;i<20;i++) { a=normc.cdf(i); b=normc.invcdf(a); localflag = localflag || (i-b != 0) && (i-b-1 != 0) ; } globalflag = globalflag || localflag; if (localflag) {