X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fruns.c;h=d8f8279e0e339c578081f3be4f4030b132533e23;hb=30cea3a93e0c674cfd581b9ae9e4f3cb5847e639;hp=f5eec1e89ef327675d34ddacdb6513ca76815058;hpb=1e0e76eaeb51ef0c15fdcfc4bd12d9310c16a88b;p=pspp

diff --git a/src/language/stats/runs.c b/src/language/stats/runs.c
index f5eec1e89e..d8f8279e0e 100644
--- a/src/language/stats/runs.c
+++ b/src/language/stats/runs.c
@@ -360,7 +360,7 @@ show_runs_result (const struct runs_test *rt, const struct run_state *rs, const
 		  z, NULL, RC_OTHER);
 
       tab_double (table, row_headers +i, 7, 0,
-		  2.0 * gsl_cdf_ugaussian_P (z), NULL, RC_PVALUE);
+		  2.0 * (1.0 - gsl_cdf_ugaussian_P (z)), NULL, RC_PVALUE);
     }
 
   switch  ( rt->cp_mode)