1 // Copyright (c) 2000-2002
2 // Joerg Walter, Mathias Koch
4 // Distributed under the Boost Software License, Version 1.0. (See
5 // accompanying file LICENSE_1_0.txt or copy at
6 // http://www.boost.org/LICENSE_1_0.txt)
8 // The authors gratefully acknowledge the support of
9 // GeNeSys mbH & Co. KG in producing this work.
13 // This file fails to compile - appears to be a known uBlas issue :-(
16 #if defined(__GNUC__) && (__GNUC__ >= 9)
17 #pragma GCC diagnostic ignored "-Wdeprecated-copy"
22 // Test vector expression templates
23 template <class V, int N>
26 typedef typename V::value_type value_type;
27 typedef typename V::size_type size_type;
28 typedef typename ublas::type_traits<value_type>::real_type real_type;
31 void test_with(VP& v1, VP& v2, VP& v3) const
39 initialize_vector(v1);
40 initialize_vector(v2);
42 std::cout << "v1 = v2 = " << v1 << std::endl;
43 v1.assign_temporary(v2);
44 std::cout << "v1.assign_temporary (v2) = " << v1 << std::endl;
46 std::cout << "v1.swap (v2) = " << v1 << " " << v2 << std::endl;
49 v1 = ublas::zero_vector<value_type>(v1.size());
50 std::cout << "v1.zero_vector = " << v1 << std::endl;
53 // Unary vector operations resulting in a vector
54 initialize_vector(v1);
56 std::cout << "- v1 = " << v2 << std::endl;
58 std::cout << "conj (v1) = " << v2 << std::endl;
60 // Binary vector operations resulting in a vector
61 initialize_vector(v1);
62 initialize_vector(v2);
64 std::cout << "v1 + v2 = " << v3 << std::endl;
67 std::cout << "v1 - v2 = " << v3 << std::endl;
71 initialize_vector(v1);
72 v2 = value_type(1.) * v1;
73 std::cout << "1. * v1 = " << v2 << std::endl;
75 std::cout << "N * v1 = " << v2 << std::endl;
76 initialize_vector(v1);
77 // v2 = v1 * value_type (1.);
78 std::cout << "v1 * 1. = " << v2 << std::endl;
80 std::cout << "v1 * N = " << v2 << std::endl;
83 initialize_vector(v1);
84 initialize_vector(v2);
86 std::cout << "v2 += v1 = " << v2 << std::endl;
88 std::cout << "v2 -= v1 = " << v2 << std::endl;
90 std::cout << "v2 = v2 + v1 = " << v2 << std::endl;
92 std::cout << "v2 = v2 - v1 = " << v2 << std::endl;
94 std::cout << "v1 *= 1. = " << v1 << std::endl;
96 std::cout << "v1 *= N = " << v1 << std::endl;
98 // Unary vector operations resulting in a scalar
99 initialize_vector(v1);
101 std::cout << "sum (v1) = " << t << std::endl;
102 n = ublas::norm_1(v1);
103 std::cout << "norm_1 (v1) = " << n << std::endl;
104 n = ublas::norm_2(v1);
105 std::cout << "norm_2 (v1) = " << n << std::endl;
106 n = ublas::norm_inf(v1);
107 std::cout << "norm_inf (v1) = " << n << std::endl;
109 i = ublas::index_norm_inf(v1);
110 std::cout << "index_norm_inf (v1) = " << i << std::endl;
112 // Binary vector operations resulting in a scalar
113 initialize_vector(v1);
114 initialize_vector(v2);
115 t = ublas::inner_prod(v1, v2);
116 std::cout << "inner_prod (v1, v2) = " << t << std::endl;
119 void operator()() const
122 V v1(N), v2(N), v3(N);
123 test_with(v1, v2, v3);
126 ublas::vector_range<V> vr1(v1, ublas::range(0, N)),
127 vr2(v2, ublas::range(0, N)),
128 vr3(v3, ublas::range(0, N));
129 test_with(vr1, vr2, vr3);
133 ublas::vector_slice<V> vs1(v1, ublas::slice(0, 1, N)),
134 vs2(v2, ublas::slice(0, 1, N)),
135 vs3(v3, ublas::slice(0, 1, N));
136 test_with(vs1, vs2, vs3);
145 std::cout << "test_vector" << std::endl;
147 #ifdef USE_BOUNDED_ARRAY
149 std::cout << "boost::numeric::interval<mp_test_type>, bounded_array" << std::endl;
150 test_my_vector<ublas::vector<boost::numeric::interval<mp_test_type>, ublas::bounded_array<boost::numeric::interval<mp_test_type>, 3> >, 3>()();
154 std::cout << "boost::numeric::interval<double>, bounded_array" << std::endl;
155 test_my_vector<ublas::vector<boost::numeric::interval<double>, ublas::bounded_array<boost::numeric::interval<double>, 3> >, 3>()();
159 #ifdef USE_UNBOUNDED_ARRAY
161 std::cout << "boost::numeric::interval<mp_test_type>, unbounded_array" << std::endl;
162 test_my_vector<ublas::vector<boost::numeric::interval<mp_test_type>, ublas::unbounded_array<boost::numeric::interval<mp_test_type> > >, 3>()();
166 std::cout << "boost::numeric::interval<double>, unbounded_array" << std::endl;
167 test_my_vector<ublas::vector<boost::numeric::interval<double>, ublas::unbounded_array<boost::numeric::interval<double> > >, 3>()();
171 #ifdef USE_STD_VECTOR
173 std::cout << "boost::numeric::interval<mp_test_type>, std::vector" << std::endl;
174 test_my_vector<ublas::vector<boost::numeric::interval<mp_test_type>, std::vector<boost::numeric::interval<mp_test_type> > >, 3>()();
178 std::cout << "boost::numeric::interval<double>, std::vector" << std::endl;
179 test_my_vector<ublas::vector<boost::numeric::interval<double>, std::vector<boost::numeric::interval<double> > >, 3>()();