2
#define BASE_TYPE double
7
#define _DECLARE_BASE_TYPE(v) double conv_##v
8
#define _CONVERT_BASE_TYPE(v) conv_##v = Double_val(v)
10
#define DECLARE_BASE_TYPE(v) _DECLARE_BASE_TYPE(v); _CONVERT_BASE_TYPE(v)
12
#define FUNCTION(a,b) a ## _ ## b
14
#include "mlgsl_matrix.h"