--- trunk/OOPSE/libmdtools/ForceFields.cpp 2003/03/21 17:42:12 378 +++ trunk/OOPSE/libmdtools/ForceFields.cpp 2003/03/24 18:33:51 393 @@ -31,6 +31,10 @@ void ForceFields::doForces( int calcPot, int calcStres entry_plug->atoms[i]->zeroForces(); } + for(i=0; in_SRI; i++ ){ + entry_plug->sr_interactions[i]->calc_forces(); + } + frc = Atom::getFrcArray(); pos = Atom::getPosArray(); trq = Atom::getTrqArray(); @@ -41,6 +45,8 @@ void ForceFields::doForces( int calcPot, int calcStres isError = 0; entry_plug->lrPot = 0.0; + + fortranForceLoop( pos, A, u_l,