コード例 #1
0
ファイル: blas.hpp プロジェクト: fujiisoup/MyLibrary
 /**
  * C++ version of gsl_blas_zswap().
  * @param X A vector
  * @param Y A vector
  * @return Error code on failure
  */
 int zswap( vector_complex& X, vector_complex& Y ){
   return gsl_blas_zswap( X.get(), Y.get() ); }
コード例 #2
0
static VALUE rb_gsl_blas_zswap(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_zswap(x, y));
}