/** * C++ version of gsl_blas_izamax(). * @param X A vector * @return Index of largest-magnitude element */ CBLAS_INDEX_t izamax( vector_complex const& X ){ return gsl_blas_izamax( X.get() ); }
static VALUE rb_gsl_blas_izamax(int argc, VALUE *argv, VALUE obj) { gsl_vector_complex *x = NULL; get_vector_complex1(argc, argv, obj, &x); return INT2FIX(gsl_blas_izamax(x)); }