| 10 |
|
|
| 11 |
|
#ifdef IS_MPI |
| 12 |
|
#include "mpiBASS.h" |
| 13 |
+ |
#include "mpiSimulation.hpp" |
| 14 |
|
#include "bassDiag.hpp" |
| 15 |
|
#endif |
| 16 |
|
|
| 93 |
|
if( !strcmp( force_field, "TraPPE" ) ) the_ff = new TraPPEFF(); |
| 94 |
|
else if( !strcmp( force_field, "DipoleTest" ) ) the_ff = new DipoleTestFF(); |
| 95 |
|
else if( !strcmp( force_field, "TraPPE_Ex" ) ) the_ff = new TraPPE_ExFF(); |
| 96 |
+ |
else if( !strcmp( force_field, "LJ" ) ) the_ff = new LJ_FF(); |
| 97 |
|
else{ |
| 98 |
|
sprintf( painCave.errMsg, |
| 99 |
|
"SimSetup Error. Unrecognized force field -> %s\n", |
| 189 |
|
if( currentStamp == NULL ){ |
| 190 |
|
sprintf( painCave.errMsg, |
| 191 |
|
"SimSetup error: Component \"%s\" was not found in the " |
| 192 |
< |
"list of declared molecules\n" |
| 192 |
> |
"list of declared molecules\n", |
| 193 |
|
id ); |
| 194 |
|
painCave.isFatal = 1; |
| 195 |
|
simError(); |
| 236 |
|
|
| 237 |
|
// divide the molecules among processors here. |
| 238 |
|
|
| 239 |
< |
mpiSimulation* mpiSim = new mpiSimulation( simnfo ); |
| 239 |
> |
mpiSim = new mpiSimulation( simnfo ); |
| 240 |
|
|
| 241 |
< |
mpiSim->divideLabor(); |
| 241 |
> |
fprintf( stderr, "about to call divideLabour.\n" ); |
| 242 |
> |
|
| 243 |
> |
globalIndex = mpiSim->divideLabor(); |
| 244 |
|
|
| 245 |
+ |
fprintf(stderr, "we're back from divideLabour\n" ); |
| 246 |
+ |
|
| 247 |
|
// set up the local variables |
| 248 |
|
|
| 249 |
|
int localMol, allMol; |
| 317 |
|
simnfo->sr_interactions = the_sris; |
| 318 |
|
simnfo->n_exclude = tot_SRI; |
| 319 |
|
simnfo->excludes = the_excludes; |
| 314 |
– |
|
| 315 |
– |
|
| 316 |
– |
// initialize the arrays |
| 317 |
– |
|
| 318 |
– |
the_ff->setSimInfo( simnfo ); |
| 320 |
|
|
| 320 |
– |
makeAtoms(); |
| 321 |
|
|
| 322 |
– |
if( tot_bonds ){ |
| 323 |
– |
makeBonds(); |
| 324 |
– |
} |
| 325 |
– |
|
| 326 |
– |
if( tot_bends ){ |
| 327 |
– |
makeBends(); |
| 328 |
– |
} |
| 329 |
– |
|
| 330 |
– |
if( tot_torsions ){ |
| 331 |
– |
makeTorsions(); |
| 332 |
– |
} |
| 333 |
– |
|
| 334 |
– |
|
| 322 |
|
// get some of the tricky things that may still be in the globals |
| 323 |
|
|
| 324 |
|
if( simnfo->n_dipoles ){ |
| 391 |
|
#endif // is_mpi |
| 392 |
|
|
| 393 |
|
|
| 394 |
+ |
// initialize the arrays |
| 395 |
|
|
| 396 |
< |
// if( the_globals->haveInitialConfig() ){ |
| 409 |
< |
// InitializeFromFile* fileInit; |
| 410 |
< |
// fileInit = new InitializeFromFile( the_globals->getInitialConfig() ); |
| 396 |
> |
the_ff->setSimInfo( simnfo ); |
| 397 |
|
|
| 398 |
< |
// fileInit->read_xyz( simnfo ); // default velocities on |
| 398 |
> |
makeAtoms(); |
| 399 |
|
|
| 400 |
< |
// delete fileInit; |
| 401 |
< |
// } |
| 402 |
< |
// else{ |
| 400 |
> |
if( tot_bonds ){ |
| 401 |
> |
makeBonds(); |
| 402 |
> |
} |
| 403 |
> |
|
| 404 |
> |
if( tot_bends ){ |
| 405 |
> |
makeBends(); |
| 406 |
> |
} |
| 407 |
> |
|
| 408 |
> |
if( tot_torsions ){ |
| 409 |
> |
makeTorsions(); |
| 410 |
> |
} |
| 411 |
> |
|
| 412 |
> |
|
| 413 |
> |
|
| 414 |
> |
|
| 415 |
> |
|
| 416 |
> |
|
| 417 |
> |
if( the_globals->haveInitialConfig() ){ |
| 418 |
> |
|
| 419 |
> |
InitializeFromFile* fileInit; |
| 420 |
> |
#ifdef IS_MPI // is_mpi |
| 421 |
> |
if( worldRank == 0 ){ |
| 422 |
> |
#endif //is_mpi |
| 423 |
> |
fileInit = new InitializeFromFile( the_globals->getInitialConfig() ); |
| 424 |
> |
#ifdef IS_MPI |
| 425 |
> |
}else fileInit = new InitializeFromFile( NULL ); |
| 426 |
> |
#endif |
| 427 |
> |
fileInit->read_xyz( simnfo ); // default velocities on |
| 428 |
|
|
| 429 |
+ |
delete fileInit; |
| 430 |
+ |
} |
| 431 |
+ |
else{ |
| 432 |
+ |
|
| 433 |
|
#ifdef IS_MPI |
| 434 |
|
|
| 435 |
|
// no init from bass |
| 443 |
|
|
| 444 |
|
initFromBass(); |
| 445 |
|
|
| 446 |
< |
#endif // is_mpi |
| 447 |
< |
|
| 446 |
> |
|
| 447 |
> |
#endif |
| 448 |
> |
} |
| 449 |
> |
|
| 450 |
|
#ifdef IS_MPI |
| 451 |
|
strcpy( checkPointMsg, "Successfully read in the initial configuration" ); |
| 452 |
|
MPIcheckPoint(); |
| 456 |
|
|
| 457 |
|
|
| 458 |
|
|
| 459 |
< |
// } |
| 459 |
> |
|
| 460 |
|
|
| 461 |
|
#ifdef IS_MPI |
| 462 |
|
if( worldRank == 0 ){ |
| 567 |
|
if( the_globals->haveTempSet() ) simnfo->setTemp = the_globals->getTempSet(); |
| 568 |
|
|
| 569 |
|
|
| 570 |
< |
// make the longe range forces and the integrator |
| 570 |
> |
// // make the longe range forces and the integrator |
| 571 |
|
|
| 572 |
< |
new AllLong( simnfo ); |
| 572 |
> |
// new AllLong( simnfo ); |
| 573 |
|
|
| 574 |
< |
if( !strcmp( force_field, "TraPPE" ) ) new Verlet( *simnfo ); |
| 574 |
> |
if( !strcmp( force_field, "TraPPE" ) ) new Verlet( *simnfo, the_ff ); |
| 575 |
|
if( !strcmp( force_field, "DipoleTest" ) ) new Symplectic( simnfo ); |
| 576 |
|
if( !strcmp( force_field, "TraPPE_Ex" ) ) new Symplectic( simnfo ); |
| 577 |
+ |
if( !strcmp( force_field, "LJ" ) ) new Verlet( *simnfo, the_ff ); |
| 578 |
+ |
|
| 579 |
|
} |
| 580 |
|
|
| 581 |
|
void SimSetup::makeAtoms( void ){ |
| 594 |
|
for( j=0; j<components_nmol[i]; j++ ){ |
| 595 |
|
|
| 596 |
|
#ifdef IS_MPI |
| 597 |
< |
if( simnfo->mpiSim->getMyMolStart() <= molIndex && |
| 598 |
< |
molIndex <= simnfo->mpiSim->getMyMolEnd() ){ |
| 597 |
> |
if( mpiSim->getMyMolStart() <= molIndex && |
| 598 |
> |
molIndex <= mpiSim->getMyMolEnd() ){ |
| 599 |
|
#endif // is_mpi |
| 600 |
|
|
| 601 |
|
molStart = index; |
| 649 |
|
} |
| 650 |
|
} |
| 651 |
|
|
| 652 |
+ |
#ifdef IS_MPI |
| 653 |
+ |
for( i=0; i<mpiSim->getMyNlocal(); i++ ) the_atoms[i]->setGlobalIndex( globalIndex[i] ); |
| 654 |
+ |
|
| 655 |
+ |
delete[] globalIndex; |
| 656 |
+ |
|
| 657 |
+ |
mpiSim->mpiRefresh(); |
| 658 |
+ |
#endif //IS_MPI |
| 659 |
+ |
|
| 660 |
|
the_ff->initializeAtoms(); |
| 661 |
|
} |
| 662 |
|
|
| 670 |
|
index = 0; |
| 671 |
|
offset = 0; |
| 672 |
|
molIndex = 0; |
| 673 |
+ |
|
| 674 |
|
for( i=0; i<n_components; i++ ){ |
| 675 |
|
|
| 676 |
|
for( j=0; j<components_nmol[i]; j++ ){ |
| 677 |
|
|
| 678 |
|
#ifdef IS_MPI |
| 679 |
< |
if( simnfo->mpiSim->getMyMolStart() <= molIndex && |
| 680 |
< |
molIndex <= simnfo->mpiSim->getMyMolEnd() ){ |
| 679 |
> |
if( mpiSim->getMyMolStart() <= molIndex && |
| 680 |
> |
molIndex <= mpiSim->getMyMolEnd() ){ |
| 681 |
|
#endif // is_mpi |
| 682 |
|
|
| 683 |
|
for( k=0; k<comp_stamps[i]->getNBonds(); k++ ){ |
| 696 |
|
|
| 697 |
|
#ifdef IS_MPI |
| 698 |
|
} |
| 699 |
< |
#endif is_mpi |
| 699 |
> |
#endif //is_mpi |
| 700 |
|
|
| 701 |
|
molIndex++; |
| 702 |
|
} |
| 720 |
|
for( j=0; j<components_nmol[i]; j++ ){ |
| 721 |
|
|
| 722 |
|
#ifdef IS_MPI |
| 723 |
< |
if( simnfo->mpiSim->getMyMolStart() <= molIndex && |
| 724 |
< |
molIndex <= simnfo->mpiSim->getMyMolEnd() ){ |
| 723 |
> |
if( mpiSim->getMyMolStart() <= molIndex && |
| 724 |
> |
molIndex <= mpiSim->getMyMolEnd() ){ |
| 725 |
|
#endif // is_mpi |
| 726 |
|
|
| 727 |
|
for( k=0; k<comp_stamps[i]->getNBends(); k++ ){ |
| 765 |
|
for( j=0; j<components_nmol[i]; j++ ){ |
| 766 |
|
|
| 767 |
|
#ifdef IS_MPI |
| 768 |
< |
if( simnfo->mpiSim->getMyMolStart() <= molIndex && |
| 769 |
< |
molIndex <= simnfo->mpiSim->getMyMolEnd() ){ |
| 768 |
> |
if( mpiSim->getMyMolStart() <= molIndex && |
| 769 |
> |
molIndex <= mpiSim->getMyMolEnd() ){ |
| 770 |
|
#endif // is_mpi |
| 771 |
|
|
| 772 |
|
for( k=0; k<comp_stamps[i]->getNTorsions(); k++ ){ |