Ejemplo n.º 1
0
 /**
  * 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() ); }
Ejemplo n.º 2
0
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));
}