Esempi in C++ (Cpp) per LAPACK_ZHPTRF

Esempio n. 1

File: hptrf.hpp Progetto: AntonDV235/OMCompiler

inline std::ptrdiff_t hptrf( const UpLo, const fortran_int_t n,
        std::complex<double>* ap, fortran_int_t* ipiv ) {
    fortran_int_t info(0);
    LAPACK_ZHPTRF( &lapack_option< UpLo >::value, &n, ap, ipiv, &info );
    return info;
}

Esempio n. 2

File: hpsv.hpp Progetto: cephdon/OMCompiler

 inline
 void hptrf (char const uplo, int const n,
             traits::complex_d* ap, int* ipiv, int* info)
 {
   LAPACK_ZHPTRF (&uplo, &n, traits::complex_ptr (ap), ipiv, info);
 }