コード例 #1
0
ファイル: mlgsl_blas_float.c プロジェクト: ptrf/LCDE
CAMLprim value ml_gsl_blas_dsdot(value X, value Y)
{
    double r;
    _DECLARE_VECTOR2(X, Y);
    _CONVERT_VECTOR2(X, Y);
    gsl_blas_dsdot(&v_X, &v_Y, &r);
    return copy_double(r);
}
コード例 #2
0
ファイル: blas.hpp プロジェクト: fujiisoup/MyLibrary
 /**
  * C++ version of gsl_blas_dsdot().
  * @param X First vector
  * @param Y Second vector
  * @param result Vector product
  * @return Error code on failure
  */
 int dsdot( vector_float const& X, vector_float const& Y, double* result ){
   return gsl_blas_dsdot( X.get(), Y.get(), result ); }