double.h 1.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142
  1. /*
  2. * StarPU
  3. * Copyright (C) INRIA 2008-2009 (see AUTHORS file)
  4. *
  5. * This program is free software; you can redistribute it and/or modify
  6. * it under the terms of the GNU Lesser General Public License as published by
  7. * the Free Software Foundation; either version 2.1 of the License, or (at
  8. * your option) any later version.
  9. *
  10. * This program is distributed in the hope that it will be useful, but
  11. * WITHOUT ANY WARRANTY; without even the implied warranty of
  12. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  13. *
  14. * See the GNU Lesser General Public License in COPYING.LGPL for more details.
  15. */
  16. #define TYPE double
  17. #define MPI_TYPE MPI_DOUBLE
  18. #define STARPU_PLU(name) starpu_pdlu_##name
  19. #define CUBLAS_GEMM cublasDgemm
  20. #define CUBLAS_TRSM cublasDtrsm
  21. #define CUBLAS_SCAL cublasDscal
  22. #define CUBLAS_GER cublasDger
  23. #define CUBLAS_SWAP cublasDswap
  24. #define CUBLAS_IAMAX cublasIdamax
  25. #define CPU_GEMM DGEMM
  26. #define CPU_GEMV DGEMV
  27. #define CPU_TRSM DTRSM
  28. #define CPU_SCAL DSCAL
  29. #define CPU_GER DGER
  30. #define CPU_SWAP DSWAP
  31. #define CPU_TRMM DTRMM
  32. #define CPU_AXPY DAXPY
  33. #define CPU_ASUM DASUM
  34. #define CPU_IAMAX IDAMAX
  35. #define PIVOT_THRESHHOLD 10e-10