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);
82 #endif // DEAL_II_LAPACK_WITH_MKL
98 #ifdef DEAL_II_LAPACK_WITH_MKL
99 mkl_domatcopy(ordering, trans, rows, cols, alpha,
A, lda, B, ldb);
111 #endif // DEAL_II_LAPACK_WITH_MKL
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);
140 #endif // DEAL_II_LAPACK_WITH_MKL
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);
169 #endif // DEAL_II_LAPACK_WITH_MKL