X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fbinomial.c;h=d9209f1bf0499dbcf8e78f8bb9ba1b6e27861683;hb=83c4d7ff1c815395eb050aa6b16b6b740595cc92;hp=39b8506d53edb7f184df01831522e0da7511217e;hpb=97da90c80bee9a04fa19eeaf577a7c61d7ad1110;p=pspp-builds.git diff --git a/src/language/stats/binomial.c b/src/language/stats/binomial.c index 39b8506d..d9209f1b 100644 --- a/src/language/stats/binomial.c +++ b/src/language/stats/binomial.c @@ -41,7 +41,6 @@ #include #include -#include #include @@ -79,7 +78,7 @@ calculate_binomial_internal (double n1, double n2, double p) /* SPSS Statistical Algorithms has completely different and WRONG advice here. */ - double sig1tailed = gslextras_cdf_binomial_P (n1, n1 + n2, p); + double sig1tailed = gsl_cdf_binomial_P (n1, p, n1 + n2); if ( p == 0.5 ) return sig1tailed > 0.5 ? 1.0 :sig1tailed * 2.0;