[ceph.git] / ceph / src / boost / libs / multiprecision / test / ublas_interop / test72.cpp

//
//  Copyright (c) 2000-2002
//  Joerg Walter, Mathias Koch
//
//  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)
//
//  The authors gratefully acknowledge the support of
//  GeNeSys mbH & Co. KG in producing this work.
//

#if defined(__GNUC__) && (__GNUC__ >= 9)
#pragma GCC diagnostic ignored "-Wdeprecated-copy"
#endif

#include "test7.hpp"

// Test matrix & vector expression templates
template <class V, class M, int N>
struct test_my_matrix_vector
{
   typedef typename V::value_type value_type;

   template <class VP, class MP>
   void test_with(VP& v1, VP& v2, MP& m1) const
   {
      {
         // Rows and columns
         initialize_matrix(m1);
         for (int i = 0; i < N; ++i)
         {
            v1 = ublas::row(m1, i);
            std::cout << "row (m, " << i << ") = " << v1 << std::endl;
            v1 = ublas::column(m1, i);
            std::cout << "column (m, " << i << ") = " << v1 << std::endl;
         }

         // Outer product
         initialize_vector(v1);
         initialize_vector(v2);
         m1 = ublas::outer_prod(v1, v2);
         std::cout << "outer_prod (v1, v2) = " << m1 << std::endl;

         // Matrix vector product
         initialize_matrix(m1);
         initialize_vector(v1);
         v2 = ublas::prod(m1, v1);
         std::cout << "prod (m1, v1) = " << v2 << std::endl;
         v2 = ublas::prod(v1, m1);
         std::cout << "prod (v1, m1) = " << v2 << std::endl;
      }
   }
   void operator()() const
   {
      {
         V v1(N), v2(N);
         M m1(N, N);
         test_with(v1, v2, m1);

         ublas::matrix_row<M> mr1(m1, 0), mr2(m1, 1);
         test_with(mr1, mr2, m1);

         ublas::matrix_column<M> mc1(m1, 0), mc2(m1, 1);
         test_with(mc1, mc2, m1);

#ifdef USE_RANGE
         ublas::matrix_vector_range<M> mvr1(m1, ublas::range(0, N), ublas::range(0, N)),
             mvr2(m1, ublas::range(0, N), ublas::range(0, N));
         test_with(mvr1, mvr2, m1);
#endif

#ifdef USE_SLICE
         ublas::matrix_vector_slice<M> mvs1(m1, ublas::slice(0, 1, N), ublas::slice(0, 1, N)),
             mvs2(m1, ublas::slice(0, 1, N), ublas::slice(0, 1, N));
         test_with(mvs1, mvs2, m1);
#endif
      }
   }
};

// Test matrix & vector
void test_matrix_vector()
{
   std::cout << "test_matrix_vector" << std::endl;

#ifdef USE_MATRIX
#ifdef USE_BOUNDED_ARRAY
#ifdef USE_FLOAT
   std::cout << "boost::numeric::interval<mp_test_type>, bounded_array" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, ublas::bounded_array<boost::numeric::interval<mp_test_type>, 3> >,
                         ublas::matrix<boost::numeric::interval<mp_test_type>, ublas::row_major, ublas::bounded_array<boost::numeric::interval<mp_test_type>, 3 * 3> >, 3>()();
#endif

#ifdef USE_DOUBLE
   std::cout << "boost::numeric::interval<double>, bounded_array" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, ublas::bounded_array<boost::numeric::interval<double>, 3> >,
                         ublas::matrix<boost::numeric::interval<double>, ublas::row_major, ublas::bounded_array<boost::numeric::interval<double>, 3 * 3> >, 3>()();
#endif
#endif

#ifdef USE_UNBOUNDED_ARRAY
#ifdef USE_FLOAT
   std::cout << "boost::numeric::interval<mp_test_type>, unbounded_array" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, ublas::unbounded_array<boost::numeric::interval<mp_test_type> > >,
                         ublas::matrix<boost::numeric::interval<mp_test_type>, ublas::row_major, ublas::unbounded_array<boost::numeric::interval<mp_test_type> > >, 3>()();
#endif

#ifdef USE_DOUBLE
   std::cout << "boost::numeric::interval<double>, unbounded_array" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, ublas::unbounded_array<boost::numeric::interval<double> > >,
                         ublas::matrix<boost::numeric::interval<double>, ublas::row_major, ublas::unbounded_array<boost::numeric::interval<double> > >, 3>()();
#endif
#endif

#ifdef USE_STD_VECTOR
#ifdef USE_FLOAT
   std::cout << "boost::numeric::interval<mp_test_type>, std::vector" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, std::vector<boost::numeric::interval<mp_test_type> > >,
                         ublas::matrix<boost::numeric::interval<mp_test_type>, ublas::row_major, std::vector<boost::numeric::interval<mp_test_type> > >, 3>()();
#endif

#ifdef USE_DOUBLE
   std::cout << "boost::numeric::interval<double>, std::vector" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, std::vector<boost::numeric::interval<double> > >,
                         ublas::matrix<boost::numeric::interval<double>, ublas::row_major, std::vector<boost::numeric::interval<double> > >, 3>()();
#endif
#endif
#endif

#ifdef USE_VECTOR_OF_VECTOR
#ifdef USE_BOUNDED_ARRAY
#ifdef USE_FLOAT
   std::cout << "boost::numeric::interval<mp_test_type>, bounded_array" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, ublas::bounded_array<boost::numeric::interval<mp_test_type>, 3> >,
                         ublas::vector_of_vector<boost::numeric::interval<mp_test_type>, ublas::row_major, ublas::bounded_array<ublas::bounded_array<boost::numeric::interval<mp_test_type>, 3>, 3 + 1> >, 3>()();
#endif

#ifdef USE_DOUBLE
   std::cout << "boost::numeric::interval<double>, bounded_array" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, ublas::bounded_array<boost::numeric::interval<double>, 3> >,
                         ublas::vector_of_vector<boost::numeric::interval<double>, ublas::row_major, ublas::bounded_array<ublas::bounded_array<boost::numeric::interval<double>, 3>, 3 + 1> >, 3>()();
#endif
#endif

#ifdef USE_UNBOUNDED_ARRAY
#ifdef USE_FLOAT
   std::cout << "boost::numeric::interval<mp_test_type>, unbounded_array" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, ublas::unbounded_array<boost::numeric::interval<mp_test_type> > >,
                         ublas::vector_of_vector<boost::numeric::interval<mp_test_type>, ublas::row_major, ublas::unbounded_array<ublas::unbounded_array<boost::numeric::interval<mp_test_type> > > >, 3>()();
#endif

#ifdef USE_DOUBLE
   std::cout << "boost::numeric::interval<double>, unbounded_array" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, ublas::unbounded_array<boost::numeric::interval<double> > >,
                         ublas::vector_of_vector<boost::numeric::interval<double>, ublas::row_major, ublas::unbounded_array<ublas::unbounded_array<boost::numeric::interval<double> > > >, 3>()();
#endif
#endif

#ifdef USE_STD_VECTOR
#ifdef USE_FLOAT
   std::cout << "boost::numeric::interval<mp_test_type>, std::vector" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, std::vector<boost::numeric::interval<mp_test_type> > >,
                         ublas::vector_of_vector<boost::numeric::interval<mp_test_type>, ublas::row_major, std::vector<std::vector<boost::numeric::interval<mp_test_type> > > >, 3>()();
#endif

#ifdef USE_DOUBLE
   std::cout << "boost::numeric::interval<double>, std::vector" << std::endl;
   test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, std::vector<boost::numeric::interval<double> > >,
                         ublas::vector_of_vector<boost::numeric::interval<double>, ublas::row_major, std::vector<std::vector<boost::numeric::interval<double> > > >, 3>()();
#endif
#endif
#endif
}
Commit	Line	Data
7c673cae FG	1	//
	2	// Copyright (c) 2000-2002
	3	// Joerg Walter, Mathias Koch
	4	//
	5	// Distributed under the Boost Software License, Version 1.0. (See
	6	// accompanying file LICENSE_1_0.txt or copy at
	7	// http://www.boost.org/LICENSE_1_0.txt)
	8	//
	9	// The authors gratefully acknowledge the support of
	10	// GeNeSys mbH & Co. KG in producing this work.
	11	//
	12
92f5a8d4 TL	13	#if defined(__GNUC__) && (__GNUC__ >= 9)
	14	#pragma GCC diagnostic ignored "-Wdeprecated-copy"
	15	#endif
	16
7c673cae FG	17	#include "test7.hpp"
	18
	19	// Test matrix & vector expression templates
92f5a8d4 TL	20	template <class V, class M, int N>
	21	struct test_my_matrix_vector
	22	{
	23	typedef typename V::value_type value_type;
	24
	25	template <class VP, class MP>
	26	void test_with(VP& v1, VP& v2, MP& m1) const
	27	{
	28	{
	29	// Rows and columns
	30	initialize_matrix(m1);
	31	for (int i = 0; i < N; ++i)
	32	{
	33	v1 = ublas::row(m1, i);
	34	std::cout << "row (m, " << i << ") = " << v1 << std::endl;
	35	v1 = ublas::column(m1, i);
	36	std::cout << "column (m, " << i << ") = " << v1 << std::endl;
	37	}
	38
	39	// Outer product
	40	initialize_vector(v1);
	41	initialize_vector(v2);
	42	m1 = ublas::outer_prod(v1, v2);
	43	std::cout << "outer_prod (v1, v2) = " << m1 << std::endl;
	44
	45	// Matrix vector product
	46	initialize_matrix(m1);
	47	initialize_vector(v1);
	48	v2 = ublas::prod(m1, v1);
	49	std::cout << "prod (m1, v1) = " << v2 << std::endl;
	50	v2 = ublas::prod(v1, m1);
	51	std::cout << "prod (v1, m1) = " << v2 << std::endl;
	52	}
	53	}
	54	void operator()() const
	55	{
	56	{
	57	V v1(N), v2(N);
	58	M m1(N, N);
	59	test_with(v1, v2, m1);
	60
	61	ublas::matrix_row<M> mr1(m1, 0), mr2(m1, 1);
	62	test_with(mr1, mr2, m1);
	63
	64	ublas::matrix_column<M> mc1(m1, 0), mc2(m1, 1);
	65	test_with(mc1, mc2, m1);
7c673cae FG	66
7c673cae FG	67	#ifdef USE_RANGE
92f5a8d4 TL	68	ublas::matrix_vector_range<M> mvr1(m1, ublas::range(0, N), ublas::range(0, N)),
	69	mvr2(m1, ublas::range(0, N), ublas::range(0, N));
	70	test_with(mvr1, mvr2, m1);
7c673cae FG	71	#endif
	72
	73	#ifdef USE_SLICE
92f5a8d4 TL	74	ublas::matrix_vector_slice<M> mvs1(m1, ublas::slice(0, 1, N), ublas::slice(0, 1, N)),
	75	mvs2(m1, ublas::slice(0, 1, N), ublas::slice(0, 1, N));
	76	test_with(mvs1, mvs2, m1);
7c673cae	77	#endif
92f5a8d4 TL	78	}
92f5a8d4 TL	79	}
7c673cae FG	80	};
	81
	82	// Test matrix & vector
92f5a8d4 TL	83	void test_matrix_vector()
	84	{
	85	std::cout << "test_matrix_vector" << std::endl;
7c673cae FG	86
	87	#ifdef USE_MATRIX
	88	#ifdef USE_BOUNDED_ARRAY
	89	#ifdef USE_FLOAT
92f5a8d4 TL	90	std::cout << "boost::numeric::interval<mp_test_type>, bounded_array" << std::endl;
	91	test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, ublas::bounded_array<boost::numeric::interval<mp_test_type>, 3> >,
	92	ublas::matrix<boost::numeric::interval<mp_test_type>, ublas::row_major, ublas::bounded_array<boost::numeric::interval<mp_test_type>, 3 * 3> >, 3>()();
7c673cae FG	93	#endif
	94
	95	#ifdef USE_DOUBLE
92f5a8d4 TL	96	std::cout << "boost::numeric::interval<double>, bounded_array" << std::endl;
	97	test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, ublas::bounded_array<boost::numeric::interval<double>, 3> >,
	98	ublas::matrix<boost::numeric::interval<double>, ublas::row_major, ublas::bounded_array<boost::numeric::interval<double>, 3 * 3> >, 3>()();
7c673cae FG	99	#endif
	100	#endif
	101
	102	#ifdef USE_UNBOUNDED_ARRAY
	103	#ifdef USE_FLOAT
92f5a8d4 TL	104	std::cout << "boost::numeric::interval<mp_test_type>, unbounded_array" << std::endl;
	105	test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, ublas::unbounded_array<boost::numeric::interval<mp_test_type> > >,
	106	ublas::matrix<boost::numeric::interval<mp_test_type>, ublas::row_major, ublas::unbounded_array<boost::numeric::interval<mp_test_type> > >, 3>()();
7c673cae FG	107	#endif
	108
	109	#ifdef USE_DOUBLE
92f5a8d4 TL	110	std::cout << "boost::numeric::interval<double>, unbounded_array" << std::endl;
	111	test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, ublas::unbounded_array<boost::numeric::interval<double> > >,
	112	ublas::matrix<boost::numeric::interval<double>, ublas::row_major, ublas::unbounded_array<boost::numeric::interval<double> > >, 3>()();
7c673cae FG	113	#endif
	114	#endif
	115
	116	#ifdef USE_STD_VECTOR
	117	#ifdef USE_FLOAT
92f5a8d4 TL	118	std::cout << "boost::numeric::interval<mp_test_type>, std::vector" << std::endl;
	119	test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, std::vector<boost::numeric::interval<mp_test_type> > >,
	120	ublas::matrix<boost::numeric::interval<mp_test_type>, ublas::row_major, std::vector<boost::numeric::interval<mp_test_type> > >, 3>()();
7c673cae FG	121	#endif
	122
	123	#ifdef USE_DOUBLE
92f5a8d4 TL	124	std::cout << "boost::numeric::interval<double>, std::vector" << std::endl;
	125	test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, std::vector<boost::numeric::interval<double> > >,
	126	ublas::matrix<boost::numeric::interval<double>, ublas::row_major, std::vector<boost::numeric::interval<double> > >, 3>()();
7c673cae FG	127	#endif
	128	#endif
	129	#endif
	130
	131	#ifdef USE_VECTOR_OF_VECTOR
	132	#ifdef USE_BOUNDED_ARRAY
	133	#ifdef USE_FLOAT
92f5a8d4 TL	134	std::cout << "boost::numeric::interval<mp_test_type>, bounded_array" << std::endl;
	135	test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, ublas::bounded_array<boost::numeric::interval<mp_test_type>, 3> >,
	136	ublas::vector_of_vector<boost::numeric::interval<mp_test_type>, ublas::row_major, ublas::bounded_array<ublas::bounded_array<boost::numeric::interval<mp_test_type>, 3>, 3 + 1> >, 3>()();
7c673cae FG	137	#endif
	138
	139	#ifdef USE_DOUBLE
92f5a8d4 TL	140	std::cout << "boost::numeric::interval<double>, bounded_array" << std::endl;
	141	test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, ublas::bounded_array<boost::numeric::interval<double>, 3> >,
	142	ublas::vector_of_vector<boost::numeric::interval<double>, ublas::row_major, ublas::bounded_array<ublas::bounded_array<boost::numeric::interval<double>, 3>, 3 + 1> >, 3>()();
7c673cae FG	143	#endif
	144	#endif
	145
	146	#ifdef USE_UNBOUNDED_ARRAY
	147	#ifdef USE_FLOAT
92f5a8d4 TL	148	std::cout << "boost::numeric::interval<mp_test_type>, unbounded_array" << std::endl;
	149	test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, ublas::unbounded_array<boost::numeric::interval<mp_test_type> > >,
	150	ublas::vector_of_vector<boost::numeric::interval<mp_test_type>, ublas::row_major, ublas::unbounded_array<ublas::unbounded_array<boost::numeric::interval<mp_test_type> > > >, 3>()();
7c673cae FG	151	#endif
	152
	153	#ifdef USE_DOUBLE
92f5a8d4 TL	154	std::cout << "boost::numeric::interval<double>, unbounded_array" << std::endl;
	155	test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, ublas::unbounded_array<boost::numeric::interval<double> > >,
	156	ublas::vector_of_vector<boost::numeric::interval<double>, ublas::row_major, ublas::unbounded_array<ublas::unbounded_array<boost::numeric::interval<double> > > >, 3>()();
7c673cae FG	157	#endif
	158	#endif
	159
	160	#ifdef USE_STD_VECTOR
	161	#ifdef USE_FLOAT
92f5a8d4 TL	162	std::cout << "boost::numeric::interval<mp_test_type>, std::vector" << std::endl;
	163	test_my_matrix_vector<ublas::vector<boost::numeric::interval<mp_test_type>, std::vector<boost::numeric::interval<mp_test_type> > >,
	164	ublas::vector_of_vector<boost::numeric::interval<mp_test_type>, ublas::row_major, std::vector<std::vector<boost::numeric::interval<mp_test_type> > > >, 3>()();
7c673cae FG	165	#endif
	166
	167	#ifdef USE_DOUBLE
92f5a8d4 TL	168	std::cout << "boost::numeric::interval<double>, std::vector" << std::endl;
	169	test_my_matrix_vector<ublas::vector<boost::numeric::interval<double>, std::vector<boost::numeric::interval<double> > >,
	170	ublas::vector_of_vector<boost::numeric::interval<double>, ublas::row_major, std::vector<std::vector<boost::numeric::interval<double> > > >, 3>()();
7c673cae FG	171	#endif
	172	#endif
	173	#endif
	174	}