X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Fhelpers.h;h=c9347da7b73202261c59d1ccf3038599fbaf7e5a;hb=80938eea690eaded701078c65f1fdae956c76233;hp=cb59c206a7599334246402cc26265854562d8483;hpb=a258e53c63a08b0ec48aea8f03808eb651729424;p=pspp diff --git a/src/language/expressions/helpers.h b/src/language/expressions/helpers.h index cb59c206a7..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 . +*/ + #ifndef EXPRESSIONS_HELPERS_H #define EXPRESSIONS_HELPERS_H @@ -10,27 +28,32 @@ #include #include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include +#include "data/calendar.h" +#include "data/case.h" +#include "data/data-in.h" +#include "data/data-out.h" +#include "data/dataset.h" +#include "data/dictionary.h" +#include "data/settings.h" +#include "data/value.h" +#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; @@ -50,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 *, @@ -72,12 +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 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, + int n); -double cdf_bvnor (double x0, double x1, double r); +double median (double *, size_t n); -double idf_fdist (double P, double a, double b); +const struct variable *expr_index_vector (const struct expression *, + const struct expr_node *, + const struct vector *, double idx); #endif /* expressions/helpers.h */