mirror of
				https://github.com/paboyle/Grid.git
				synced 2025-11-04 14:04:32 +00:00 
			
		
		
		
	Fixed single precision compatibility issues
This commit is contained in:
		@@ -181,7 +181,7 @@ void TMeson<FImpl1, FImpl2>::execute(void)
 | 
				
			|||||||
        LatticeCoordinate(coor, mu);
 | 
					        LatticeCoordinate(coor, mu);
 | 
				
			||||||
        ph = ph + p[mu]*coor*((1./(env().getGrid()->_fdimensions[mu])));
 | 
					        ph = ph + p[mu]*coor*((1./(env().getGrid()->_fdimensions[mu])));
 | 
				
			||||||
    }
 | 
					    }
 | 
				
			||||||
    ph = exp(-2*M_PI*i*ph);
 | 
					    ph = exp(-(Real)(2*M_PI)*i*ph);
 | 
				
			||||||
    
 | 
					    
 | 
				
			||||||
    parseGammaString(gammaList);
 | 
					    parseGammaString(gammaList);
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -133,7 +133,7 @@ void TWall<FImpl>::execute(void)
 | 
				
			|||||||
        LatticeCoordinate(coor, mu);
 | 
					        LatticeCoordinate(coor, mu);
 | 
				
			||||||
        ph = ph + p[mu]*coor*((1./(env().getGrid()->_fdimensions[mu])));
 | 
					        ph = ph + p[mu]*coor*((1./(env().getGrid()->_fdimensions[mu])));
 | 
				
			||||||
    }
 | 
					    }
 | 
				
			||||||
    ph = exp(-2*M_PI*i*ph);
 | 
					    ph = exp(-(Real)(2*M_PI)*i*ph);
 | 
				
			||||||
    sliceSum<SitePropagator>(ph*q, prop, Tp);
 | 
					    sliceSum<SitePropagator>(ph*q, prop, Tp);
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -152,7 +152,7 @@ void TSeqGamma<FImpl>::execute(void)
 | 
				
			|||||||
        LatticeCoordinate(coor, mu);
 | 
					        LatticeCoordinate(coor, mu);
 | 
				
			||||||
        ph = ph + p[mu]*coor*((1./(env().getGrid()->_fdimensions[mu])));
 | 
					        ph = ph + p[mu]*coor*((1./(env().getGrid()->_fdimensions[mu])));
 | 
				
			||||||
    }
 | 
					    }
 | 
				
			||||||
    ph = exp(2*M_PI*i*ph);
 | 
					    ph = exp((Real)(2*M_PI)*i*ph);
 | 
				
			||||||
    LatticeCoordinate(t, Tp);
 | 
					    LatticeCoordinate(t, Tp);
 | 
				
			||||||
    src = where((t >= par().tA) and (t <= par().tB), ph*(g*q), 0.*q);
 | 
					    src = where((t >= par().tA) and (t <= par().tB), ph*(g*q), 0.*q);
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -134,7 +134,7 @@ void TWall<FImpl>::execute(void)
 | 
				
			|||||||
        LatticeCoordinate(coor, mu);
 | 
					        LatticeCoordinate(coor, mu);
 | 
				
			||||||
        ph = ph + p[mu]*coor*((1./(env().getGrid()->_fdimensions[mu])));
 | 
					        ph = ph + p[mu]*coor*((1./(env().getGrid()->_fdimensions[mu])));
 | 
				
			||||||
    }
 | 
					    }
 | 
				
			||||||
    ph = exp(2*M_PI*i*ph);
 | 
					    ph = exp((Real)(2*M_PI)*i*ph);
 | 
				
			||||||
    LatticeCoordinate(t, Tp);
 | 
					    LatticeCoordinate(t, Tp);
 | 
				
			||||||
    src = 1.;
 | 
					    src = 1.;
 | 
				
			||||||
    src = where((t == par().tW), src*ph, 0.*src);
 | 
					    src = where((t == par().tW), src*ph, 0.*src);
 | 
				
			||||||
 
 | 
				
			|||||||
		Reference in New Issue
	
	Block a user