mirror of
https://github.com/paboyle/Grid.git
synced 2025-06-14 13:57:07 +01:00
Global edit with change to View usage. autoView() creates a wrapper object that closes the view when scope closes.
This commit is contained in:
@ -98,9 +98,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
thread_foreach( i,mom_v,{
|
||||
Uprime_v[i](mu) =
|
||||
U_v[i](mu)
|
||||
|
@ -100,9 +100,9 @@ int main (int argc, char ** argv)
|
||||
|
||||
// fourth order exponential approx
|
||||
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
|
||||
thread_foreach( i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu)
|
||||
|
@ -110,9 +110,9 @@ int main (int argc, char** argv)
|
||||
PokeIndex<LorentzIndex>(mom, mommu, mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
|
||||
thread_foreach(i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu)
|
||||
|
@ -119,9 +119,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
|
||||
thread_foreach(i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu)
|
||||
|
@ -114,9 +114,9 @@ int main (int argc, char** argv)
|
||||
PokeIndex<LorentzIndex>(mom, mommu, mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
|
||||
thread_foreach(i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu)
|
||||
|
@ -85,9 +85,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
thread_foreach(i,mom_v,{ // exp(pmu dt) * Umu
|
||||
Uprime_v[i](mu) = U_v[i](mu) + mom_v[i](mu)*U_v[i](mu)*dt ;
|
||||
});
|
||||
|
@ -87,9 +87,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto Uprime_v= Uprime.View(CpuWrite);
|
||||
auto U_v = U.View(CpuRead);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
autoView( U_v , U, CpuRead);
|
||||
thread_foreach(i,mom_v,{ // exp(pmu dt) * Umu
|
||||
Uprime_v[i](mu) = U_v[i](mu) + mom_v[i](mu)*U_v[i](mu)*dt ;
|
||||
});
|
||||
|
@ -105,9 +105,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
thread_foreach(i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu)
|
||||
+ mom_v[i](mu)*U_v[i](mu)*dt
|
||||
|
@ -99,9 +99,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
|
||||
thread_foreach(i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu)
|
||||
|
@ -101,9 +101,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
thread_foreach(i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu)
|
||||
+ mom_v[i](mu)*U_v[i](mu)*dt
|
||||
|
@ -112,9 +112,9 @@ int main (int argc, char** argv)
|
||||
PokeIndex<LorentzIndex>(mom, mommu, mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
|
||||
thread_foreach(i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu)
|
||||
|
@ -115,9 +115,9 @@ int main (int argc, char** argv)
|
||||
SU3::GaussianFundamentalLieAlgebraMatrix(RNG4, mommu); // Traceless antihermitian momentum; gaussian in lie alg
|
||||
|
||||
PokeIndex<LorentzIndex>(mom, mommu, mu);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
// fourth order exponential approx
|
||||
thread_foreach( i, mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu) + mom_v[i](mu)*U_v[i](mu)*dt + mom_v[i](mu) *mom_v[i](mu) *U_v[i](mu)*(dt*dt/2.0)
|
||||
|
@ -101,9 +101,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
thread_foreach(i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu)
|
||||
+ mom_v[i](mu)*U_v[i](mu)*dt
|
||||
|
@ -87,9 +87,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
thread_foreach(i,mom_v,{ // exp(pmu dt) * Umu
|
||||
Uprime_v[i](mu) = U_v[i](mu) + mom_v[i](mu)*U_v[i](mu)*dt ;
|
||||
});
|
||||
|
@ -105,9 +105,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
thread_foreach( i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu);
|
||||
Uprime_v[i](mu) += mom_v[i](mu)*U_v[i](mu)*dt ;
|
||||
|
@ -105,9 +105,9 @@ int main(int argc, char **argv)
|
||||
Hmom -= real(sum(trace(mommu * mommu)));
|
||||
PokeIndex<LorentzIndex>(mom, mommu, mu);
|
||||
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
thread_foreach(ss,mom_v,
|
||||
{
|
||||
Uprime_v[ss]._internal[mu] = ProjectOnGroup(Exponentiate(mom_v[ss]._internal[mu], dt, 12) * U_v[ss]._internal[mu]);
|
||||
|
@ -114,9 +114,9 @@ int main (int argc, char ** argv)
|
||||
PokeIndex<LorentzIndex>(mom,mommu,mu);
|
||||
|
||||
// fourth order exponential approx
|
||||
auto mom_v = mom.View(CpuRead);
|
||||
auto U_v = U.View(CpuRead);
|
||||
auto Uprime_v = Uprime.View(CpuWrite);
|
||||
autoView( mom_v, mom, CpuRead);
|
||||
autoView( U_v , U, CpuRead);
|
||||
autoView(Uprime_v, Uprime, CpuWrite);
|
||||
|
||||
thread_foreach(i,mom_v,{
|
||||
Uprime_v[i](mu) = U_v[i](mu)
|
||||
|
Reference in New Issue
Block a user