Question

我试图在eclipse中执行此代码，但我不知道如何使用dgemm。我知道它是BLAS的一部分，但我不明白如何在Windows中使用它。如果是任何其他库，可以用于高性能计算的算法，你可以向我建议吗？非常感谢您提前

#include <stdio.h>
#include <stdlib.h>
#include <time.h>

#define DIM1 2000
#define DIM2 2000
#define DIM3 2000

#define DGEMM dgemm_

int main()
{
  int i, j, k;

  double *A;
  double *B;
  double *C;

  long dim1 = DIM1;
  long dim2 = DIM2;
  long dim3 = DIM3;

  char transa = 'N';
  char transb = 'N';

  double alpha = 1.0;
  double beta  = 0.0;

  clock_t tic, toc;
  double maxr;

  A = (double*)malloc(sizeof(double)*(dim1*dim2));
  B = (double*)malloc(sizeof(double)*(dim2*dim3));
  C = (double*)malloc(sizeof(double)*(dim1*dim3));

  srand(86456);
  maxr = (double)RAND_MAX;

  for (i = 0; i < dim1; i++)
    for (j = 0; j < dim2; j++)
      A[i + j*dim1] = rand()/maxr;

  for (i = 0; i < dim2; i++)
    for (j = 0; j < dim3; j++)
      B[i + j*dim2] = rand()/maxr;

  tic = clock();

  DGEMM(&transa,&transb,&dim1,&dim3,&dim2,&alpha,A,&dim1,B,&dim2,&beta,C,&dim1);

  toc = clock();

  printf("time for C(%d,%d) = A(%d,%d) B(%d,%d) is %fs\n",
     dim1, dim3, dim1, dim2, dim2, dim3,((float)toc -(float)tic)/(float)CLOCKS_PER_SEC);

  free(A);
  free(B);
  free(C);

  return EXIT_SUCCESS;
}

Answer 1

要使用BLAS例程，您需要在代码中包含BLAS库。 Windows中支持其中两个库，OpenBLAS和英特尔MKL，性能非常好。

http://www.openblas.net/

http://software.intel.com/en-us/intel-mkl

您可以阅读他们的文档，了解有关如何安装和使用的更多信息。

在windows eclipse中使用DGEMM BLAS

1 个答案: