/** * C++ version of gsl_blas_dzasum(). * @param X A vector * @return The absolute sum of the elements */ double dzasum( vector_complex const& X ){ return gsl_blas_dzasum( X.get() ); }
static VALUE rb_gsl_blas_dzasum(int argc, VALUE *argv, VALUE obj) { gsl_vector_complex *x = NULL; get_vector_complex1(argc, argv, obj, &x); return rb_float_new(gsl_blas_dzasum(x)); }