35 namespace Test_Mult_eo {
44 int mult(
const std::string&);
49 return mult(
"test_Mult_Clover_eo.yaml");
55 return mult(
"test_Mult_Wilson_eo.yaml");
59 #ifdef USE_TESTMANAGER_AUTOREGISTER
61 #if defined(USE_GROUP_SU2)
78 int mult(
const std::string& filename_input)
95 const string str_gconf_status = params_test.
get_string(
"gauge_config_status");
96 const string str_gconf_read = params_test.
get_string(
"gauge_config_type_input");
97 const string readfile = params_test.
get_string(
"config_filename_input");
98 const string str_rand_type = params_test.
get_string(
"random_number_type");
99 const unsigned long seed = params_test.
get_unsigned_long(
"seed_for_random_number");
100 const int Nmult = params_test.
get_int(
"number_of_mult");
101 const string str_vlevel = params_test.
get_string(
"verbose_level");
103 const bool do_check = params_test.
is_set(
"expected_result");
104 const double expected_result = do_check ? params_test.
get_double(
"expected_result") : 0.0;
105 const double tolerance = params_test.
get_double(
"tolerance");
107 const string str_fopr_type = params_fopr.
get_string(
"fermion_type");
108 const string str_gmset_type = params_fopr.
get_string(
"gamma_matrix_type");
113 vout.
general(vl,
" gconf_status = %s\n", str_gconf_status.c_str());
114 vout.
general(vl,
" gconf_read = %s\n", str_gconf_read.c_str());
115 vout.
general(vl,
" readfile = %s\n", readfile.c_str());
116 vout.
general(vl,
" rand_type = %s\n", str_rand_type.c_str());
119 vout.
general(vl,
" vlevel = %s\n", str_vlevel.c_str());
120 vout.
general(vl,
" gmset_type = %s\n", str_gmset_type.c_str());
138 if (str_gconf_status ==
"Continue") {
140 }
else if (str_gconf_status ==
"Cold_start") {
142 }
else if (str_gconf_status ==
"Hot_start") {
145 vout.
crucial(vl,
"Error at %s: unsupported gconf status \"%s\"\n",
test_name.c_str(), str_gconf_status.c_str());
169 Field be(Nin, Nvol / 2, Nex);
170 Field ye(Nin, Nvol / 2, Nex);
182 for (
int i = 0; i < Nmult; ++i) {
198 double result_single = 0.0;
201 result_single = ye.
norm();
204 vout.
crucial(
"%s: result(multithread) not equal to result(single thread)\n",
test_name.c_str());
214 double gflo_mult = fopr->
flop_count() / 1.0e+9;
215 double gflops_mult = gflo_mult * Nmult / (elapse_sec * NPE * Nthread);
225 int verify_test =
Test::verify(result, expected_result, tolerance);
227 if ((thread_test == 0) && (verify_test == 0)) {
233 vout.
detailed(vl,
"check skipped: expected_result not set.\n\n");
void detailed(const char *format,...)
void set(const int jin, const int site, const int jex, double v)
int mult(const std::string &)
double elapsed_sec() const
void general(const char *format,...)
virtual void set_config(Field *)=0
setting pointer to the gauge configuration.
Container of Field-type object.
int get_int(const string &key) const
Wilson-type fermion field.
Parameters lookup(const string &key) const
static bool RegisterTest(const std::string &key, const Test_function func)
static bool initialize(const std::string &rng_type, unsigned long seed)
void read(Field_G *U, const string &filename=string())
unsigned long get_unsigned_long(const string &key) const
double get_double(const string &key) const
virtual double flop_count()
returns the flops per site.
const std::string test_name
virtual void set_parameters(const Parameters &)=0
static int get_num_threads_available()
returns number of threads (works outside of parallel region).
int non_NULL(const std::string v)
bool is_set(const string &key) const
void crucial(const char *format,...)
static void read(const std::string ¶ms_file, Parameters ¶ms)
int verify(const double result, const double expected, double eps)
virtual void mult(Field &, const Field &)=0
multiplies fermion operator to a given field (2nd argument)
virtual void set_mode(std::string mode)
setting the mode of multiplication if necessary. Default implementation here is just to avoid irrelev...
GaugeConfig class for file I/O of gauge configuration.
string get_string(const string &key) const
static VerboseLevel set_verbose_level(const std::string &str)