#include #include #include #if BLA_SIZEOF_INTEGER == 4 typedef int32_t blas_int; #elif BLA_SIZEOF_INTEGER == 8 typedef int64_t blas_int; #else # error BLA_SIZEOF_INTEGER is not declared! #endif // declare what parts of the blas C-API we need void dswap_(blas_int* N, double* X, blas_int* incX, double* Y, blas_int* incY); int main() { double x[4] = { 1, 2, 3, 4 }; double y[4] = { 8, 7, 7, 6 }; blas_int N = 4; blas_int incX = 1; blas_int incY = 1; dswap_(&N, x, &incX, y, &incY); return 0; }