5 |
|
#include "Thermo.hpp" |
6 |
|
#include "ReadWrite.hpp" |
7 |
|
#include "ForceFields.hpp" |
8 |
+ |
#include "ExtendedSystem.hpp" |
9 |
|
#include "simError.h" |
10 |
|
|
11 |
|
extern "C"{ |
31 |
|
|
32 |
|
|
33 |
|
|
34 |
< |
Symplectic::Symplectic( SimInfo* the_entry_plug, ForceFields* the_ff ){ |
34 |
> |
Symplectic::Symplectic( SimInfo* the_entry_plug, ForceFields* the_ff, |
35 |
> |
ExtendedSystem* the_es ){ |
36 |
|
entry_plug = the_entry_plug; |
37 |
|
myFF = the_ff; |
38 |
+ |
myES = the_es; |
39 |
|
isFirst = 1; |
40 |
|
|
41 |
+ |
std::cerr<< "calling symplectic constructor\n"; |
42 |
+ |
|
43 |
|
molecules = entry_plug->molecules; |
44 |
|
nMols = entry_plug->n_mol; |
45 |
|
|
53 |
|
mass = new double[entry_plug->n_atoms]; |
54 |
|
for(int i = 0; i < entry_plug->n_atoms; i++){ |
55 |
|
mass[i] = entry_plug->atoms[i]->getMass(); |
56 |
< |
} |
52 |
< |
|
53 |
< |
|
56 |
> |
} |
57 |
|
|
58 |
|
// check for constraints |
59 |
|
|
164 |
|
double dt2; // half the dt |
165 |
|
|
166 |
|
double vx, vy, vz; // the velocities |
167 |
< |
// double vx2, vy2, vz2; // the square of the velocities |
167 |
> |
double vx2, vy2, vz2; // the square of the velocities |
168 |
|
double rx, ry, rz; // the postitions |
169 |
|
|
170 |
|
double ji[3]; // the body frame angular momentum |
186 |
|
int status_n = (int)( statusTime / dt ); |
187 |
|
int vel_n = (int)( thermalTime / dt ); |
188 |
|
|
189 |
< |
int calcPot; |
189 |
> |
int calcPot, calcStress; |
190 |
|
|
191 |
< |
Thermo *tStats = new Thermo( entry_plug ); |
191 |
> |
Thermo *tStats; |
192 |
> |
StatWriter* e_out; |
193 |
> |
DumpWriter* dump_out; |
194 |
|
|
195 |
< |
StatWriter* e_out = new StatWriter( entry_plug ); |
191 |
< |
DumpWriter* dump_out = new DumpWriter( entry_plug ); |
195 |
> |
std::cerr << "about to call new thermo\n"; |
196 |
|
|
197 |
+ |
tStats = new Thermo( entry_plug ); |
198 |
+ |
e_out = new StatWriter( entry_plug ); |
199 |
+ |
|
200 |
+ |
std::cerr << "calling dumpWriter \n"; |
201 |
+ |
dump_out = new DumpWriter( entry_plug ); |
202 |
+ |
std::cerr << "called dumpWriter \n"; |
203 |
+ |
|
204 |
|
Atom** atoms = entry_plug->atoms; |
205 |
|
DirectionalAtom* dAtom; |
206 |
|
dt2 = 0.5 * dt; |
207 |
|
|
208 |
|
// initialize the forces the before the first step |
209 |
|
|
210 |
< |
myFF->doForces(1,0); |
210 |
> |
myFF->doForces(1,1); |
211 |
|
|
212 |
|
if( entry_plug->setTemp ){ |
213 |
|
|
219 |
|
|
220 |
|
calcPot = 0; |
221 |
|
|
222 |
+ |
if (!strcasecmp( entry_plug->ensemble, "NPT")) { |
223 |
+ |
calcStress = 1; |
224 |
+ |
} else { |
225 |
+ |
calcStress = 0; |
226 |
+ |
} |
227 |
+ |
|
228 |
|
if( n_constrained ){ |
229 |
|
|
230 |
|
double *Rx = new double[nAtoms]; |
241 |
|
|
242 |
|
|
243 |
|
for( tl=0; tl < n_loops; tl++ ){ |
244 |
+ |
|
245 |
+ |
if (!strcasecmp( entry_plug->ensemble, "NVT")) |
246 |
+ |
myES->NoseHooverNVT( dt / 2.0 , tStats->getKinetic() ); |
247 |
|
|
248 |
|
for( j=0; j<nAtoms; j++ ){ |
249 |
|
|
344 |
|
|
345 |
|
// calculate the forces |
346 |
|
|
347 |
< |
myFF->doForces(calcPot, 0); |
347 |
> |
myFF->doForces(calcPot, calcStress); |
348 |
|
|
349 |
|
// move b |
350 |
|
|
409 |
|
} |
410 |
|
} |
411 |
|
|
412 |
+ |
|
413 |
+ |
if (!strcasecmp( entry_plug->ensemble, "NVT")) |
414 |
+ |
myES->NoseHooverNVT( dt / 2.0, tStats->getKinetic() ); |
415 |
+ |
|
416 |
+ |
if (!strcasecmp( entry_plug->ensemble, "NPT") ) |
417 |
+ |
myES->NoseHooverAndersonNPT( dt, |
418 |
+ |
tStats->getKinetic(), |
419 |
+ |
tStats->getPressure()); |
420 |
+ |
|
421 |
|
time = tl + 1; |
422 |
|
|
423 |
|
if( entry_plug->setTemp ){ |
424 |
|
if( !(time % vel_n) ) tStats->velocitize(); |
425 |
|
} |
426 |
|
if( !(time % sample_n) ) dump_out->writeDump( time * dt ); |
427 |
< |
if( !((time+1) % status_n) ) calcPot = 1; |
428 |
< |
if( !(time % status_n) ){ e_out->writeStat( time * dt ); calcPot = 0; } |
427 |
> |
if( !((time+1) % status_n) ) { |
428 |
> |
calcPot = 1; |
429 |
> |
// bitwise masking in case we need it for NPT |
430 |
> |
calcStress = (!strcasecmp(entry_plug->ensemble,"NPT")) && 1; |
431 |
> |
} |
432 |
> |
if( !(time % status_n) ){ |
433 |
> |
e_out->writeStat( time * dt ); |
434 |
> |
calcPot = 0; |
435 |
> |
// bitwise masking in case we need it for NPT |
436 |
> |
calcStress = (!strcasecmp(entry_plug->ensemble,"NPT")) && 0; |
437 |
> |
} |
438 |
|
} |
439 |
|
} |
440 |
|
else{ |
444 |
|
kE = 0.0; |
445 |
|
rot_kE= 0.0; |
446 |
|
trans_kE = 0.0; |
447 |
+ |
|
448 |
+ |
if (!strcasecmp( entry_plug->ensemble, "NVT")) |
449 |
+ |
myES->NoseHooverNVT( dt / 2.0, tStats->getKinetic() ); |
450 |
|
|
451 |
|
for( i=0; i<nAtoms; i++ ){ |
452 |
|
|
535 |
|
|
536 |
|
// calculate the forces |
537 |
|
|
538 |
< |
myFF->doForces(calcPot,0); |
538 |
> |
myFF->doForces(calcPot,calcStress); |
539 |
|
|
540 |
|
for( i=0; i< nAtoms; i++ ){ |
541 |
|
|
552 |
|
atoms[i]->set_vy( vy ); |
553 |
|
atoms[i]->set_vz( vz ); |
554 |
|
|
555 |
< |
// vx2 = vx * vx; |
556 |
< |
// vy2 = vy * vy; |
557 |
< |
// vz2 = vz * vz; |
555 |
> |
vx2 = vx * vx; |
556 |
> |
vy2 = vy * vy; |
557 |
> |
vz2 = vz * vz; |
558 |
|
|
559 |
|
if( atoms[i]->isDirectional() ){ |
560 |
|
|
585 |
|
dAtom->setJx( ji[0] ); |
586 |
|
dAtom->setJy( ji[1] ); |
587 |
|
dAtom->setJz( ji[2] ); |
588 |
< |
} |
588 |
> |
} |
589 |
|
} |
590 |
< |
|
590 |
> |
|
591 |
> |
if (!strcasecmp( entry_plug->ensemble, "NVT")) |
592 |
> |
myES->NoseHooverNVT( dt / 2.0, tStats->getKinetic() ); |
593 |
> |
|
594 |
> |
if (!strcasecmp( entry_plug->ensemble, "NPT") ) |
595 |
> |
myES->NoseHooverAndersonNPT( dt, |
596 |
> |
tStats->getKinetic(), |
597 |
> |
tStats->getPressure()); |
598 |
> |
|
599 |
|
time = tl + 1; |
600 |
|
|
601 |
|
if( entry_plug->setTemp ){ |
602 |
|
if( !(time % vel_n) ) tStats->velocitize(); |
603 |
|
} |
604 |
|
if( !(time % sample_n) ) dump_out->writeDump( time * dt ); |
605 |
< |
if( !((time+1) % status_n) ) calcPot = 1; |
606 |
< |
if( !(time % status_n) ){ e_out->writeStat( time * dt ); calcPot = 0; } |
605 |
> |
if( !((time+1) % status_n) ) { |
606 |
> |
calcPot = 1; |
607 |
> |
// bitwise masking in case we need it for NPT |
608 |
> |
calcStress = (!strcasecmp(entry_plug->ensemble,"NPT")) && 1; |
609 |
> |
} |
610 |
> |
if( !(time % status_n) ){ |
611 |
> |
e_out->writeStat( time * dt ); |
612 |
> |
calcPot = 0; |
613 |
> |
// bitwise masking in case we need it for NPT |
614 |
> |
calcStress = (!strcasecmp(entry_plug->ensemble,"NPT")) && 0; |
615 |
> |
} |
616 |
|
} |
617 |
|
} |
618 |
|
|