mirror/eigen
2
0
Fork 0
mirror of https://gitlab.com/libeigen/eigen.git synced 2025-01-18 14:34:17 +08:00
Code Issues Packages Projects Releases Wiki Activity

lots of fixes for complex numbers. unittests now test complex numbers.

Browse Source
This commit is contained in:
Benoit Jacob 2007-08-12 10:59:07 +00:00
parent 71268227d4
commit c9a2c3738e
3 changed files with 46 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
tvmet-1.7.1/include/tvmet/Traits.h
View File

@ -56,6 +56,7 @@ struct Traits : public TraitsBase<T>
using Base::imag;
using Base::conj;
using Base::sqrt;
using Base::isLessThan_nonfuzzy;
static value_type random()
{
@ -74,7 +75,7 @@ struct Traits : public TraitsBase<T>
if(isFloat())
return(abs(a) <= abs(b) * epsilon());
else
return(a==0);
return(a==static_cast<value_type>(0));
}
/**
@ -105,13 +106,12 @@ struct Traits : public TraitsBase<T>
*
* Full story: returns a <= b || isApprox(a, b);
*/
static bool isLessThan( argument_type a, argument_type b )
static bool isLessThan(argument_type a, argument_type b)
{
assert(!isComplex());
if(isFloat())
return(a <= b || isApprox(a, b));
return(isLessThan_nonfuzzy(a,b) || isApprox(a, b));
else
return(a<=b);
return(isLessThan_nonfuzzy(a,b));
}
};

2
tvmet-1.7.1/testsuite/main.h
View File

@ -23,6 +23,8 @@
#include <stdlib.h>
#include <time.h>
#define EIGEN_USE_COMPLEX
#ifdef EIGEN_USE_COMPLEX
#include <complex>
#endif

52
tvmet-1.7.1/testsuite/testtraits.cpp
View File

@ -25,12 +25,26 @@
template<typename T> struct TestTraits
{
void real()
void real_imag_conj_abs()
{
T x = Traits<T>::random();
typedef typename Traits<T>::real_type real_type;
real_type r = Traits<T>::real(x);
TEST_APPROX(r, x);
typedef typename Traits<T>::real_type real;
real r = Traits<T>::real(x);
real i = Traits<T>::imag(x);
T c = Traits<T>::conj(x);
real a = Traits<T>::abs(x);
// a must be real
TEST_APPROX(a, Traits<real>::real(a));
TEST_APPROX(a, Traits<T>::real(a));
TEST_ZERO(Traits<real>::imag(a));
TEST_ZERO(Traits<T>::imag(a));
// check Pythagora's formula
if(Traits<T>::isFloat() || !Traits<T>::isComplex()) TEST_APPROX(r*r + i*i, a*a);
// check complex conjugation
TEST_APPROX(-i, Traits<T>::imag(c));
}
void imag()
@ -60,20 +74,18 @@ template<typename T> struct TestTraits
void sqrt()
{
// only test compilation here
T x = Traits<T>::random();
T a = Traits<T>::abs(x);
T b = Traits<T>::sqrt(a);
// T could be an integer type, so b*b=a is not necessarily true
TEST_LESSTHAN(b*b, a);
TEST_LESSTHAN(a, (b+1)*(b+1));
Traits<T>::sqrt(x);
}
void isApprox()
{
T x = Traits<T>::random();
T e = T(Traits<T>::epsilon()) / T(10);
TEST(Traits<T>::isApprox(x,x));
TEST(Traits<T>::isApprox(x,x+Traits<T>::epsilon()/10));
TEST(!Traits<T>::isApprox(x,x+1));
TEST(Traits<T>::isApprox(x,x+e));
TEST(!Traits<T>::isApprox(x,x+T(1)));
}
void isNegligible()
@ -88,6 +100,7 @@ template<typename T> struct TestTraits
TEST(!Traits<T>::isNegligible(one, x));
}
void isZero()
{
T zero(0), one(1), x = Traits<T>::random(), y = Traits<T>::random();
@ -98,18 +111,22 @@ template<typename T> struct TestTraits
void isLessThan()
{
if(Traits<T>::isComplex()) {
T x = Traits<T>::random(), y = Traits<T>::random();
TEST(!Traits<T>::isLessThan(x,y));
}
else {
T one(1), x = Traits<T>::random();
T e = T(Traits<T>::epsilon()) / T(10);
TEST(Traits<T>::isLessThan(x, x+one));
TEST(!Traits<T>::isLessThan(x+one, x));
TEST(Traits<T>::isLessThan(x, x+Traits<T>::epsilon()/10));
TEST(Traits<T>::isLessThan(x, x+e));
}
}
TestTraits()
{
real();
imag();
conj();
abs();
real_imag_conj_abs();
sqrt();
isApprox();
isNegligible();
@ -123,4 +140,7 @@ void TvmetTestSuite::testTraits()
TestTraits<int>();
TestTraits<float>();
TestTraits<double>();
TestTraits<std::complex<int> >();
TestTraits<std::complex<float> >();
TestTraits<std::complex<double> >();
}