portelli/Grid
1
0
Fork 0
mirror of https://github.com/paboyle/Grid.git synced 2026-08-16 07:29:35 +01:00
Code Releases Activity

no compil patches

Browse Source
This commit is contained in:
Peter Boyle
2026-08-14 18:21:13 -04:00
parent c22473f15d
commit 3ec90803ac
2 changed files with 13 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tests/debug/Test_schur_dense_coarse.cc
+3 -1
View File
@@ -223,7 +223,9 @@ int main (int argc, char ** argv)
Lexicographic::CoorFromIndex(gci, gsi, Coarse5d->GlobalDimensions());
csobj si;
peekSite(si, Me, gci);
eA(i,j) = ((ComplexD *)&si)[bi];
// Explicit re/im at the thrust/std boundary (HIP builds)
ComplexD zz = ((ComplexD *)&si)[bi];
eA(i,j) = std::complex<double>(zz.real(), zz.imag());
}
}
Eigen::JacobiSVD<Eigen::MatrixXcd> svd(eA);
tests/debug/Test_schur_inverse.cc
+10 -4
View File
@@ -640,13 +640,19 @@ int main (int argc, char ** argv)
for(int64_t d=0; d<b; d++) Aglob[(uint64_t)(d + d*N)] += ComplexD(bshift,0.0);
}
// Eigen fp64 oracle
// Eigen fp64 oracle. Explicit re/im conversion at the boundary:
// on HIP builds ComplexD is thrust::complex, which has no
// operators against Eigen's std::complex.
auto toStd = [](const ComplexD &z) -> std::complex<double>
{
return std::complex<double>(z.real(), z.imag());
};
Eigen::MatrixXcd eA(N,N);
for(int64_t j=0; j<N; j++)
{
for(int64_t i=0; i<N; i++)
{
eA(i,j) = Aglob[(uint64_t)(i + j*N)];
eA(i,j) = toStd(Aglob[(uint64_t)(i + j*N)]);
}
}
Eigen::MatrixXcd Xref = eA.inverse();
@@ -709,8 +715,8 @@ int main (int argc, char ** argv)
{
for(int64_t i=0; i<N; i++)
{
maxref = std::max(maxref, abs(Xref(i,j)));
maxdif = std::max(maxdif, abs(Xfull[(uint64_t)(i + j*N)] - Xref(i,j)));
maxref = std::max(maxref, std::abs(Xref(i,j)));
maxdif = std::max(maxdif, std::abs(toStd(Xfull[(uint64_t)(i + j*N)]) - Xref(i,j)));
}
}
double cert2 = maxdif / maxref;