C++ (Cpp) LAPACK_DGETRFの例

コード例 #1

ファイル: getrf.hpp プロジェクト: CQMP/scripts

inline std::ptrdiff_t getrf( Order, const fortran_int_t m,
        const fortran_int_t n, double* a, const fortran_int_t lda,
        fortran_int_t* ipiv ) {
    BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
    fortran_int_t info(0);
    LAPACK_DGETRF( &m, &n, a, &lda, ipiv, &info );
    return info;
}

コード例 #2

ファイル: gesv.hpp プロジェクト: Killerregenwurm/utcore

 inline 
 void getrf (int const n, int const m,
             double* a, int const lda, int* ipiv, int* info) 
 {
   LAPACK_DGETRF (&n, &m, a, &lda, ipiv, info);
 }