コード例 #1
0
ファイル: mlgsl_linalg.c プロジェクト: Chris00/gsl-ocaml
/* LQ decomposition */
CAMLprim value ml_gsl_linalg_LQ_decomp(value A, value TAU)
{
  _DECLARE_MATRIX(A);
  _DECLARE_VECTOR(TAU);
  _CONVERT_MATRIX(A);
  _CONVERT_VECTOR(TAU);
  gsl_linalg_LQ_decomp(&m_A, &v_TAU);
  return Val_unit;
}
コード例 #2
0
ファイル: linalg.hpp プロジェクト: fujiisoup/MyLibrary
 /**
  * C++ version of gsl_linalg_LQ_decomp().
  * @param A A matrix
  * @param tau A vector
  * @return Error code on failure
  */
 inline int LQ_decomp( matrix& A, vector& tau ){
   return gsl_linalg_LQ_decomp( A.get(), tau.get() ); }