update sources to v12.2.4

[ceph.git] / ceph / src / boost / libs / qvm / test / transpose_test.cpp

//Copyright (c) 2008-2016 Emil Dotchevski and Reverge Studios, Inc.\r
\r
//Distributed under the Boost Software License, Version 1.0. (See accompanying\r
//file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)\r
\r
#include <boost/qvm/map_mat_mat.hpp>\r
#include <boost/qvm/mat_operations.hpp>\r
#include <boost/qvm/mat_traits_array.hpp>\r
#include <boost/qvm/mat.hpp>\r
#include "test_qvm_matrix.hpp"\r
#include "gold.hpp"\r
\r
namespace\r
    {\r
    template <int Rows,int Cols>\r
    void\r
    test()\r
        {\r
        using namespace boost::qvm;\r
        test_qvm::matrix<M1,Rows,Cols> x(42,1);\r
        float r1[Cols][Rows];\r
        for( int i=0; i!=Rows; ++i )\r
            for( int j=0; j!=Cols; ++j )\r
                r1[j][i]=x.a[i][j];\r
        float r2[Cols][Rows];\r
        assign(r2,transposed(x));\r
        BOOST_QVM_TEST_EQ(r1,r2);\r
        test_qvm::scalar_multiply_m(x.b,x.a,2.0f);\r
        transposed(x) *= 2;\r
        BOOST_QVM_TEST_EQ(x.a,x.b);\r
        transposed(x) + transposed(x);\r
        -transposed(x);\r
        }\r
    }\r
\r
int\r
main()\r
    {\r
    test<1,2>();\r
    test<2,1>();\r
    test<2,2>();\r
    test<1,3>();\r
    test<3,1>();\r
    test<3,3>();\r
    test<1,4>();\r
    test<4,1>();\r
    test<4,4>();\r
    test<1,5>();\r
    test<5,1>();\r
    test<5,5>();\r
    return boost::report_errors();\r
    }\r