Exemple #1
0
CAMLprim value ml_gsl_linalg_PTLQ_LQsolve_T (value Q, value L, value P, value B, value X)
{
  _DECLARE_MATRIX2(Q,L);
  _DECLARE_VECTOR2(B,X);
  GSL_PERMUT_OF_BIGARRAY(P);
  _CONVERT_MATRIX2(Q,L);
  _CONVERT_VECTOR2(B,X);
  gsl_linalg_PTLQ_LQsolve_T (&m_Q, &m_L, &perm_P, &v_B, &v_X);
  return Val_unit;
}
Exemple #2
0
    /**
     * C++ version of gsl_linalg_PTLQ_LQsolve_T().
     * @param Q A matrix
     * @param L A matrix
     * @param p A permutation
     * @param b A vector
     * @param x A vector
     * @return Error code on failure
     */
    inline int PTLQ_LQsolve_T( matrix const& Q, matrix const& L, permutation const& p,
			       vector const& b, vector& x ){
      return gsl_linalg_PTLQ_LQsolve_T( Q.get(), L.get(), p.get(), b.get(), x.get() ); }