コード例 #1
0
ファイル: mlgsl_linalg.c プロジェクト: Chris00/gsl-ocaml
CAMLprim value ml_gsl_linalg_bidiag_unpack_B(value A, value DIAG, value SUPERDIAG)
{
  _DECLARE_MATRIX(A);
  _DECLARE_VECTOR2(DIAG, SUPERDIAG);
  _CONVERT_MATRIX(A);
  _CONVERT_VECTOR2(DIAG, SUPERDIAG);
  gsl_linalg_bidiag_unpack_B(&m_A, &v_DIAG, &v_SUPERDIAG);
  return Val_unit;
}
コード例 #2
0
ファイル: linalg.hpp プロジェクト: fujiisoup/MyLibrary
 /**
  * C++ version of gsl_linalg_bidiag_unpack_B().
  * @param A A matrix
  * @param diag A vector of diagonal elements
  * @param superdiag Off-diagonal vector (one element shorte than @c diag)
  * @return Error code on failure
  */
 inline int bidiag_unpack_B( matrix const& A, vector& diag, vector& superdiag ){
   return gsl_linalg_bidiag_unpack_B( A.get(), diag.get(), superdiag.get() ); }