1 %module
"Math::GSL::Monte"
3 %include
"gsl_typemaps.i"
4 %include
"gsl/gsl_monte.h"
5 %include
"gsl/gsl_monte_miser.h"
6 %include
"gsl/gsl_monte_plain.h"
7 %include
"gsl/gsl_monte_vegas.h"
8 %include
"gsl/gsl_types.h"
9 %include
"gsl/gsl_errno.h"
11 %typemap
(argout
) ( gsl_monte_function
* f
, double xl
[], double xu
[],
12 size_t dim
, size_t calls
, gsl_rng
* r
,
13 gsl_monte_vegas_state
*state
,
14 double
*result
, double
*abserr
) {
15 // This is not being triggered
16 fprintf
(stderr
, "argout of monte_vegas_int!");
21 $
1 = (double
*) $input
;
26 #include
"gsl/gsl_monte.h"
27 #include
"gsl/gsl_monte_miser.h"
28 #include
"gsl/gsl_monte_plain.h"
29 #include
"gsl/gsl_monte_vegas.h"
30 #include
"gsl/gsl_types.h"
31 #include
"gsl/gsl_errno.h"
33 %include
"../pod/Monte.pod"