C++ (Cpp) BLAS_CHER2 Examples

Example #1

File: her2.hpp Project: fluxdark/jflib

 inline void her2( char const uplo, integer_t const n,
         traits::complex_f const alpha, traits::complex_f* x,
         integer_t const incx, traits::complex_f* y, integer_t const incy,
         traits::complex_f* a, integer_t const lda ) {
     BLAS_CHER2( &uplo, &n, traits::complex_ptr(&alpha),
             traits::complex_ptr(x), &incx, traits::complex_ptr(y), &incy,
             traits::complex_ptr(a), &lda );
 }

Example #2

File: her2.hpp Project: CQMP/scripts

inline void her2( const Order order, const UpLo uplo, const fortran_int_t n,
        const std::complex<float> alpha, const std::complex<float>* x,
        const fortran_int_t incx, const std::complex<float>* y,
        const fortran_int_t incy, std::complex<float>* a,
        const fortran_int_t lda ) {
    BOOST_STATIC_ASSERT( (is_same<Order, tag::column_major>::value) );
    BLAS_CHER2( &blas_option< UpLo >::value, &n, &alpha, x, &incx, y, &incy,
            a, &lda );
}