forceSmear_HYP_SF.h

Go to the documentation of this file.

#ifndef FORCESMEAR_HYP_SF_INCLUDED
#define FORCESMEAR_HYP_SF_INCLUDED

#include "forceSmear.h"

#include "field_G_SF.h"

#include "shiftField_lex.h"
#include "bridge_complex.h"

#include "projection.h"

#include "bridgeIO.h"
using Bridge::vout;


//- parameters class
class Parameters_ForceSmear_HYP_SF : virtual public Parameters
{
 public:
  Parameters_ForceSmear_HYP_SF();
};
//- end

class ForceSmear_HYP_SF : public ForceSmear
{
 public:
  static const std::string class_name;

 private:
  int                    m_Ndim, m_Nvol;
  double                 m_alpha1, m_alpha2, m_alpha3; // HYP smearing parameters
  Projection             *m_proj;
  std::valarray<Field_G> m_U;
  std::valarray<Field_G> m_v1, m_v2;
  std::valarray<Field_G> m_Sigma3, m_Sigma2;
  std::valarray<Field_G> m_iTheta3, m_iTheta2, m_iTheta1;
  ShiftField_lex         m_shift;

  double m_phi[3];
  double m_phipr[3];

  Field_G_SF set_wk;

 public:

  ForceSmear_HYP_SF(Projection *proj)
    : ForceSmear(), m_proj(proj)
  {
    init();
  }

  //  ~ForceSmear_HYP_SF(){ };

  void set_parameters(const Parameters& params);
  void set_parameters(double alpha1, double alpha2, double alpha3, double *phi, double *phipr);

  void force_udiv(Field_G& Sigma, const Field_G& Sigma_p, const Field_G& U);

  // old interface
  Field force_udiv(const Field_G& Sigma, const Field_G& U);

 private:
  void init();

  void force_step3(Field_G&, const Field_G&);
  void force_step2(Field_G&);
  void force_step1(Field_G&);

  void force_each(Field_G&, const Field_G&, const Field_G&,
                  const Field_G&, const Field_G&, int mu, int nu);

  void smear_step1();
  void smear_step2();

  void staple(Field_G&, const Field_G&, const Field_G&,
              int mu, int nu);

  int idx1(int mu, int nu, int rho)
  {
    int sig = 6 - mu - nu - rho;

    if (sig > mu) --sig;
    return mu + m_Ndim * sig;
  }

  int idx1b(int mu, int nu, int rho)
  {
    if (nu > mu) --nu;
    if (rho > mu) --rho;
    if (rho > nu) --rho;
    return mu + m_Ndim * (nu + (m_Ndim - 1) * rho);
  }

  int idx2(int mu, int nu)
  {
    if (nu > mu) --nu;
    return mu + m_Ndim * nu;
  }

  int size1()
  {
    return m_Ndim * (m_Ndim - 1);
  }

  int size1b()
  {
    return m_Ndim * (m_Ndim - 1) * (m_Ndim - 2);
  }

  int size2()
  {
    return m_Ndim * (m_Ndim - 1);
  }
};
#endif