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
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
|
// Copyright 2010 Gunter Winkler <guwi17@gmx.de>
// 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/numeric/ublas/vector.hpp>
#include <boost/numeric/ublas/io.hpp>
#include <boost/numeric/ublas/matrix.hpp>
#include <complex>
#include "utils.hpp"
using namespace boost::numeric::ublas;
static const double TOL(1.0e-5); ///< Used for comparing two real numbers.
BOOST_UBLAS_TEST_DEF ( test_double_complex_norm_inf ) {
typedef std::complex<double> dComplex;
vector<dComplex> v(4);
for (unsigned int i = 0; i < v.size(); ++i)
v[i] = dComplex(i, i + 1);
const double expected = abs(v[3]);
BOOST_UBLAS_DEBUG_TRACE( "norm is " << norm_inf(v) );
BOOST_UBLAS_TEST_CHECK(std::abs(norm_inf(v) - expected) < TOL);
v *= 3.;
BOOST_UBLAS_TEST_CHECK(std::abs(norm_inf(v) - (3.0*expected)) < TOL);
}
BOOST_UBLAS_TEST_DEF ( test_double_complex_norm_2 ) {
typedef std::complex<double> dComplex;
vector<dComplex> v(4);
for (unsigned int i = 0; i < v.size(); ++i)
v[i] = dComplex(i, i + 1);
const double expected = sqrt(44.0);
BOOST_UBLAS_DEBUG_TRACE( "norm is " << norm_2(v) );
BOOST_UBLAS_TEST_CHECK(std::abs(norm_2(v) - expected) < TOL);
v *= 3.;
BOOST_UBLAS_TEST_CHECK(std::abs(norm_2(v) - (3.0*expected)) < TOL);
}
BOOST_UBLAS_TEST_DEF ( test_double_complex_norm_2_square ) {
typedef std::complex<double> dComplex;
vector<dComplex> v(4);
for (unsigned int i = 0; i < v.size(); ++i)
v[i] = dComplex(i, i + 1);
const double expected = 44;
BOOST_UBLAS_DEBUG_TRACE( "square norm is " << norm_2_square(v) );
BOOST_UBLAS_TEST_CHECK(std::abs(norm_2_square(v) - expected) < TOL);
v *= 3.;
BOOST_UBLAS_TEST_CHECK(std::abs(norm_2_square(v) - (9.0*expected)) < TOL);
}
BOOST_UBLAS_TEST_DEF ( test_float_complex_norm_inf ) {
typedef std::complex<float> dComplex;
vector<dComplex> v(4);
for (unsigned short i = 0; i < v.size(); ++i) {
unsigned short imag(i + 1);
v[i] = dComplex(i, imag);
}
const float expected = abs(v[3]);
BOOST_UBLAS_DEBUG_TRACE( "norm is " << norm_inf(v) );
BOOST_UBLAS_TEST_CHECK(std::abs(norm_inf(v) - expected) < TOL);
v *= 3.f;
BOOST_UBLAS_TEST_CHECK(std::abs(norm_inf(v) - (3.0*expected)) < TOL);
}
BOOST_UBLAS_TEST_DEF ( test_float_complex_norm_2 ) {
typedef std::complex<float> dComplex;
vector<dComplex> v(4);
for (unsigned short i = 0; i < v.size(); ++i) {
unsigned short imag(i + 1);
v[i] = dComplex(i, imag);
}
const double expected = sqrt(44.0);
BOOST_UBLAS_DEBUG_TRACE( "norm is " << norm_2(v) );
BOOST_UBLAS_TEST_CHECK(std::abs(norm_2(v) - expected) < TOL);
v *= 3.f;
BOOST_UBLAS_TEST_CHECK(std::abs(norm_2(v) - (3.0*expected)) < TOL);
}
BOOST_UBLAS_TEST_DEF ( test_float_complex_norm_2_square ) {
typedef std::complex<float> dComplex;
vector<dComplex> v(4);
for (unsigned short i = 0; i < v.size(); ++i) {
unsigned short imag(i + 1);
v[i] = dComplex(i, imag);
}
const double expected = 44;
BOOST_UBLAS_DEBUG_TRACE( "square norm is " << norm_2_square(v) );
BOOST_UBLAS_TEST_CHECK(std::abs(norm_2_square(v) - expected) < TOL);
v *= 3.f;
BOOST_UBLAS_TEST_CHECK(std::abs(norm_2_square(v) - (9.0*expected)) < TOL);
}
int main() {
BOOST_UBLAS_TEST_BEGIN();
BOOST_UBLAS_TEST_DO( test_double_complex_norm_inf );
BOOST_UBLAS_TEST_DO( test_float_complex_norm_inf );
BOOST_UBLAS_TEST_DO( test_double_complex_norm_2 );
BOOST_UBLAS_TEST_DO( test_float_complex_norm_2 );
BOOST_UBLAS_TEST_DO( test_double_complex_norm_2_square );
BOOST_UBLAS_TEST_DO( test_float_complex_norm_2_square );
BOOST_UBLAS_TEST_END();
}
|
