summaryrefslogtreecommitdiffstats
path: root/src/boost/libs/qvm/test/del_col_test.cpp
blob: 09ffccbf744a1909a459224e97a2ed80071cab17 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
//Copyright (c) 2008-2016 Emil Dotchevski and Reverge Studios, Inc.

//Distributed under the Boost Software License, Version 1.0. (See accompanying
//file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)

#include <boost/qvm/map_mat_mat.hpp>
#include <boost/qvm/mat_operations.hpp>
#include <boost/qvm/mat_traits_array.hpp>
#include <boost/qvm/mat.hpp>
#include "test_qvm.hpp"
#include "test_qvm_matrix.hpp"
#include "gold.hpp"

namespace
    {
    template <int Rows,int Cols,int Col>
    void
    test()
        {
        using namespace boost::qvm;
        test_qvm::matrix<M1,Rows,Cols> x(42,1);
        float r1[Rows][Cols-1];
        for( int i=0; i!=Rows; ++i )
            for( int j=0; j!=Cols-1; ++j )
                r1[i][j]=x.a[i][j+(j>=Col)];
        float r2[Rows][Cols-1];
        assign(r2,del_col<Col>(x));
        BOOST_QVM_TEST_EQ(r1,r2);
        del_col<Col>(x) *= 2;
        for( int i=0; i!=Rows; ++i )
            for( int j=0; j!=Cols-1; ++j )
                r1[i][j]=x.a[i][j+(j>=Col)];
        assign(r2,del_col<Col>(x));
        BOOST_QVM_TEST_EQ(r1,r2);
        del_col<Col>(x) + del_col<Col>(x);
        -del_col<Col>(x);
        }
    }

int
main()
    {
    test<2,2,0>();
    test<2,2,1>();

    test<3,3,0>();
    test<3,3,1>();
    test<3,3,2>();

    test<4,4,0>();
    test<4,4,1>();
    test<4,4,2>();
    test<4,4,3>();

    test<5,5,0>();
    test<5,5,1>();
    test<5,5,2>();
    test<5,5,3>();
    test<5,5,4>();
    return boost::report_errors();
    }