X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Fhelpers.h;h=c9347da7b73202261c59d1ccf3038599fbaf7e5a;hb=4d2ddbb1b001928a9c7fb6d5d8d1e26c47216c3f;hp=51e1db0329a1bf3d8cd7c83f72e3023aadf5b6a1;hpb=32dc29d70ac55ad3629053097b83c74bb0068fc0;p=pspp

diff --git a/src/language/expressions/helpers.h b/src/language/expressions/helpers.h
index 51e1db0329..c9347da7b7 100644
--- a/src/language/expressions/helpers.h
+++ b/src/language/expressions/helpers.h
@@ -1,3 +1,21 @@
+/*
+PSPP - a program for statistical analysis.
+Copyright (C) 2017 Free Software Foundation, Inc.
+
+This program is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <http://www.gnu.org/licenses/>.
+*/
+
 #ifndef EXPRESSIONS_HELPERS_H
 #define EXPRESSIONS_HELPERS_H
 
@@ -21,17 +39,21 @@
 #include "data/variable.h"
 #include "data/vector.h"
 #include "language/expressions/public.h"
+#include "libpspp/assertion.h"
 #include "libpspp/compiler.h"
 #include "libpspp/i18n.h"
 #include "libpspp/message.h"
 #include "libpspp/misc.h"
 #include "libpspp/str.h"
+#include "math/distributions.h"
 #include "math/moments.h"
 #include "math/random.h"
 
 #include "gettext.h"
 #define _(msgid) gettext (msgid)
 
+struct expr_node;
+
 static inline double check_errno (double x)
 {
   return errno == 0 ? x : SYSMIS;
@@ -51,15 +73,22 @@ extern const struct substring empty_string;
 
 int compare_string_3way (const struct substring *, const struct substring *);
 
-double expr_ymd_to_date (double year, double month, double day);
-double expr_ymd_to_ofs (double year, double month, double day);
-double expr_wkyr_to_date (double wk, double yr);
-double expr_yrday_to_date (double yr, double day);
-double expr_yrmoda (double year, double month, double day);
+double expr_ymd_to_date (int year, int month, int day,
+                         const struct expression *, const struct expr_node *,
+                         int ya, int ma, int da);
+double expr_ymd_to_ofs (int y, int m, int d,
+                        const struct expression *, const struct expr_node *,
+                        int ya, int ma, int da);
 double expr_date_difference (double date1, double date2,
-                             struct substring unit);
+                             struct substring unit, const struct expression *,
+                             const struct expr_node *);
 double expr_date_sum (double date, double quantity, struct substring unit_name,
-                      struct substring method_name);
+                      struct substring method_name,
+                      const struct expression *, const struct expr_node *);
+double expr_date_sum_closest (double date, double quantity,
+                              struct substring unit_name,
+                              const struct expression *,
+                              const struct expr_node *);
 
 struct substring alloc_string (struct expression *, size_t length);
 struct substring copy_string (struct expression *,
@@ -73,20 +102,19 @@ is_valid (double d)
 
 size_t count_valid (double *, size_t);
 
-double idf_beta (double P, double a, double b);
-double ncdf_beta (double x, double a, double b, double lambda);
-double npdf_beta (double x, double a, double b, double lambda);
-
-double cdf_bvnor (double x0, double x1, double r);
-
-double idf_fdist (double P, double a, double b);
-
 double round_nearest (double x, double mult, double fuzzbits);
+double round_zero (double x, double mult, double fuzzbits);
 
 struct substring replace_string (struct expression *,
                                  struct substring haystack,
                                  struct substring needle,
                                  struct substring replacement,
-                                 double n);
+                                 int n);
+
+double median (double *, size_t n);
+
+const struct variable *expr_index_vector (const struct expression *,
+                                          const struct expr_node *,
+                                          const struct vector *, double idx);
 
 #endif /* expressions/helpers.h */