Ejemplos de BLAS_ZHERK en C++ (Cpp)

Ejemplo n.º 1

Archivo: herk.hpp Proyecto: fluxdark/jflib

 inline void herk( char const uplo, char const trans, integer_t const n,
         integer_t const k, double const alpha, traits::complex_d* a,
         integer_t const lda, double const beta, traits::complex_d* c,
         integer_t const ldc ) {
     BLAS_ZHERK( &uplo, &trans, &n, &k, &alpha, traits::complex_ptr(a),
             &lda, &beta, traits::complex_ptr(c), &ldc );
 }

Ejemplo n.º 2

Archivo: herk.hpp Proyecto: CQMP/scripts

inline void herk( const Order order, const UpLo uplo, const Trans trans,
        const fortran_int_t n, const fortran_int_t k, const double alpha,
        const std::complex<double>* a, const fortran_int_t lda,
        const double beta, std::complex<double>* c, const fortran_int_t ldc ) {
    BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
    BLAS_ZHERK( &blas_option< UpLo >::value, &blas_option< Trans >::value, &n,
            &k, &alpha, a, &lda, &beta, c, &ldc );
}