Exemplo n.º 1
0
//
// Overloaded function for dispatching to
// * netlib-compatible BLAS backend (the default), and
// * complex<float> value-type.
//
inline void axpy( const fortran_int_t n, const std::complex<float> a,
        const std::complex<float>* x, const fortran_int_t incx,
        std::complex<float>* y, const fortran_int_t incy ) {
    BLAS_CAXPY( &n, &a, x, &incx, y, &incy );
}
Exemplo n.º 2
0
 inline void axpy( integer_t const n, traits::complex_f const a,
         traits::complex_f* x, integer_t const incx, traits::complex_f* y,
         integer_t const incy ) {
     BLAS_CAXPY( &n, traits::complex_ptr(&a), traits::complex_ptr(x),
             &incx, traits::complex_ptr(y), &incy );
 }