blob: ae9911831b496b822e41c04fbf79f1f8c351555c [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
Benoit Jacobb1f666d2010-02-26 20:12:51 -050036template<typename Dst, typename Src>
37bool test_assign(int traversal, int unrolling)
38{
39 ei_assign_traits<Dst,Src>::debug();
40 return ei_assign_traits<Dst,Src>::Traversal==traversal
41 && ei_assign_traits<Dst,Src>::Unrolling==unrolling;
42}
43
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000044template<typename Xpr>
Benoit Jacob94c706d2009-11-18 11:57:07 -050045bool test_redux(const Xpr&, int traversal, int unrolling)
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000046{
Gael Guennebaudc5245a32009-02-13 08:45:19 +000047 typedef ei_redux_traits<ei_scalar_sum_op<typename Xpr::Scalar>,Xpr> traits;
Benoit Jacob94c706d2009-11-18 11:57:07 -050048 return traits::Traversal==traversal && traits::Unrolling==unrolling;
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000049}
50
51void test_vectorization_logic()
52{
53
54#ifdef EIGEN_VECTORIZE
55
56 VERIFY(test_assign(Vector4f(),Vector4f(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050057 InnerVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000058 VERIFY(test_assign(Vector4f(),Vector4f()+Vector4f(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050059 InnerVectorizedTraversal,CompleteUnrolling));
Gael Guennebaud30d47862009-12-17 10:43:46 +010060 VERIFY(test_assign(Vector4f(),Vector4f().cwiseProduct(Vector4f()),
Benoit Jacob94c706d2009-11-18 11:57:07 -050061 InnerVectorizedTraversal,CompleteUnrolling));
Benoit Jacob8b1e7c22009-04-29 14:51:19 +000062 VERIFY(test_assign(Vector4f(),Vector4f().cast<float>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050063 InnerVectorizedTraversal,CompleteUnrolling));
Benoit Jacob8b1e7c22009-04-29 14:51:19 +000064
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000065
66 VERIFY(test_assign(Matrix4f(),Matrix4f(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050067 InnerVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000068 VERIFY(test_assign(Matrix4f(),Matrix4f()+Matrix4f(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050069 InnerVectorizedTraversal,CompleteUnrolling));
Gael Guennebaud30d47862009-12-17 10:43:46 +010070 VERIFY(test_assign(Matrix4f(),Matrix4f().cwiseProduct(Matrix4f()),
Benoit Jacob94c706d2009-11-18 11:57:07 -050071 InnerVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000072
73 VERIFY(test_assign(Matrix<float,16,16>(),Matrix<float,16,16>()+Matrix<float,16,16>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050074 InnerVectorizedTraversal,InnerUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000075
76 VERIFY(test_assign(Matrix<float,16,16,DontAlign>(),Matrix<float,16,16>()+Matrix<float,16,16>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050077 LinearTraversal,NoUnrolling));
78
79 VERIFY(test_assign(Matrix<float,2,2,DontAlign>(),Matrix<float,2,2>()+Matrix<float,2,2>(),
80 LinearTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000081
Gael Guennebaud30d47862009-12-17 10:43:46 +010082 VERIFY(test_assign(Matrix<float,6,2>(),Matrix<float,6,2>().cwiseQuotient(Matrix<float,6,2>()),
Benoit Jacob94c706d2009-11-18 11:57:07 -050083 LinearVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000084
85 VERIFY(test_assign(Matrix<float,17,17>(),Matrix<float,17,17>()+Matrix<float,17,17>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -050086 LinearTraversal,NoUnrolling));
87
88 VERIFY(test_assign(Matrix<float,3,3>(),Matrix<float,3,3>()+Matrix<float,3,3>(),
89 LinearTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000090
91 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 -050092 DefaultTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000093
94 VERIFY(test_assign(MatrixXf(10,10),MatrixXf(20,20).block(10,10,2,3),
Benoit Jacob94c706d2009-11-18 11:57:07 -050095 SliceVectorizedTraversal,NoUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +000096
Benoit Jacobb1f666d2010-02-26 20:12:51 -050097 VERIFY((test_assign<
98 Map<Matrix<float,4,8>, Aligned, OuterStride<12> >,
99 Matrix<float,4,8>
100 >(InnerVectorizedTraversal,CompleteUnrolling)));
101
102 VERIFY((test_assign<
103 Map<Matrix<float,4,8>, Aligned, InnerStride<12> >,
104 Matrix<float,4,8>
105 >(DefaultTraversal,CompleteUnrolling)));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000106
Gael Guennebaudc5245a32009-02-13 08:45:19 +0000107 VERIFY(test_redux(VectorXf(10),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500108 LinearVectorizedTraversal,NoUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000109
Gael Guennebaudc5245a32009-02-13 08:45:19 +0000110 VERIFY(test_redux(Matrix<float,5,2>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500111 DefaultTraversal,CompleteUnrolling));
Gael Guennebaudc5245a32009-02-13 08:45:19 +0000112
113 VERIFY(test_redux(Matrix<float,6,2>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500114 LinearVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000115
Gael Guennebaudc5245a32009-02-13 08:45:19 +0000116 VERIFY(test_redux(Matrix<float,16,16>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500117 LinearVectorizedTraversal,NoUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000118
Gael Guennebaudc5245a32009-02-13 08:45:19 +0000119 VERIFY(test_redux(Matrix<float,16,16>().block<4,4>(1,2),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500120 DefaultTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000121
Gael Guennebaudc5245a32009-02-13 08:45:19 +0000122 VERIFY(test_redux(Matrix<float,16,16>().block<8,1>(1,2),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500123 LinearVectorizedTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000124
Gael Guennebaudc5245a32009-02-13 08:45:19 +0000125 VERIFY(test_redux(Matrix<double,7,3>(),
Benoit Jacob94c706d2009-11-18 11:57:07 -0500126 DefaultTraversal,CompleteUnrolling));
Gael Guennebaudcb71dc42009-01-07 22:20:03 +0000127
128#endif // EIGEN_VECTORIZE
129
130}