Why does git only commit some of the changes if you don't pass the -a flag?
authorJohn Darrington <john@cyane.csse.uwa.edu.au>
Sun, 20 Jul 2008 12:25:15 +0000 (20:25 +0800)
committerJohn Darrington <john@cyane.csse.uwa.edu.au>
Sun, 20 Jul 2008 12:25:15 +0000 (20:25 +0800)
configure.ac
lib/ChangeLog
lib/automake.mk
src/language/expressions/helpers.c
src/language/expressions/helpers.h
src/language/expressions/operations.def
src/language/stats/binomial.c
src/ui/gui/automake.mk
src/ui/terminal/automake.mk

index f38aafbce2a2f0e0bf186dd163af804816fd1e1b..f36dcac2d2bd46f234ca0760b8dbdc29f5574755 100644 (file)
@@ -128,7 +128,7 @@ fi
 AM_CONDITIONAL(WITH_GUI_TOOLS, test x"$with_gui_tools" = x"yes")
 
 AC_SEARCH_LIBS([cblas_dsdot], [gslcblas],,[PSPP_REQUIRED_PREREQ([libgslcblas])])
-AC_SEARCH_LIBS([gsl_cdf_chisq_Q], [gsl],,[PSPP_REQUIRED_PREREQ([libgsl (version 1.4 or later)])])
+AC_SEARCH_LIBS([gsl_cdf_binomial_P], [gsl],,[PSPP_REQUIRED_PREREQ([libgsl (version 1.8 or later)])])
 PSPP_GSL_NEEDS_FGNU89_INLINE
 
 dnl Recent versions of GNU ncurses install the curses header files into
index 44bff7c1f4a0d7a38e6257668cd9f33dc073b8e7..28c767bd5043b526565747723fd1b3a70146aebe 100644 (file)
@@ -1,3 +1,8 @@
+2008/07/20 John Darrington <john@darrington.wattle.id.au>
+
+       * Removed gsl-extras.  Functionality now
+       available in gsl.
+
 Sun Jul 31 11:29:04 2005  Ben Pfaff  <blp@gnu.org>
 
        * misc/: Removed in favor of gnulib.
index 3afc9e1ade16d512179cdb68100c04a7ccb02fe6..440a8595a03d2dc52c58bf56ce65950375bf85bf 100644 (file)
@@ -1,7 +1,6 @@
 ## Process this file with automake to produce Makefile.in  -*- makefile -*-
 
 include $(top_srcdir)/lib/linreg/automake.mk
-include $(top_srcdir)/lib/gsl-extras/automake.mk
 
 if WITHGUI
 include $(top_srcdir)/lib/gtksheet/automake.mk
index 59b88fc8c7a951f5b6815c157c20b7551ed486ae..695c2335370cb19a46043f5e7d272ea04b21998d 100644 (file)
@@ -596,7 +596,7 @@ cdf_bvnor (double x0, double x1, double r)
 double
 idf_fdist (double P, double df1, double df2)
 {
-  double temp = gslextras_cdf_beta_Pinv (P, df1 / 2, df2 / 2);
+  double temp = gsl_cdf_beta_Pinv (P, df1 / 2, df2 / 2);
   return temp * df2 / ((1. - temp) * df1);
 }
 
index 23ca315a576667eb142b034f5d0589bdbf7a29db..447a6b8229aad02cff925ebebc8568892ea707f5 100644 (file)
@@ -21,7 +21,6 @@
 #include <data/value.h>
 #include <data/variable.h>
 #include <data/vector.h>
-#include <gsl-extras/gsl-extras.h>
 #include <language/expressions/public.h>
 #include <libpspp/compiler.h>
 #include <libpspp/message.h>
index 2ec03c34e88c06ad09d4c2ef5201a21fada479ea..ea640e18e194a27aa1d99cd6676eb495417186e7 100644 (file)
@@ -647,7 +647,7 @@ function PDF.BETA (x >= 0 && x <= 1, a > 0, b > 0)
      = gsl_ran_beta_pdf (x, a, b);
 function CDF.BETA (x >= 0 && x <= 1, a > 0, b > 0) = gsl_cdf_beta_P (x, a, b);
 function IDF.BETA (P >= 0 && P <= 1, a > 0, b > 0)
-     = gslextras_cdf_beta_Pinv (P, a, b);
+     = gsl_cdf_beta_Pinv (P, a, b);
 no_opt function RV.BETA (a > 0, b > 0) = gsl_ran_beta (get_rng (), a, b);
 function NCDF.BETA (x >= 0, a > 0, b > 0, lambda > 0)
      = ncdf_beta (x, a, b, lambda);
@@ -850,7 +850,7 @@ no_opt function RV.BERNOULLI (p >= 0 && p <= 1)
 
 // Binomial distribution.
 function CDF.BINOM (k, n > 0 && n == floor (n), p >= 0 && p <= 1)
-     = gslextras_cdf_binomial_P (k, p, n);
+     = gsl_cdf_binomial_P (k, p, n);
 function PDF.BINOM (k >= 0 && k == floor (k) && k <= n,
                     n > 0 && n == floor (n),
                     p >= 0 && p <= 1)
@@ -860,7 +860,7 @@ no_opt function RV.BINOM (p > 0 && p == floor (p), n >= 0 && n <= 1)
 
 // Geometric distribution.
 function CDF.GEOM (k >= 1 && k == floor (k), p >= 0 && p <= 1)
-     = gslextras_cdf_geometric_P (k, p);
+     = gsl_cdf_geometric_P (k, p);
 function PDF.GEOM (k >= 1 && k == floor (k),
                    p >= 0 && p <= 1)
      = gsl_ran_geometric_pdf (k, p);
@@ -871,7 +871,7 @@ function CDF.HYPER (k >= 0 && k == floor (k) && k <= c,
                     a > 0 && a == floor (a),
                     b > 0 && b == floor (b) && b <= a,
                     c > 0 && c == floor (c) && c <= a)
-     = gslextras_cdf_hypergeometric_P (k, c, a - c, b);
+     = gsl_cdf_hypergeometric_P (k, c, a - c, b);
 function PDF.HYPER (k >= 0 && k == floor (k) && k <= c,
                     a > 0 && a == floor (a),
                     b > 0 && b == floor (b) && b <= a,
@@ -890,7 +890,7 @@ no_opt extension function RV.LOG (p > 0 && p <= 1)
 
 // Negative binomial distribution.
 function CDF.NEGBIN (k >= 1, n == floor (n), p > 0 && p <= 1)
-     = gslextras_cdf_negative_binomial_P (k, p, n);
+     = gsl_cdf_negative_binomial_P (k, p, n);
 function PDF.NEGBIN (k >= 1, n == floor (n), p > 0 && p <= 1)
      = gsl_ran_negative_binomial_pdf (k, p, n);
 no_opt function RV.NEGBIN (n == floor (n), p > 0 && p <= 1) 
@@ -898,7 +898,7 @@ no_opt function RV.NEGBIN (n == floor (n), p > 0 && p <= 1)
 
 // Poisson distribution.
 function CDF.POISSON (k >= 0 && k == floor (k), mu > 0)
-     = gslextras_cdf_poisson_P (k, mu);
+     = gsl_cdf_poisson_P (k, mu);
 function PDF.POISSON (k >= 0 && k == floor (k), mu > 0)
      = gsl_ran_poisson_pdf (k, mu);
 no_opt function RV.POISSON (mu > 0) = gsl_ran_poisson (get_rng (), mu);
index 39b8506d53edb7f184df01831522e0da7511217e..d9209f1bf0499dbcf8e78f8bb9ba1b6e27861683 100644 (file)
@@ -41,7 +41,6 @@
 
 #include <gsl/gsl_cdf.h>
 #include <gsl/gsl_randist.h>
-#include <gsl-extras/gsl-extras.h>
 
 #include <minmax.h>
 
@@ -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;
index 8130f5cf42087876484d05662fb19c8ed38b4f42..2d149fce4ac3539b1924b598920b1425ddf1ac8b 100644 (file)
@@ -59,7 +59,6 @@ src_ui_gui_psppire_LDADD = \
        src/output/liboutput.a \
        src/math/libpspp_math.a  \
        lib/linreg/liblinreg.a  \
-       lib/gsl-extras/libgsl-extras.a  \
        src/data/libdata.a \
        src/libpspp/libpspp.a \
        $(GTK_LIBS) \
index ae6d3a5e2d72af46d7d30dae304987708f71106a..34bed5ae366b886a84789dc8b7e6505bc8e0654f 100644 (file)
@@ -28,7 +28,6 @@ src_ui_terminal_pspp_LDADD = \
        src/math/libpspp_math.a  \
        src/ui/libuicommon.a \
        lib/linreg/liblinreg.a  \
-       lib/gsl-extras/libgsl-extras.a  \
        src/data/libdata.a \
        src/libpspp/libpspp.a \
        $(LIBXML2_LIBS) \