605 |
|
} |
606 |
|
|
607 |
|
|
608 |
< |
void LJ_FF::doForces( void ){ |
608 |
> |
void LJ_FF::doForces( int calcPot ){ |
609 |
|
|
610 |
|
int i; |
611 |
|
double* frc; |
612 |
|
double* pos; |
613 |
< |
short int calcPot = 1; |
613 |
> |
short int passedCalcPot = (short int)calcPot; |
614 |
|
|
615 |
|
// forces are zeroed here, before any are acumulated. |
616 |
|
// NOTE: do not rezero the forces in Fortran. |
622 |
|
frc = Atom::getFrcArray(); |
623 |
|
pos = Atom::getPosArray(); |
624 |
|
|
625 |
< |
doLJfortran( pos, frc, &(entry_plug->lrPot), &calcPot ); |
625 |
> |
// entry_plug->lrPot = -1; |
626 |
> |
doLJfortran( pos, frc, &(entry_plug->lrPot), &passedCalcPot ); |
627 |
> |
|
628 |
> |
|
629 |
> |
// fprintf( stderr, |
630 |
> |
// "lrPot = %lf\n", entry_plug->lrPot ); |
631 |
> |
|
632 |
|
} |
633 |
|
|
634 |
|
void LJ_FF::initFortran( void ){ |