2015-03-19 22:10:36 +08:00
|
|
|
// This file is part of Eigen, a lightweight C++ template library
|
|
|
|
// for linear algebra.
|
|
|
|
//
|
|
|
|
// Copyright (C) 2015 Gael Guennebaud <gael.guennebaud@inria.fr>
|
|
|
|
//
|
|
|
|
// This Source Code Form is subject to the terms of the Mozilla
|
|
|
|
// Public License v. 2.0. If a copy of the MPL was not distributed
|
|
|
|
// with this file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
|
|
|
|
|
|
#include "main.h"
|
|
|
|
|
|
|
|
template<typename Scalar> Scalar check_in_range(Scalar x, Scalar y)
|
|
|
|
{
|
|
|
|
Scalar r = internal::random<Scalar>(x,y);
|
|
|
|
VERIFY(r>=x);
|
|
|
|
if(y>=x)
|
|
|
|
{
|
|
|
|
VERIFY(r<=y);
|
|
|
|
}
|
|
|
|
return r;
|
|
|
|
}
|
|
|
|
|
|
|
|
template<typename Scalar> void check_all_in_range(Scalar x, Scalar y)
|
|
|
|
{
|
|
|
|
Array<int,1,Dynamic> mask(y-x+1);
|
|
|
|
mask.fill(0);
|
|
|
|
long n = (y-x+1)*32;
|
|
|
|
for(long k=0; k<n; ++k)
|
|
|
|
{
|
|
|
|
mask( check_in_range(x,y)-x )++;
|
|
|
|
}
|
2016-04-14 04:56:12 +08:00
|
|
|
for(Index i=0; i<mask.size(); ++i)
|
|
|
|
if(mask(i)==0)
|
|
|
|
std::cout << "WARNING: value " << x+i << " not reached." << std::endl;
|
2015-03-19 22:10:36 +08:00
|
|
|
VERIFY( (mask>0).all() );
|
|
|
|
}
|
|
|
|
|
|
|
|
void test_rand()
|
|
|
|
{
|
2015-03-20 04:39:37 +08:00
|
|
|
long long_ref = NumTraits<long>::highest()/10;
|
2015-09-29 05:26:10 +08:00
|
|
|
signed char char_offset = (std::min)(g_repeat,64);
|
|
|
|
signed char short_offset = (std::min)(g_repeat,16000);
|
2015-03-20 04:39:37 +08:00
|
|
|
|
2015-03-19 22:10:36 +08:00
|
|
|
for(int i = 0; i < g_repeat*10; i++) {
|
|
|
|
CALL_SUBTEST(check_in_range<float>(10,11));
|
|
|
|
CALL_SUBTEST(check_in_range<float>(1.24234523,1.24234523));
|
|
|
|
CALL_SUBTEST(check_in_range<float>(-1,1));
|
|
|
|
CALL_SUBTEST(check_in_range<float>(-1432.2352,-1432.2352));
|
|
|
|
|
|
|
|
CALL_SUBTEST(check_in_range<double>(10,11));
|
|
|
|
CALL_SUBTEST(check_in_range<double>(1.24234523,1.24234523));
|
|
|
|
CALL_SUBTEST(check_in_range<double>(-1,1));
|
|
|
|
CALL_SUBTEST(check_in_range<double>(-1432.2352,-1432.2352));
|
|
|
|
|
|
|
|
CALL_SUBTEST(check_in_range<int>(0,-1));
|
|
|
|
CALL_SUBTEST(check_in_range<short>(0,-1));
|
|
|
|
CALL_SUBTEST(check_in_range<long>(0,-1));
|
|
|
|
CALL_SUBTEST(check_in_range<int>(-673456,673456));
|
|
|
|
CALL_SUBTEST(check_in_range<short>(-24345,24345));
|
2015-03-20 04:39:37 +08:00
|
|
|
CALL_SUBTEST(check_in_range<long>(-long_ref,long_ref));
|
2015-03-19 22:10:36 +08:00
|
|
|
}
|
|
|
|
|
2015-09-29 05:26:10 +08:00
|
|
|
CALL_SUBTEST(check_all_in_range<signed char>(11,11));
|
|
|
|
CALL_SUBTEST(check_all_in_range<signed char>(11,11+char_offset));
|
|
|
|
CALL_SUBTEST(check_all_in_range<signed char>(-5,5));
|
|
|
|
CALL_SUBTEST(check_all_in_range<signed char>(-11-char_offset,-11));
|
|
|
|
CALL_SUBTEST(check_all_in_range<signed char>(-126,-126+char_offset));
|
|
|
|
CALL_SUBTEST(check_all_in_range<signed char>(126-char_offset,126));
|
|
|
|
CALL_SUBTEST(check_all_in_range<signed char>(-126,126));
|
2015-03-19 22:10:36 +08:00
|
|
|
|
|
|
|
CALL_SUBTEST(check_all_in_range<short>(11,11));
|
|
|
|
CALL_SUBTEST(check_all_in_range<short>(11,11+short_offset));
|
|
|
|
CALL_SUBTEST(check_all_in_range<short>(-5,5));
|
|
|
|
CALL_SUBTEST(check_all_in_range<short>(-11-short_offset,-11));
|
|
|
|
CALL_SUBTEST(check_all_in_range<short>(-24345,-24345+short_offset));
|
|
|
|
CALL_SUBTEST(check_all_in_range<short>(24345,24345+short_offset));
|
|
|
|
|
|
|
|
CALL_SUBTEST(check_all_in_range<int>(11,11));
|
|
|
|
CALL_SUBTEST(check_all_in_range<int>(11,11+g_repeat));
|
|
|
|
CALL_SUBTEST(check_all_in_range<int>(-5,5));
|
|
|
|
CALL_SUBTEST(check_all_in_range<int>(-11-g_repeat,-11));
|
|
|
|
CALL_SUBTEST(check_all_in_range<int>(-673456,-673456+g_repeat));
|
|
|
|
CALL_SUBTEST(check_all_in_range<int>(673456,673456+g_repeat));
|
|
|
|
|
|
|
|
CALL_SUBTEST(check_all_in_range<long>(11,11));
|
|
|
|
CALL_SUBTEST(check_all_in_range<long>(11,11+g_repeat));
|
|
|
|
CALL_SUBTEST(check_all_in_range<long>(-5,5));
|
|
|
|
CALL_SUBTEST(check_all_in_range<long>(-11-g_repeat,-11));
|
2015-03-20 04:39:37 +08:00
|
|
|
CALL_SUBTEST(check_all_in_range<long>(-long_ref,-long_ref+g_repeat));
|
|
|
|
CALL_SUBTEST(check_all_in_range<long>( long_ref, long_ref+g_repeat));
|
2015-03-19 22:10:36 +08:00
|
|
|
}
|