X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=lib%2Ftukey%2Fptukey.c;fp=lib%2Ftukey%2Fptukey.c;h=2af46cf89378fa6840502d3e986c6e38211420b2;hb=6e097c89af440da90b43ce90864394c4d0c843d5;hp=9a89104cf90e78f206a002e611d850b5ad922eb6;hpb=50feac63e2fb9776f53e432f137311b4f5563ccf;p=pspp diff --git a/lib/tukey/ptukey.c b/lib/tukey/ptukey.c index 9a89104cf9..2af46cf893 100644 --- a/lib/tukey/ptukey.c +++ b/lib/tukey/ptukey.c @@ -59,7 +59,7 @@ * Vol.30, pp.1-15, 1988. */ - + #include @@ -84,13 +84,13 @@ #define ME_PRECISION 8 -static inline double +static inline double pnorm(double x, double mu, double sigma, int lower_tail, int log_p) { assert (lower_tail == 1); assert (log_p == 0); assert (sigma == 1.0); - + return gsl_cdf_gaussian_P (x - mu, sigma); }