/* StarPU --- Runtime system for heterogeneous multicore architectures. * * Copyright (C) 2009, 2010 Université de Bordeaux 1 * Copyright (C) 2010 Centre National de la Recherche Scientifique * * StarPU is free software; you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation; either version 2.1 of the License, or (at * your option) any later version. * * StarPU is distributed in the hope that it will be useful, but * WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. * * See the GNU Lesser General Public License in COPYING.LGPL for more details. */ #define TYPE float #define CUBLAS_TYPE TYPE #define STARPU_LU(name) starpu_slu_##name #ifdef STARPU_HAVE_MAGMA #include #define CUBLAS_GEMM magmablas_sgemm #define CUBLAS_TRSM magmablas_strsm #else #define CUBLAS_GEMM cublasSgemm #define CUBLAS_TRSM cublasStrsm #endif #define CUBLAS_SCAL cublasSscal #define CUBLAS_GER cublasSger #define CUBLAS_SWAP cublasSswap #define CUBLAS_IAMAX cublasIsamax #define CPU_GEMM SGEMM #define CPU_TRSM STRSM #define CPU_SCAL SSCAL #define CPU_GER SGER #define CPU_SWAP SSWAP #define CPU_TRMM STRMM #define CPU_AXPY SAXPY #define CPU_ASUM SASUM #define CPU_IAMAX ISAMAX #define PIVOT_THRESHHOLD 10e-5 #define CAN_EXECUTE