Ejemplos de LAPACK_CHPTRS en C++ (Cpp)

Ejemplo n.º 1

Archivo: hptrs.hpp Proyecto: CQMP/scripts

inline std::ptrdiff_t hptrs( const UpLo, const fortran_int_t n,
        const fortran_int_t nrhs, const std::complex<float>* ap,
        const fortran_int_t* ipiv, std::complex<float>* b,
        const fortran_int_t ldb ) {
    fortran_int_t info(0);
    LAPACK_CHPTRS( &lapack_option< UpLo >::value, &n, &nrhs, ap, ipiv, b,
            &ldb, &info );
    return info;
}

Ejemplo n.º 2

Archivo: hpsv.hpp Proyecto: cephdon/OMCompiler

 inline
 void hptrs (char const uplo, int const n, int const nrhs,
             traits::complex_f const* ap, int const* ipiv,
             traits::complex_f* b, int const ldb, int* info)
 {
   LAPACK_CHPTRS (&uplo, &n, &nrhs,
                  traits::complex_ptr (ap), ipiv,
                  traits::complex_ptr (b), &ldb, info);
 }