trmv.hpp
Go to the documentation of this file.
1/*!
2 *
3 *
4 * \brief Triangular matrix-vector multiplication kernel
5 *
6 * \author O. Krause
7 * \date 2012
8 *
9 *
10 * \par Copyright 1995-2015 Shark Development Team
11 *
12 * <BR><HR>
13 * This file is part of Shark.
14 * <http://image.diku.dk/shark/>
15 *
16 * Shark is free software: you can redistribute it and/or modify
17 * it under the terms of the GNU Lesser General Public License as published
18 * by the Free Software Foundation, either version 3 of the License, or
19 * (at your option) any later version.
20 *
21 * Shark is distributed in the hope that it will be useful,
22 * but WITHOUT ANY WARRANTY; without even the implied warranty of
23 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
24 * GNU Lesser General Public License for more details.
25 *
26 * You should have received a copy of the GNU Lesser General Public License
27 * along with Shark. If not, see <http://www.gnu.org/licenses/>.
28 *
29 */
30
31#ifndef REMORA_KERNELS_TRMV_HPP
32#define REMORA_KERNELS_TRMV_HPP
33
34#ifdef REMORA_USE_CBLAS
35#include "cblas/trmv.hpp"
36#else
37// if no bindings are included, we have to provide the default has_optimized_gemv
38// otherwise the binding will take care of this
39namespace remora{ namespace bindings{
40template<class M, class V>
41struct has_optimized_trmv
42: public std::false_type{};
43}}
44#endif
45
46#include "default/trmv.hpp"
47
48namespace remora{namespace kernels{
49
50///\brief Implements the TRiangular Solver for Vectors.
51///
52/// It solves Systems of the form Ax = b where A is a square lower or upper triangular matrix.
53/// It can optionally assume that the diagonal is 1 and won't access the diagonal elements.
54template <bool Upper,bool Unit,typename MatA, typename VecB>
55void trmv(
56 matrix_expression<MatA, cpu_tag> const &A,
57 vector_expression<VecB, cpu_tag>& b
58){
59 REMORA_SIZE_CHECK(A().size1() == A().size2());
60 REMORA_SIZE_CHECK(A().size1() == b().size());
61
62 bindings::trmv<Upper,Unit>(A,b,typename bindings::has_optimized_trmv<MatA, VecB>::type());
63}
64
65}}
66
67#ifdef REMORA_USE_CLBLAST
68#include "clBlast/trmv.hpp"
69#elif defined REMORA_USE_GPU
70#include "gpu/trmv.hpp"
71#endif
72
73#endif