Esempio n. 1
0
CAMLprim value ml_gsl_linalg_LQ_solve_T(value LQ, value TAU, value B, value X)
{
  _DECLARE_MATRIX(LQ);
  _DECLARE_VECTOR3(B,X,TAU);
  _CONVERT_MATRIX(LQ);
  _CONVERT_VECTOR3(B,X,TAU);
  gsl_linalg_LQ_solve_T(&m_LQ, &v_TAU, &v_B, &v_X);
  return Val_unit;
}
Esempio n. 2
0
 /**
  * C++ version of gsl_linalg_LQ_solve_T().
  * @param LQ A matrix
  * @param tau A vector
  * @param b A vector
  * @param x A vector
  * @return Error code on failure
  */
 inline int LQ_solve_T( matrix const& LQ, vector const& tau, vector const& b, vector& x ){
   return gsl_linalg_LQ_solve_T( LQ.get(), tau.get(), b.get(), x.get() ); }