CHROMA
clover_term_qdp_w.cc
Go to the documentation of this file.
1 /*! \file
2  * \brief Clover term linear operator
3  *
4  * This particular implementation is specific to a scalar-like
5  * architecture
6  */
7 
8 #include "chromabase.h"
10 #include "meas/glue/mesfield.h"
11 
12 
13 namespace Chroma
14 {
15 #if 0
16  // Reader/writers
17  void read(XMLReader& xml, const std::string& path, PrimitiveClovTriang& param)
18  {
19  QDPIO::cerr << __func__ << ": clover term reader not implemented" << std::endl;
20  QDP_abort(1);
21  }
22 
23  void write(XMLWriter& xml, const std::string& path, const PrimitiveClovTriang& d)
24  {
25  xml.openTag(path);
26 
27  XMLWriterAPI::AttributeList alist;
28 
29  xml.openTag("Diag");
30  for(int i=0; i < 2; ++i)
31  {
32  for(int j=0; j < 2*Nc; ++j)
33  {
34  alist.clear();
35  alist.push_back(XMLWriterAPI::Attribute("block", i));
36  alist.push_back(XMLWriterAPI::Attribute("col", j));
37 
38  xml.openTag("elem", alist);
39  xml << d.diag[i][j];
40  xml.closeTag();
41  }
42  }
43  xml.closeTag(); // Diag
44 
45  xml.openTag("Offd");
46  for(int i=0; i < 2; ++i)
47  {
48  for(int j=0; j < 2*Nc*Nc-Nc; ++j)
49  {
50  alist.clear();
51  alist.push_back(XMLWriterAPI::Attribute("block", i));
52  alist.push_back(XMLWriterAPI::Attribute("col", j));
53 
54  xml.openTag("elem", alist);
55  xml << d.offd[i][j];
56  xml.closeTag();
57  }
58  }
59  xml.closeTag(); // Offd
60  xml.closeTag(); // path
61  }
62 #endif
63 
64 
65 
66 } // Namespace Chroma
67 
68 
69 
Primary include file for CHROMA library code.
Clover term linear operator.
void read(XMLReader &xml, const std::string &path, AsqtadFermActParams &param)
Read parameters.
void write(XMLWriter &xml, const std::string &path, const AsqtadFermActParams &param)
Writer parameters.
unsigned j
Definition: ldumul_w.cc:35
Calculates the antihermitian field strength tensor iF(mu,nu)
Asqtad Staggered-Dirac operator.
Definition: klein_gord.cc:10
int i
Definition: pbg5p_w.cc:55
DComplex d
Definition: invbicg.cc:99
::std::string string
Definition: gtest.h:1979