/***************************************************************************
* test_GNumerics.cpp - test numerics modules *
* ----------------------------------------------------------------------- *
* copyright (C) 2010-2013 by Jurgen Knodlseder *
* ----------------------------------------------------------------------- *
* *
* This program is free software: you can redistribute it and/or modify *
* it under the terms of the GNU General Public License as published by *
* the Free Software Foundation, either version 3 of the License, or *
* (at your option) any later version. *
* *
* This program is distributed in the hope that it will be useful, *
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
* GNU General Public License for more details. *
* *
* You should have received a copy of the GNU General Public License *
* along with this program. If not, see . *
* *
***************************************************************************/
/* __ Includes ___________________________________________________________ */
#ifdef HAVE_CONFIG_H
#include
#endif
#include
#include
#include
#include "test_GNumerics.hpp"
/* __ Namespaces _________________________________________________________ */
/* __ Globals ____________________________________________________________ */
/***********************************************************************//**
* @brief Set tests
***************************************************************************/
void TestGNumerics::set(void)
{
//set name
name("GNumerics");
// Set parameters
m_sigma = 2.5;
// Append tests
append(static_cast(&TestGNumerics::test_integral),"Test GIntegral");
append(static_cast(&TestGNumerics::test_romberg_integration),"Test Romberg integration");
return;
}
/***********************************************************************//**
* @brief Clone test suite
*
* @return Pointer to deep copy of test suite.
***************************************************************************/
TestGNumerics* TestGNumerics::clone(void) const
{
// Clone test suite
return new TestGNumerics(*this);
}
/***********************************************************************//**
* @brief Test model parameter handling.
***************************************************************************/
void TestGNumerics::test_integral(void)
{
// Test integral and integrand allocation
Gauss integrand(m_sigma);
GIntegral integral(&integrand);
// Exit test
return;
}
/***********************************************************************//**
* @brief Test Romberg integration.
***************************************************************************/
void TestGNumerics::test_romberg_integration(void)
{
Gauss integrand(m_sigma);
GIntegral integral(&integrand);
double result = integral.romb(-10.0*m_sigma, 10.0*m_sigma);
test_value(result,1.0,1.0e-6,"","Gaussian integral is not 1.0 (integral="+gammalib::str(result)+")");
result = integral.romb(-m_sigma, m_sigma);
test_value(result,0.68268948130801355,1.0e-6,"","Gaussian integral is not 0.682689 (difference="+gammalib::str((result-0.68268948130801355))+")");
result = integral.romb(0.0, m_sigma);
test_value(result,0.3413447460687748,1.0e-6,"","Gaussian integral is not 0.341345 (difference="+gammalib::str((result-0.3413447460687748))+")");
}
/***********************************************************************//**
* @brief Main test function.
***************************************************************************/
int main(void)
{
GTestSuites testsuite("GNumerics");
bool was_successful=true;
//Create a test suite
TestGNumerics test;
//Append to the container
testsuite.append(test);
//Run
was_successful=testsuite.run();
//save xml report
testsuite.save("reports/GNumerics.xml");
// Return
return was_successful ? 0:1;
}