1 /* This file is a collection of wrappers around the 2 * Amos Fortran library of functions that take complex 3 * variables (see www.netlib.org) so that they can be called from 4 * the cephes library of corresponding name but work with complex 5 * arguments. 6 */ 7 8 #ifndef _CDF_WRAPPERS_H 9 #define _CDF_WRAPPERS_H 10 #ifndef _AMOS_WRAPPERS_H 11 #include "Python.h" 12 #endif 13 14 #include "sf_error.h" 15 16 #include <numpy/npy_math.h> 17 18 extern double cdfbet3_wrap(double p, double x, double b); 19 extern double cdfbet4_wrap(double p, double x, double a); 20 21 extern double cdfbin2_wrap(double p, double xn, double pr); 22 extern double cdfbin3_wrap(double p, double s, double pr); 23 24 extern double cdfchi3_wrap(double p, double x); 25 26 extern double cdfchn1_wrap(double x, double df, double nc); 27 extern double cdfchn2_wrap(double p, double df, double nc); 28 extern double cdfchn3_wrap(double p, double x, double nc); 29 extern double cdfchn4_wrap(double p, double x, double df); 30 31 extern double cdff3_wrap(double p, double f, double dfd); 32 extern double cdff4_wrap(double p, double f, double dfn); 33 34 extern double cdffnc1_wrap(double f, double dfn, double dfd, double nc); 35 extern double cdffnc2_wrap(double p, double dfn, double dfd, double nc); 36 extern double cdffnc3_wrap(double p, double f, double dfd, double nc); 37 extern double cdffnc4_wrap(double p, double f, double dfn, double nc); 38 extern double cdffnc5_wrap(double p, double f, double dfn, double dfd); 39 40 extern double cdfgam1_wrap(double p, double x, double scl); 41 extern double cdfgam2_wrap(double p, double x, double shp); 42 extern double cdfgam3_wrap(double p, double x, double scl); 43 extern double cdfgam4_wrap(double p, double x, double shp); 44 45 extern double cdfnbn2_wrap(double p, double xn, double pr); 46 extern double cdfnbn3_wrap(double p, double s, double pr); 47 48 extern double cdfnor3_wrap(double p, double x, double std); 49 extern double cdfnor4_wrap(double p, double x, double mn); 50 51 extern double cdfpoi2_wrap(double p, double xlam); 52 53 extern double cdft1_wrap(double p, double t); 54 extern double cdft2_wrap(double p, double t); 55 extern double cdft3_wrap(double p, double t); 56 57 extern double cdftnc1_wrap(double df, double nc, double t); 58 extern double cdftnc2_wrap(double df, double nc, double p); 59 extern double cdftnc3_wrap(double p, double nc, double t); 60 extern double cdftnc4_wrap(double df, double p, double t); 61 62 extern double tukeylambdacdf(double x, double lambda); 63 #endif 64