mirror of
				https://github.com/paboyle/Grid.git
				synced 2025-11-03 21:44:33 +00:00 
			
		
		
		
	Precision safe compile
This commit is contained in:
		@@ -139,7 +139,7 @@ int main (int argc, char ** argv)
 | 
			
		||||
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage << " S      "<<S<<std::endl;
 | 
			
		||||
  std::cout << GridLogMessage << " Sprime "<<Sprime<<std::endl;
 | 
			
		||||
 
 | 
			
		||||
@@ -150,7 +150,7 @@ int main (int argc, char ** argv)
 | 
			
		||||
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage << " S      "<<S<<std::endl;
 | 
			
		||||
  std::cout << GridLogMessage << " Sprime "<<Sprime<<std::endl;
 | 
			
		||||
 
 | 
			
		||||
@@ -194,9 +194,9 @@ int main (int argc, char ** argv)
 | 
			
		||||
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  Complex dSm       = sum(dSmom);
 | 
			
		||||
  Complex dSm2      = sum(dSmom2);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSm       = sum(dSmom);
 | 
			
		||||
  ComplexD dSm2      = sum(dSmom2);
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage <<"Initial mom hamiltonian is "<< Hmom <<std::endl;
 | 
			
		||||
 
 | 
			
		||||
@@ -113,7 +113,7 @@ int main (int argc, char ** argv)
 | 
			
		||||
    dS = dS - trace(mommu*UdSdUmu)*dt*2.0;
 | 
			
		||||
 | 
			
		||||
  }
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage << " S      "<<S<<std::endl;
 | 
			
		||||
  std::cout << GridLogMessage << " Sprime "<<Sprime<<std::endl;
 | 
			
		||||
 
 | 
			
		||||
@@ -143,7 +143,7 @@ int main (int argc, char ** argv)
 | 
			
		||||
    dS = dS+trace(mommu*forcemu)*dt;
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
 | 
			
		||||
  // From TwoFlavourPseudoFermion:
 | 
			
		||||
  //////////////////////////////////////////////////////
 | 
			
		||||
 
 | 
			
		||||
@@ -143,7 +143,7 @@ int main (int argc, char ** argv)
 | 
			
		||||
    dS = dS+trace(mommu*forcemu)*dt;
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage << " S      "<<S<<std::endl;
 | 
			
		||||
  std::cout << GridLogMessage << " Sprime "<<Sprime<<std::endl;
 | 
			
		||||
 
 | 
			
		||||
@@ -128,7 +128,7 @@ int main (int argc, char ** argv)
 | 
			
		||||
    dS = dS + trace(mommu*UdSdUmu)*dt*2.0;
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage << " S      "<<S<<std::endl;
 | 
			
		||||
  std::cout << GridLogMessage << " Sprime "<<Sprime<<std::endl;
 | 
			
		||||
 
 | 
			
		||||
@@ -141,7 +141,7 @@ int main (int argc, char ** argv)
 | 
			
		||||
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage << " -- S         "<<S<<std::endl;
 | 
			
		||||
  std::cout << GridLogMessage << " -- Sprime    "<<Sprime<<std::endl;
 | 
			
		||||
 
 | 
			
		||||
@@ -141,7 +141,7 @@ int main (int argc, char ** argv)
 | 
			
		||||
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage << " S      "<<S<<std::endl;
 | 
			
		||||
  std::cout << GridLogMessage << " Sprime "<<Sprime<<std::endl;
 | 
			
		||||
 
 | 
			
		||||
@@ -112,7 +112,7 @@ int main (int argc, char ** argv)
 | 
			
		||||
    dS = dS - trace(mommu*UdSdUmu)*dt*2.0;
 | 
			
		||||
 | 
			
		||||
  }
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage << " S      "<<S<<std::endl;
 | 
			
		||||
  std::cout << GridLogMessage << " Sprime "<<Sprime<<std::endl;
 | 
			
		||||
 
 | 
			
		||||
@@ -178,9 +178,9 @@ int main (int argc, char ** argv)
 | 
			
		||||
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  Complex dSm       = sum(dSmom);
 | 
			
		||||
  Complex dSm2      = sum(dSmom2);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSm       = sum(dSmom);
 | 
			
		||||
  ComplexD dSm2      = sum(dSmom2);
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage <<"Initial mom hamiltonian is "<< Hmom <<std::endl;
 | 
			
		||||
 
 | 
			
		||||
@@ -155,7 +155,7 @@ int main (int argc, char ** argv)
 | 
			
		||||
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  Complex dSpred    = sum(dS);
 | 
			
		||||
  ComplexD dSpred    = sum(dS);
 | 
			
		||||
 | 
			
		||||
  std::cout << GridLogMessage << " S      "<<S<<std::endl;
 | 
			
		||||
  std::cout << GridLogMessage << " Sprime "<<Sprime<<std::endl;
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user