Ejemplo n.º 1
0
//
// Overloaded function for dispatching to
// * netlib-compatible BLAS backend (the default), and
// * float value-type.
//
inline void axpy( const fortran_int_t n, const float a, const float* x,
        const fortran_int_t incx, float* y, const fortran_int_t incy ) {
    BLAS_SAXPY( &n, &a, x, &incx, y, &incy );
}
Ejemplo n.º 2
0
 inline void axpy( integer_t const n, float const a, float* x,
         integer_t const incx, float* y, integer_t const incy ) {
     BLAS_SAXPY( &n, &a, x, &incx, y, &incy );
 }