scnc
/
qmcpack
mirror of https://github.com/QMCPACK/qmcpack.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Debugging broadcasts. 

git-svn-id: https://subversion.assembla.com/svn/qmcdev/trunk@2602 e5b18d87-469d-4833-9cc0-8cdfa06e9491
This commit is contained in:
Ken Esler 2008-04-20 01:06:16 +00:00
parent c3a7a26f10
commit 17ce903212
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/QMCWaveFunctions/EinsplineSetBuilder.cpp
View File

@ -1008,8 +1008,8 @@ namespace qmcplusplus {
twist = TwistAngles[ti];
k = orbitalSet->PrimLattice.k_cart(twist);
double e = SortBands[0].Energy;
fprintf (stderr, " ti=%3d bi=%3d energy=%8.5f k=(%7.4f, %7.4f, %7.4f)\n",
ti, bi, e, k[0], k[1], k[2]);
fprintf (stderr, " ti=%3d bi=%3d energy=%8.5f k=(%7.4f, %7.4f, %7.4f) rank=%d\n",
ti, bi, e, k[0], k[1], k[2], GroupComm->rank());
}
GroupComm->bcast(nx);
GroupComm->bcast(ny);
@ -1042,8 +1042,8 @@ namespace qmcplusplus {
PosType twist, k;
twist = TwistAngles[ti];
k = orbitalSet->PrimLattice.k_cart(twist);
fprintf (stderr, " ti=%3d bi=%3d energy=%8.5f k=(%7.4f, %7.4f, %7.4f)\n",
ti, bi, e, k[0], k[1], k[2]);
fprintf (stderr, " ti=%3d bi=%3d energy=%8.5f k=(%7.4f, %7.4f, %7.4f) rank=%d\n",
ti, bi, e, k[0], k[1], k[2], GroupComm->rank());
string vectorName = OrbitalPath (ti, bi) + "eigenvector";
HDFAttribIO<Array<complex<double>,3> > h_rawData(rawData);