/** * C++ version of gsl_blas_zcopy(). * @param X A vector * @param Y A vector * @return Error code on failure */ int zcopy( vector_complex const& X, vector_complex& Y ){ return gsl_blas_zcopy( X.get(), Y.get() ); }
static VALUE rb_gsl_blas_zcopy(int argc, VALUE *argv, VALUE obj) { gsl_vector_complex *x = NULL, *y = NULL; get_vector_complex2(argc, argv, obj, &x, &y); return INT2FIX(gsl_blas_zcopy(x, y)); }