111 |
|
std::cerr << "WARNING! RNEMD Type Unknown!\n"; |
112 |
|
} |
113 |
|
|
114 |
+ |
output3DTemp_ = false; |
115 |
+ |
if (simParams->haveRNEMD_outputDimensionalTemperature()) { |
116 |
+ |
output3DTemp_ = simParams->getRNEMD_outputDimensionalTemperature(); |
117 |
+ |
} |
118 |
+ |
|
119 |
|
#ifdef IS_MPI |
120 |
|
if (worldRank == 0) { |
121 |
|
#endif |
122 |
|
|
123 |
|
std::string rnemdFileName; |
119 |
– |
std::string xTempFileName; |
120 |
– |
std::string yTempFileName; |
121 |
– |
std::string zTempFileName; |
124 |
|
switch(rnemdType_) { |
125 |
|
case rnemdKineticSwap : |
126 |
|
case rnemdKineticScale : |
131 |
|
case rnemdPy : |
132 |
|
case rnemdPyScale : |
133 |
|
rnemdFileName = "momemtum.log"; |
132 |
– |
xTempFileName = "temperatureX.log"; |
133 |
– |
yTempFileName = "temperatureY.log"; |
134 |
– |
zTempFileName = "temperatureZ.log"; |
135 |
– |
xTempLog_.open(xTempFileName.c_str()); |
136 |
– |
yTempLog_.open(yTempFileName.c_str()); |
137 |
– |
zTempLog_.open(zTempFileName.c_str()); |
134 |
|
break; |
135 |
|
case rnemdPz : |
136 |
|
case rnemdPzScale : |
141 |
|
} |
142 |
|
rnemdLog_.open(rnemdFileName.c_str()); |
143 |
|
|
144 |
+ |
std::string xTempFileName; |
145 |
+ |
std::string yTempFileName; |
146 |
+ |
std::string zTempFileName; |
147 |
+ |
if (output3DTemp_) { |
148 |
+ |
xTempFileName = "temperatureX.log"; |
149 |
+ |
yTempFileName = "temperatureY.log"; |
150 |
+ |
zTempFileName = "temperatureZ.log"; |
151 |
+ |
xTempLog_.open(xTempFileName.c_str()); |
152 |
+ |
yTempLog_.open(yTempFileName.c_str()); |
153 |
+ |
zTempLog_.open(zTempFileName.c_str()); |
154 |
+ |
} |
155 |
+ |
|
156 |
|
#ifdef IS_MPI |
157 |
|
} |
158 |
|
#endif |
160 |
|
set_RNEMD_exchange_time(simParams->getRNEMD_exchangeTime()); |
161 |
|
set_RNEMD_nBins(simParams->getRNEMD_nBins()); |
162 |
|
midBin_ = nBins_ / 2; |
163 |
+ |
if (simParams->haveRNEMD_binShift()) { |
164 |
+ |
if (simParams->getRNEMD_binShift()) { |
165 |
+ |
zShift_ = 0.5 / (RealType)(nBins_); |
166 |
+ |
} else { |
167 |
+ |
zShift_ = 0.0; |
168 |
+ |
} |
169 |
+ |
} else { |
170 |
+ |
zShift_ = 0.0; |
171 |
+ |
} |
172 |
+ |
//std::cerr << "we have zShift_ = " << zShift_ << "\n"; |
173 |
+ |
//shift slabs by half slab width, might be useful in heterogeneous systems |
174 |
+ |
//set to 0.0 if not using it; can NOT be used in status output yet |
175 |
|
if (simParams->haveRNEMD_logWidth()) { |
176 |
< |
rnemdLogWidth_ = simParams->getRNEMD_logWidth(); |
176 |
> |
set_RNEMD_logWidth(simParams->getRNEMD_logWidth()); |
177 |
> |
/*arbitary rnemdLogWidth_ no checking |
178 |
|
if (rnemdLogWidth_ != nBins_ && rnemdLogWidth_ != midBin_ + 1) { |
179 |
|
std::cerr << "WARNING! RNEMD_logWidth has abnormal value!\n"; |
180 |
|
std::cerr << "Automaically set back to default.\n"; |
181 |
|
rnemdLogWidth_ = nBins_; |
182 |
< |
} |
182 |
> |
}*/ |
183 |
|
} else { |
184 |
< |
rnemdLogWidth_ = nBins_; |
184 |
> |
set_RNEMD_logWidth(nBins_); |
185 |
|
} |
186 |
|
valueHist_.resize(rnemdLogWidth_, 0.0); |
187 |
|
valueCount_.resize(rnemdLogWidth_, 0); |
188 |
|
xTempHist_.resize(rnemdLogWidth_, 0.0); |
189 |
|
yTempHist_.resize(rnemdLogWidth_, 0.0); |
190 |
|
zTempHist_.resize(rnemdLogWidth_, 0.0); |
191 |
+ |
xyzTempCount_.resize(rnemdLogWidth_, 0); |
192 |
|
|
193 |
|
set_RNEMD_exchange_total(0.0); |
194 |
|
if (simParams->haveRNEMD_targetFlux()) { |
224 |
|
rnemdLog_.close(); |
225 |
|
if (rnemdType_ == rnemdKineticScale || rnemdType_ == rnemdPxScale || rnemdType_ == rnemdPyScale) |
226 |
|
std::cerr<< "total root-checking warnings: " << failRootCount_ << "\n"; |
227 |
< |
if (rnemdType_ == rnemdPx || rnemdType_ == rnemdPxScale || rnemdType_ == rnemdPy || rnemdType_ == rnemdPyScale) { |
227 |
> |
if (output3DTemp_) { |
228 |
|
xTempLog_.close(); |
229 |
|
yTempLog_.close(); |
230 |
|
zTempLog_.close(); |
268 |
|
// which bin is this stuntdouble in? |
269 |
|
// wrapped positions are in the range [-0.5*hmat(2,2), +0.5*hmat(2,2)] |
270 |
|
|
271 |
< |
int binNo = int(nBins_ * (pos.z() / hmat(2,2) + 0.5)) % nBins_; |
271 |
> |
int binNo = int(nBins_ * (pos.z() / hmat(2,2) + zShift_ + 0.5)) % nBins_; |
272 |
|
|
273 |
|
|
274 |
|
// if we're in bin 0 or the middleBin |
283 |
|
|
284 |
|
value = mass * (vel[0]*vel[0] + vel[1]*vel[1] + |
285 |
|
vel[2]*vel[2]); |
286 |
+ |
/* |
287 |
|
if (sd->isDirectional()) { |
288 |
|
Vector3d angMom = sd->getJ(); |
289 |
|
Mat3x3d I = sd->getI(); |
299 |
|
+ angMom[1]*angMom[1]/I(1, 1) |
300 |
|
+ angMom[2]*angMom[2]/I(2, 2); |
301 |
|
} |
302 |
< |
} |
302 |
> |
} no exchange of angular momenta |
303 |
> |
*/ |
304 |
|
//make exchangeSum_ comparable between swap & scale |
305 |
|
//temporarily without using energyConvert |
306 |
|
//value = value * 0.5 / PhysicalConstants::energyConvert; |
354 |
|
bool my_min_found = min_found; |
355 |
|
bool my_max_found = max_found; |
356 |
|
|
357 |
< |
// Even if we didn't find a minimum, did someone else? |
358 |
< |
MPI::COMM_WORLD.Allreduce(&my_min_found, &min_found, |
359 |
< |
1, MPI::BOOL, MPI::LAND); |
360 |
< |
|
357 |
> |
// Even if we didn't find a minimum, did someone else? debugging... |
358 |
> |
//MPI::COMM_WORLD.Allreduce(&my_min_found, &min_found, |
359 |
> |
// 1, MPI::BOOL, MPI::LAND); |
360 |
> |
MPI::COMM_WORLD.Allreduce(&my_min_found, &min_found, 1, MPI::BOOL, MPI::LOR); |
361 |
|
// Even if we didn't find a maximum, did someone else? |
362 |
< |
MPI::COMM_WORLD.Allreduce(&my_max_found, &max_found, |
363 |
< |
1, MPI::BOOL, MPI::LAND); |
364 |
< |
|
362 |
> |
//MPI::COMM_WORLD.Allreduce(&my_max_found, &max_found, |
363 |
> |
// 1, MPI::BOOL, MPI::LAND); |
364 |
> |
MPI::COMM_WORLD.Allreduce(&my_max_found, &max_found, 1, MPI::BOOL, MPI::LOR); |
365 |
|
struct { |
366 |
|
RealType val; |
367 |
|
int rank; |
397 |
|
#endif |
398 |
|
|
399 |
|
if (max_found && min_found) { |
400 |
< |
if (min_val< max_val) { |
400 |
> |
if (min_val < max_val) { |
401 |
|
|
402 |
|
#ifdef IS_MPI |
403 |
|
if (max_vals.rank == worldRank && min_vals.rank == worldRank) { |
404 |
|
// I have both maximum and minimum, so proceed like a single |
405 |
|
// processor version: |
406 |
|
#endif |
407 |
< |
// objects to be swapped: velocity & angular velocity |
407 |
> |
// objects to be swapped: velocity ONLY |
408 |
|
Vector3d min_vel = min_sd->getVel(); |
409 |
|
Vector3d max_vel = max_sd->getVel(); |
410 |
|
RealType temp_vel; |
413 |
|
case rnemdKineticSwap : |
414 |
|
min_sd->setVel(max_vel); |
415 |
|
max_sd->setVel(min_vel); |
416 |
+ |
/* |
417 |
|
if (min_sd->isDirectional() && max_sd->isDirectional()) { |
418 |
|
Vector3d min_angMom = min_sd->getJ(); |
419 |
|
Vector3d max_angMom = max_sd->getJ(); |
420 |
|
min_sd->setJ(max_angMom); |
421 |
|
max_sd->setJ(min_angMom); |
422 |
< |
} |
422 |
> |
} no angular momentum exchange |
423 |
> |
*/ |
424 |
|
break; |
425 |
|
case rnemdPx : |
426 |
|
temp_vel = min_vel.x(); |
464 |
|
switch(rnemdType_) { |
465 |
|
case rnemdKineticSwap : |
466 |
|
max_sd->setVel(min_vel); |
467 |
< |
|
467 |
> |
/* |
468 |
|
if (max_sd->isDirectional()) { |
469 |
|
Vector3d min_angMom; |
470 |
|
Vector3d max_angMom = max_sd->getJ(); |
477 |
|
status); |
478 |
|
|
479 |
|
max_sd->setJ(min_angMom); |
480 |
< |
} |
480 |
> |
} no angular momentum exchange |
481 |
> |
*/ |
482 |
|
break; |
483 |
|
case rnemdPx : |
484 |
|
max_vel.x() = min_vel.x(); |
511 |
|
switch(rnemdType_) { |
512 |
|
case rnemdKineticSwap : |
513 |
|
min_sd->setVel(max_vel); |
514 |
< |
|
514 |
> |
/* |
515 |
|
if (min_sd->isDirectional()) { |
516 |
|
Vector3d min_angMom = min_sd->getJ(); |
517 |
|
Vector3d max_angMom; |
524 |
|
status); |
525 |
|
|
526 |
|
min_sd->setJ(max_angMom); |
527 |
< |
} |
527 |
> |
} no angular momentum exchange |
528 |
> |
*/ |
529 |
|
break; |
530 |
|
case rnemdPx : |
531 |
|
min_vel.x() = max_vel.x(); |
598 |
|
// which bin is this stuntdouble in? |
599 |
|
// wrapped positions are in the range [-0.5*hmat(2,2), +0.5*hmat(2,2)] |
600 |
|
|
601 |
< |
int binNo = int(nBins_ * (pos.z() / hmat(2,2) + 0.5)) % nBins_; |
601 |
> |
int binNo = int(nBins_ * (pos.z() / hmat(2,2) + zShift_ + 0.5)) % nBins_; |
602 |
|
|
603 |
|
// if we're in bin 0 or the middleBin |
604 |
|
if (binNo == 0 || binNo == midBin_) { |
804 |
|
+ fastpow(r1 * r1 / r2 / r2 - Kcz/Kcx, 2); |
805 |
|
break; |
806 |
|
case rnemdPzScale : |
807 |
+ |
diff = fastpow(1.0 - r1, 2) + fastpow(1.0 - r2, 2) |
808 |
+ |
+ fastpow(r1 * r1 / r2 / r2 - Kcy/Kcx, 2); |
809 |
|
default : |
810 |
|
break; |
811 |
|
} |
909 |
|
StuntDouble* sd; |
910 |
|
int idx; |
911 |
|
|
912 |
+ |
// alternative approach, track all molecules instead of only those selected for scaling/swapping |
913 |
+ |
//SimInfo::MoleculeIterator miter; |
914 |
+ |
//std::vector<StuntDouble*>::iterator iiter; |
915 |
+ |
//Molecule* mol; |
916 |
+ |
//StuntDouble* integrableObject; |
917 |
+ |
//for (mol = info_->beginMolecule(miter); mol != NULL; |
918 |
+ |
// mol = info_->nextMolecule(miter)) |
919 |
+ |
// integrableObject is essentially sd |
920 |
+ |
//for (integrableObject = mol->beginIntegrableObject(iiter); |
921 |
+ |
// integrableObject != NULL; |
922 |
+ |
// integrableObject = mol->nextIntegrableObject(iiter)) |
923 |
|
for (sd = seleMan_.beginSelected(selei); sd != NULL; |
924 |
|
sd = seleMan_.nextSelected(selei)) { |
925 |
|
|
935 |
|
// which bin is this stuntdouble in? |
936 |
|
// wrapped positions are in the range [-0.5*hmat(2,2), +0.5*hmat(2,2)] |
937 |
|
|
938 |
< |
int binNo = int(nBins_ * (pos.z() / hmat(2,2) + 0.5)) % nBins_; |
939 |
< |
|
938 |
> |
int binNo = int(rnemdLogWidth_ * (pos.z() / hmat(2,2) + 0.5)) % |
939 |
> |
rnemdLogWidth_; |
940 |
> |
/* no symmetrization allowed due to arbitary rnemdLogWidth_ value |
941 |
|
if (rnemdLogWidth_ == midBin_ + 1) |
942 |
|
if (binNo > midBin_) |
943 |
|
binNo = nBins_ - binNo; |
944 |
< |
|
944 |
> |
*/ |
945 |
|
RealType mass = sd->getMass(); |
946 |
|
Vector3d vel = sd->getVel(); |
947 |
|
RealType value; |
982 |
|
case rnemdPxScale : |
983 |
|
value = mass * vel[0]; |
984 |
|
valueCount_[binNo]++; |
943 |
– |
xVal = mass * vel.x() * vel.x() / PhysicalConstants::energyConvert |
944 |
– |
/ PhysicalConstants::kb; |
945 |
– |
yVal = mass * vel.y() * vel.y() / PhysicalConstants::energyConvert |
946 |
– |
/ PhysicalConstants::kb; |
947 |
– |
zVal = mass * vel.z() * vel.z() / PhysicalConstants::energyConvert |
948 |
– |
/ PhysicalConstants::kb; |
949 |
– |
xTempHist_[binNo] += xVal; |
950 |
– |
yTempHist_[binNo] += yVal; |
951 |
– |
zTempHist_[binNo] += zVal; |
985 |
|
break; |
986 |
|
case rnemdPy : |
987 |
|
case rnemdPyScale : |
990 |
|
break; |
991 |
|
case rnemdPz : |
992 |
|
case rnemdPzScale : |
993 |
< |
value = mass * vel[2]; |
993 |
> |
value = pos.z(); //temporarily for homogeneous systems ONLY |
994 |
|
valueCount_[binNo]++; |
995 |
|
break; |
996 |
|
case rnemdUnknown : |
997 |
|
default : |
998 |
+ |
value = 1.0; |
999 |
+ |
valueCount_[binNo]++; |
1000 |
|
break; |
1001 |
|
} |
1002 |
|
valueHist_[binNo] += value; |
968 |
– |
} |
1003 |
|
|
1004 |
+ |
if (output3DTemp_) { |
1005 |
+ |
xVal = mass * vel.x() * vel.x() / PhysicalConstants::energyConvert |
1006 |
+ |
/ PhysicalConstants::kb; |
1007 |
+ |
yVal = mass * vel.y() * vel.y() / PhysicalConstants::energyConvert |
1008 |
+ |
/ PhysicalConstants::kb; |
1009 |
+ |
zVal = mass * vel.z() * vel.z() / PhysicalConstants::energyConvert |
1010 |
+ |
/ PhysicalConstants::kb; |
1011 |
+ |
xTempHist_[binNo] += xVal; |
1012 |
+ |
yTempHist_[binNo] += yVal; |
1013 |
+ |
zTempHist_[binNo] += zVal; |
1014 |
+ |
xyzTempCount_[binNo]++; |
1015 |
+ |
} |
1016 |
+ |
} |
1017 |
|
} |
1018 |
|
|
1019 |
|
void RNEMD::getStarted() { |
1020 |
+ |
collectData(); |
1021 |
+ |
/* now should be able to output profile in step 0, but might not be useful |
1022 |
|
Snapshot* currentSnap_ = info_->getSnapshotManager()->getCurrentSnapshot(); |
1023 |
|
Stats& stat = currentSnap_->statData; |
1024 |
|
stat[Stats::RNEMD_EXCHANGE_TOTAL] = exchangeSum_; |
1025 |
+ |
*/ |
1026 |
+ |
getStatus(); |
1027 |
|
} |
1028 |
|
|
1029 |
|
void RNEMD::getStatus() { |
1045 |
|
rnemdLogWidth_, MPI::REALTYPE, MPI::SUM); |
1046 |
|
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &valueCount_[0], |
1047 |
|
rnemdLogWidth_, MPI::INT, MPI::SUM); |
1048 |
< |
if (rnemdType_ == rnemdPx || rnemdType_ == rnemdPxScale) { |
1048 |
> |
if (output3DTemp_) { |
1049 |
|
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &xTempHist_[0], |
1050 |
|
rnemdLogWidth_, MPI::REALTYPE, MPI::SUM); |
1051 |
|
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &yTempHist_[0], |
1052 |
|
rnemdLogWidth_, MPI::REALTYPE, MPI::SUM); |
1053 |
|
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &zTempHist_[0], |
1054 |
|
rnemdLogWidth_, MPI::REALTYPE, MPI::SUM); |
1055 |
+ |
MPI::COMM_WORLD.Allreduce(MPI::IN_PLACE, &xyzTempCount_[0], |
1056 |
+ |
rnemdLogWidth_, MPI::INT, MPI::SUM); |
1057 |
|
} |
1058 |
|
// If we're the root node, should we print out the results |
1059 |
|
int worldRank = MPI::COMM_WORLD.Get_rank(); |
1064 |
|
rnemdLog_ << "\t" << valueHist_[j] / (RealType)valueCount_[j]; |
1065 |
|
} |
1066 |
|
rnemdLog_ << "\n"; |
1067 |
< |
if (rnemdType_ == rnemdPx || rnemdType_ == rnemdPxScale ) { |
1067 |
> |
if (output3DTemp_) { |
1068 |
|
xTempLog_ << time; |
1069 |
|
for (j = 0; j < rnemdLogWidth_; j++) { |
1070 |
< |
xTempLog_ << "\t" << xTempHist_[j] / (RealType)valueCount_[j]; |
1070 |
> |
xTempLog_ << "\t" << xTempHist_[j] / (RealType)xyzTempCount_[j]; |
1071 |
|
} |
1072 |
|
xTempLog_ << "\n"; |
1073 |
|
yTempLog_ << time; |
1074 |
|
for (j = 0; j < rnemdLogWidth_; j++) { |
1075 |
< |
yTempLog_ << "\t" << yTempHist_[j] / (RealType)valueCount_[j]; |
1075 |
> |
yTempLog_ << "\t" << yTempHist_[j] / (RealType)xyzTempCount_[j]; |
1076 |
|
} |
1077 |
|
yTempLog_ << "\n"; |
1078 |
|
zTempLog_ << time; |
1079 |
|
for (j = 0; j < rnemdLogWidth_; j++) { |
1080 |
< |
zTempLog_ << "\t" << zTempHist_[j] / (RealType)valueCount_[j]; |
1080 |
> |
zTempLog_ << "\t" << zTempHist_[j] / (RealType)xyzTempCount_[j]; |
1081 |
|
} |
1082 |
|
zTempLog_ << "\n"; |
1083 |
|
} |
1088 |
|
valueCount_[j] = 0; |
1089 |
|
valueHist_[j] = 0.0; |
1090 |
|
} |
1091 |
< |
if (rnemdType_ == rnemdPx || rnemdType_ == rnemdPxScale) |
1091 |
> |
if (output3DTemp_) |
1092 |
|
for (j = 0; j < rnemdLogWidth_; j++) { |
1093 |
|
xTempHist_[j] = 0.0; |
1094 |
|
yTempHist_[j] = 0.0; |
1095 |
|
zTempHist_[j] = 0.0; |
1096 |
+ |
xyzTempCount_[j] = 0; |
1097 |
|
} |
1098 |
|
} |
1099 |
|
} |