17 #ifndef dealii_blas_extension_templates_h
18 #define dealii_blas_extension_templates_h
24 #ifdef DEAL_II_HAVE_FP_EXCEPTIONS
29 #ifdef DEAL_II_LAPACK_WITH_MKL
32 # define MKL_Complex8 std::complex<float>
33 # define MKL_Complex16 std::complex<double>
34 # include <mkl_trans.h>
41 template <
typename number1,
typename number2,
typename number3>
69 #ifdef DEAL_II_LAPACK_WITH_MKL
70 mkl_somatcopy(ordering, trans, rows, cols, alpha,
A, lda, B, ldb);
98 #ifdef DEAL_II_LAPACK_WITH_MKL
99 mkl_domatcopy(ordering, trans, rows, cols, alpha,
A, lda, B, ldb);
121 const std::complex<float> alpha,
122 const std::complex<float> *
A,
124 std::complex<float> * B,
127 #ifdef DEAL_II_LAPACK_WITH_MKL
128 mkl_comatcopy(ordering, trans, rows, cols, alpha,
A, lda, B, ldb);
150 const std::complex<double> alpha,
151 const std::complex<double> *
A,
153 std::complex<double> * B,
156 #ifdef DEAL_II_LAPACK_WITH_MKL
157 mkl_zomatcopy(ordering, trans, rows, cols, alpha,
A, lda, B, ldb);
void omatcopy(char, char, ::types::blas_int, ::types::blas_int, const number1, const number2 *, ::types::blas_int, number3 *, ::types::blas_int)
#define DEAL_II_NAMESPACE_OPEN
#define DEAL_II_NAMESPACE_CLOSE
#define Assert(cond, exc)
static ::ExceptionBase & ExcNotImplemented()
static ::ExceptionBase & ExcMissing(std::string arg1)