32 |
|
|
33 |
|
nAtoms = info->n_atoms; |
34 |
|
integrableObjects = info->integrableObjects; |
35 |
< |
|
35 |
> |
|
36 |
|
// check for constraints |
37 |
|
|
38 |
|
constrainedA = NULL; |
45 |
|
nConstrained = 0; |
46 |
|
|
47 |
|
checkConstraints(); |
48 |
+ |
|
49 |
+ |
for (i=0; i<nMols; i++) |
50 |
+ |
zAngle[i] = 0.0; |
51 |
|
} |
52 |
|
|
53 |
|
template<typename T> Integrator<T>::~Integrator(){ |
163 |
|
double thermalTime = info->thermalTime; |
164 |
|
double resetTime = info->resetTime; |
165 |
|
|
166 |
< |
|
166 |
> |
double difference; |
167 |
|
double currSample; |
168 |
|
double currThermal; |
169 |
|
double currStatus; |
182 |
|
|
183 |
|
readyCheck(); |
184 |
|
|
185 |
+ |
// remove center of mass drift velocity (in case we passed in a configuration |
186 |
+ |
// that was drifting |
187 |
+ |
tStats->removeCOMdrift(); |
188 |
+ |
|
189 |
+ |
// initialize the retraints if necessary |
190 |
+ |
if (info->useThermInt) { |
191 |
+ |
myFF->initRestraints(); |
192 |
+ |
} |
193 |
+ |
|
194 |
|
// initialize the forces before the first step |
195 |
|
|
196 |
|
calcForce(1, 1); |
223 |
|
#endif // is_mpi |
224 |
|
|
225 |
|
while (info->getTime() < runTime && !stopIntegrator()){ |
226 |
< |
if ((info->getTime() + dt) >= currStatus){ |
226 |
> |
difference = info->getTime() + dt - currStatus; |
227 |
> |
if (difference > 0 || fabs(difference) < 1e-4 ){ |
228 |
|
calcPot = 1; |
229 |
|
calcStress = 1; |
230 |
|
} |
257 |
|
|
258 |
|
if (info->getTime() >= currStatus){ |
259 |
|
statOut->writeStat(info->getTime()); |
260 |
+ |
statOut->writeRaw(info->getTime()); |
261 |
|
calcPot = 0; |
262 |
|
calcStress = 0; |
263 |
|
currStatus += statusTime; |
279 |
|
MPIcheckPoint(); |
280 |
|
#endif // is_mpi |
281 |
|
} |
282 |
+ |
|
283 |
+ |
// dump out a file containing the omega values for the final configuration |
284 |
+ |
if (info->useThermInt) |
285 |
+ |
myFF->dumpzAngle(); |
286 |
+ |
|
287 |
|
|
288 |
|
delete dumpOut; |
289 |
|
delete statOut; |