solver_CGNE.cpp

Go to the documentation of this file.

 
#include "solver_CGNE.h"
using Bridge::vout;
 
#ifdef USE_FACTORY_AUTOREGISTER
namespace {
  bool init = Solver_CGNE::register_factory();
}
#endif
 
const std::string Solver_CGNE::class_name = "Solver_CGNE";
 
//====================================================================
void Solver_CGNE::set_parameters(const Parameters& params)
{
  return this->Solver_CG::set_parameters(params);
}
 
 
//====================================================================
void Solver_CGNE::get_parameters(Parameters& params) const
{
  return this->Solver_CG::get_parameters(params);
}
 
 
//====================================================================
void Solver_CGNE::solve(Field& xq, const Field& b, int& Nconv, double& diff)
{
  Fopr              *fopr     = this->Solver_CG::get_fopr();
  const std::string mode_prev = fopr->get_mode();
 
  vout.detailed(m_vl, "%s: solver starts\n", class_name.c_str());
 
  if (mode_prev == "DdagD") {
    this->Solver_CG::solve(xq, b, Nconv, diff);  // fallback to CG solver
    return;
  }
 
  if (!((mode_prev == "D") || (mode_prev == "Ddag"))) {
    vout.crucial(m_vl, "Error at %s: unsupported mode for fopr %s.",
                 class_name.c_str(), mode_prev.c_str());
    exit(EXIT_FAILURE);
  }
 
#pragma omp barrier
#pragma omp master
  {
    if ((m_y.nin() != b.nin()) || (m_y.nvol() != b.nvol()) ||
        (m_y.nex() != b.nex())) {
      m_y.reset(b.nin(), b.nvol(), b.nex());
    }
  }
#pragma omp barrier
 
  // moved to outside the master region [21 Dec 2021 H.M.]
  if (mode_prev == "D") {
    fopr->set_mode("DDdag");
  } else if (mode_prev == "Ddag") {
    fopr->set_mode("DdagD");
  }
 
  this->Solver_CG::solve(m_y, b, Nconv, diff);
 
#pragma omp barrier
//#pragma omp master
  {
    fopr->set_mode(mode_prev);
  }
#pragma omp barrier
 
  fopr->mult_dag(xq, m_y);  // xq = fopr->mult_dag(y);
 
#pragma omp barrier
}
 
 
//====================================================================
double Solver_CGNE::flop_count()
{
  const int NPE = CommonParameters::NPE();
 
  const double gflop_fopr = this->Solver_CG::get_fopr()->flop_count();
 
  if (gflop_fopr < CommonParameters::epsilon_criterion()) {
    vout.crucial(m_vl, "Warning at %s: no fopr->flop_count() is available, setting flop = 0\n", class_name.c_str());
    return 0.0;
  }
 
  const double gflop_solver = this->Solver_CG::flop_count();
 
  const double gflop = gflop_solver + gflop_fopr;
 
  return gflop;
}
 
 
//====================================================================
//============================================================END=====