Ejemplo n.º 1
0
 /**
  * C++ version of gsl_blas_snrm2().
  * @param X A vector
  * @return The Euclidean norm
  */
 float snrm2( vector_float const& X ){ return gsl_blas_snrm2( X.get() ); }
Ejemplo n.º 2
0
CAMLprim value ml_gsl_blas_snrm2(value X)
{
    _DECLARE_VECTOR(X);
    _CONVERT_VECTOR(X);
    return copy_double(gsl_blas_snrm2(&v_X));
}