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