run_test.cpp

Go to the documentation of this file.

/*
        @file    run_test.cpp
 
        @brief
 
        @author  Tatsumi Aoyama  (aoym)
                 $LastChangedBy: matufuru $
 
        @date    $LastChangedDate: 2013-04-08 18:00:27 #$
 
        @version $LastChangedRevision: 2695 $
*/
 
//#include "main.h"
#include <cstdlib>
#include "testlist.h"
 
//====================================================================
int run_test()
{
  //- put your exec test here
 
#if defined(USE_GROUP_SU2)
  // Nc=2 is not available.
#else
 
#ifdef USE_TEST_EIGENSOLVER
  Test_Eigensolver::solve();
  Test_Eigensolver_Chebyshev::solve_chebyshev();
  Test_Eigensolver_Clover_SF::solve_SF();
#endif
 
 
#ifdef USE_TEST_FFT
#ifdef USE_FFTWLIB
  Test_FFT::fft();
#endif
#endif
 
 
#ifdef USE_TEST_GAUGE
  Test_Gauge::energy_density();
 
  Test_Gauge::plaquette_lex();
  Test_Gauge::plaquette_eo();
 
  Test_Gauge::shift();
#endif
 
 
#ifdef USE_TEST_GRADIENTFLOW
#if 0
  Test_EnergyMomentumTensor_Gauge::run_test_RK1();
  Test_EnergyMomentumTensor_Gauge::run_test_RK2();
  Test_EnergyMomentumTensor_Gauge::run_test_RK3();
  Test_EnergyMomentumTensor_Gauge::run_test_RK4();
  Test_EnergyMomentumTensor_Gauge::run_test_RK_adaptive();
#endif
 
  Test_GradientFlow::run_test_RK1();
  Test_GradientFlow::run_test_RK2();
  Test_GradientFlow::run_test_RK3();
  Test_GradientFlow::run_test_RK4();
  Test_GradientFlow::run_test_RK_adaptive();
#endif
 
#ifdef USE_TEST_HMC
 
  Test_HMC_Clover::run_test();
  Test_HMC_Clover::run_test_HYP();
  Test_HMC_Clover::update_Nf2_eo();
  Test_HMC_Clover::RHMC_Nf2p1();
  Test_HMC_Clover::RHMC_Nf2p1_eo();
 
  Test_HMC_Clover_Isochemical::update_Nf2();
  Test_HMC_Clover_Isochemical::RHMC_Nf2p1();
 
  Test_HMC_Clover_SF::update_Nf2();
  Test_HMC_Clover_SF::RHMC_Nf2p1();
  Test_HMC_Clover_SF::RHMC_Nf2p1_HYP();
 
  Test_HMC_Domainwall::update_Nf2();
  Test_HMC_Domainwall::update_Nf2_PV();
  Test_HMC_Domainwall::update_Moebius_Nf2_PV();
 
  //Test_HMC_Overlap::leapfrog_Nf2();
  
  Test_HMC_Quenched::leapfrog_Nf0();
  Test_HMC_Quenched::update_Nf0();
 
  Test_HMC_Staggered::update_Nf4_eo();
  Test_HMC_Staggered::update_Nf4_lex();
 
  Test_HMC_Wilson_TwistedMass::update_Nf2();
 
  Test_HMC_Wilson::leapfrog_Nf2();
  Test_HMC_Wilson::update_Nf2();
  Test_HMC_Wilson::update_Nf2_topology_fixing();
 
#endif
 
#ifdef USE_TEST_HOTSTART
  Test_HotStart::determinant();
  Test_HotStart::eigenvalue();
  Test_HotStart::unitary();
#endif
 
 
#ifdef USE_TEST_IO
  Test_IO_Data::test_io_data_text();
 
  Test_IO_GaugeConfig::test_io_gconf_binary();
#ifdef USE_MPI
  Test_IO_GaugeConfig::test_io_gconf_binary_distributed();
  Test_IO_GaugeConfig::test_io_gconf_binary_parallel();
#endif
  Test_IO_GaugeConfig::test_io_gconf_fortran();
  Test_IO_GaugeConfig::test_io_gconf_text();
 
#ifdef USE_LIMELIB
  Test_IO_GaugeConfig::test_io_gconf_ILDG();
#ifdef USE_MPI
  Test_IO_GaugeConfig::test_io_gconf_ILDG_parallel();
#endif
#endif
#endif
 
#ifdef USE_TEST_MULT
  Test_Mult::mult_Clover();
  Test_Mult::mult_CloverGeneral();
  Test_Mult::mult_Clover_Chemical();
  Test_Mult::mult_Wilson_TwistedMass();
  //- NB. test_Mult_Wilson is implemented separately for beginners
  // Test_Mult::mult_Wilson();
  Test_Mult::mult_WilsonGeneral();
  Test_Mult::mult_Wilson_Chemical();
 
  Test_Mult_Domainwall::mult();
 
  Test_Mult_Overlap::mult();
 
  Test_Mult_Wilson::mult();
 
  Test_Mult_eo::mult_Clover_eo();
  Test_Mult_eo::mult_Wilson_eo();
#endif
 
 
#ifdef USE_TEST_POLYAKOVLOOP
  Test_PolyakovLoop::polyakovloop();
#endif
 
 
#ifdef USE_TEST_QUARKNUMSUSCEPT
  Test_QuarkNumSuscept::quark_num_suscept();
#endif
 
 
#ifdef USE_TEST_RANDOMNUMBERS
  Test_RandomNumbers::rand_field_MT19937_Gaussian();
  Test_RandomNumbers::rand_field_MT19937_U1();
  Test_RandomNumbers::rand_field_MT19937_Z2();
 
  Test_RandomNumbers::rand_field_Mseries_Gaussian();
  Test_RandomNumbers::rand_field_Mseries_U1();
  Test_RandomNumbers::rand_field_Mseries_Z2();
 
#ifdef USE_SFMTLIB
  Test_RandomNumbers::rand_field_SFMT_Gaussian();
  Test_RandomNumbers::rand_field_SFMT_U1();
  Test_RandomNumbers::rand_field_SFMT_Z2();
#endif
 
  Test_RandomNumbers_Mseries::uniform_calc_pi();
  Test_RandomNumbers_Mseries::gaussian();
  Test_RandomNumbers_Mseries::test_global();
 
  Test_RandomNumbers_MT19937::uniform_calc_pi();
  Test_RandomNumbers_MT19937::test_global();
 
#ifdef USE_SFMTLIB
  Test_RandomNumbers_SFMT::uniform_calc_pi();
  Test_RandomNumbers_SFMT::test_global();
#endif
#endif
 
 
#ifdef USE_TEST_RATIONAL
  Test_Rational::approx();
  Test_Rational::inverse();
  Test_Rational::smeared_rational();
#endif
 
 
#ifdef USE_TEST_SF_FAFP
  Test_SF_fAfP::boundary_meson_2ptFunction();
#endif
 
 
#ifdef USE_TEST_SOLVER
  Test_Solver_Wilson::solver_BiCGStab_Cmplx();
  Test_Solver_Wilson::solver_BiCGStab_DS_L_Cmplx();
  Test_Solver_Wilson::solver_BiCGStab_IDS_L_Cmplx();
  Test_Solver_Wilson::solver_BiCGStab_L_Cmplx();
  Test_Solver_Wilson::solver_CGNE();
  Test_Solver_Wilson::solver_CGNR();
  Test_Solver_Wilson::solver_GMRES_m_Cmplx();
 
  Test_Solver_Wilson::solver_ShiftCG();
#endif
 
 
#ifdef USE_TEST_SPECTRUM
  // order of call is changed in ver.2.1.3
 
#ifdef USE_MPI
  // these tests run only in single-node environment.
#else
  Test_Spectrum_CRSMatrix::clover_lex();
  //- NB. CRS tests for domainwall and overlap_5d are skipped, because they are time-consuming.
  // Test_Spectrum_CRSMatrix::domainwall();
  // Test_Spectrum_CRSMatrix::overlap_5d();
#endif
 
  Test_Spectrum::hadron_2ptFunction_Clover();
  Test_Spectrum::hadron_2ptFunction_eo_Clover();
  Test_Spectrum::hadron_2ptFunction_eo_withFileIO_Clover();
  Test_Spectrum::hadron_2ptFunction_withFileIO_Clover();
  Test_Spectrum::hadron_2ptFunction_withFileIO_Clover_initial_guess();
 
  Test_Spectrum::hadron_4ptFunction_Clover();  // added in ver.2.1.3
 
  Test_Spectrum::hadron_2ptFunction_CloverGeneral();
  Test_Spectrum::hadron_2ptFunction_withFileIO_CloverGeneral();
 
  Test_Spectrum_Domainwall::hadron_2ptFunction();
 
  Test_Spectrum_NonRelativistic::heavy_heavy_2ptFunction();
 
  Test_Spectrum_Overlap::check_sign();
  Test_Spectrum_Overlap::hadron_2ptFunction();
  //- NB. 5d overlap solver is skipped because of failure on some platform.
  //Test_Spectrum_Overlap::hadron_2ptFunction_5d_solver();
 
  Test_Spectrum_Staggered::hadron_2ptFunction_wallSource();
  Test_Spectrum_Staggered::hadron_2ptFunction_eo_wallSource();
 
  Test_Spectrum_Wilson::hadron_2ptFunction();
 
  //- NB. test_Spectrum_Wilson is implemented separately for beginners
  // Test_Spectrum::hadron_2ptFunction_Wilson();
  //- NB. test_Spectrum_Wilson is implemented separately for beginners
  // Test_Spectrum::hadron_2ptFunction_eo_Wilson();
  //- NB. test_Spectrum_Wilson is implemented separately for beginners
  // Test_Spectrum::hadron_2ptFunction_withFileIO_Wilson();
  //- NB. test_Spectrum_Wilson is implemented separately for beginners
  // Test_Spectrum::hadron_2ptFunction_eo_withFileIO_Wilson();
 
  Test_Spectrum::hadron_2ptFunction_Wilson_ShiftOrigin();
  Test_Spectrum::hadron_2ptFunction_Wilson_WallSource();
 
  Test_Spectrum::hadron_2ptFunction_WilsonGeneral();
  Test_Spectrum::hadron_2ptFunction_withFileIO_WilsonGeneral();
 
  Test_Spectrum::hadron_2ptFunction_Wilson_TwistedMass();
  Test_Spectrum::hadron_2ptFunction_withFileIO_Wilson_TwistedMass();
 
#endif
 
 
#ifdef USE_TEST_TOPOLOGICALCHARGE
  Test_TopologicalCharge::topological_charge();
#endif
 
 
 
#ifdef USE_TEST_WILSONLOOP
  Test_WilsonLoop::wilsonloop();
#endif
 
//- #endif of #if defined(USE_GROUP_SU2)
#endif
 
  return EXIT_SUCCESS;
}