blob: 3772bf13df7e2c98ff8de60e9ed4065cc71048df [file] [log] [blame]
Gael Guennebaudcb71dc42009-01-07 22:20:03 +00001// This file is part of Eigen, a lightweight C++ template library
Benoit Jacob6347b1d2009-05-22 20:25:33 +02002// for linear algebra.
Gael Guennebaudcb71dc42009-01-07 22:20:03 +00003//
4// Copyright (C) 2008 Gael Guennebaud <g.gael@free.fr>
5//
6// Eigen is free software; you can redistribute it and/or
7// modify it under the terms of the GNU Lesser General Public
8// License as published by the Free Software Foundation; either
9// version 3 of the License, or (at your option) any later version.
10//
11// Alternatively, you can redistribute it and/or
12// modify it under the terms of the GNU General Public License as
13// published by the Free Software Foundation; either version 2 of
14// the License, or (at your option) any later version.
15//
16// Eigen is distributed in the hope that it will be useful, but WITHOUT ANY
17// WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
18// FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License or the
19// GNU General Public License for more details.
20//
21// You should have received a copy of the GNU Lesser General Public
22// License and a copy of the GNU General Public License along with
23// Eigen. If not, see <http://www.gnu.org/licenses/>.
24
25#include "main.h"
26#include <typeinfo>
27
28template<typename Dst, typename Src>
Benoit Jacob94c706d2009-11-18 11:57:07 -050029bool test_assign(const Dst&, const Src&, int traversal, int unrolling)
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000030{
Benoit Jacob94c706d2009-11-18 11:57:07 -050031 ei_assign_traits<Dst,Src>::debug();
32 return ei_assign_traits<Dst,Src>::Traversal==traversal
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000033 && ei_assign_traits<Dst,Src>::Unrolling==unrolling;
34}
35
36template<typename Xpr>
Benoit Jacob94c706d2009-11-18 11:57:07 -050037bool test_redux(const Xpr&, int traversal, int unrolling)
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000038{
Gael Guennebaudc5245a32009-02-13 08:45:19 +000039 typedef ei_redux_traits<ei_scalar_sum_op<typename Xpr::Scalar>,Xpr> traits;
Benoit Jacob94c706d2009-11-18 11:57:07 -050040 return traits::Traversal==traversal && traits::Unrolling==unrolling;
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000041}
42
43void test_vectorization_logic()
44{
45
46#ifdef EIGEN_VECTORIZE
47
48 VERIFY(test_assign(Vector4f(),Vector4f(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050049 InnerVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000050 VERIFY(test_assign(Vector4f(),Vector4f()+Vector4f(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050051 InnerVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000052 VERIFY(test_assign(Vector4f(),Vector4f().cwise() * Vector4f(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050053 InnerVectorizedTraversal,CompleteUnrolling));
Benoit Jacob8b1e7c22009-04-29 14:51:19 +000054 VERIFY(test_assign(Vector4f(),Vector4f().cast<float>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050055 InnerVectorizedTraversal,CompleteUnrolling));
Benoit Jacob8b1e7c22009-04-29 14:51:19 +000056
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000057
58 VERIFY(test_assign(Matrix4f(),Matrix4f(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050059 InnerVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000060 VERIFY(test_assign(Matrix4f(),Matrix4f()+Matrix4f(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050061 InnerVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000062 VERIFY(test_assign(Matrix4f(),Matrix4f().cwise() * Matrix4f(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050063 InnerVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000064
65 VERIFY(test_assign(Matrix<float,16,16>(),Matrix<float,16,16>()+Matrix<float,16,16>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050066 InnerVectorizedTraversal,InnerUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000067
68 VERIFY(test_assign(Matrix<float,16,16,DontAlign>(),Matrix<float,16,16>()+Matrix<float,16,16>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050069 LinearTraversal,NoUnrolling));
70
71 VERIFY(test_assign(Matrix<float,2,2,DontAlign>(),Matrix<float,2,2>()+Matrix<float,2,2>(),
72 LinearTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000073
74 VERIFY(test_assign(Matrix<float,6,2>(),Matrix<float,6,2>().cwise() / Matrix<float,6,2>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050075 LinearVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000076
77 VERIFY(test_assign(Matrix<float,17,17>(),Matrix<float,17,17>()+Matrix<float,17,17>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050078 LinearTraversal,NoUnrolling));
79
80 VERIFY(test_assign(Matrix<float,3,3>(),Matrix<float,3,3>()+Matrix<float,3,3>(),
81 LinearTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000082
83 VERIFY(test_assign(Matrix<float,4,4>(),Matrix<float,17,17>().block<4,4>(2,3)+Matrix<float,17,17>().block<4,4>(10,4),
Benoit Jacob94c706d2009-11-18 11:57:07 -050084 DefaultTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000085
86 VERIFY(test_assign(MatrixXf(10,10),MatrixXf(20,20).block(10,10,2,3),
Benoit Jacob94c706d2009-11-18 11:57:07 -050087 SliceVectorizedTraversal,NoUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000088
89
Gael Guennebaudc5245a32009-02-13 08:45:19 +000090 VERIFY(test_redux(VectorXf(10),
Benoit Jacob94c706d2009-11-18 11:57:07 -050091 LinearVectorizedTraversal,NoUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000092
Gael Guennebaudc5245a32009-02-13 08:45:19 +000093 VERIFY(test_redux(Matrix<float,5,2>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050094 DefaultTraversal,CompleteUnrolling));
Gael Guennebaudc5245a32009-02-13 08:45:19 +000095
96 VERIFY(test_redux(Matrix<float,6,2>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050097 LinearVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000098
Gael Guennebaudc5245a32009-02-13 08:45:19 +000099 VERIFY(test_redux(Matrix<float,16,16>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500100 LinearVectorizedTraversal,NoUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000101
Gael Guennebaudc5245a32009-02-13 08:45:19 +0000102 VERIFY(test_redux(Matrix<float,16,16>().block<4,4>(1,2),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500103 DefaultTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000104
Gael Guennebaudc5245a32009-02-13 08:45:19 +0000105 VERIFY(test_redux(Matrix<float,16,16>().block<8,1>(1,2),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500106 LinearVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000107
Gael Guennebaudc5245a32009-02-13 08:45:19 +0000108 VERIFY(test_redux(Matrix<double,7,3>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500109 DefaultTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000110
111#endif // EIGEN_VECTORIZE
112
113}