--- trunk/OOPSE/libmdtools/do_Forces.F90 2003/10/30 18:59:20 845 +++ trunk/OOPSE/libmdtools/do_Forces.F90 2003/11/21 19:31:05 872 @@ -4,7 +4,7 @@ !! @author Charles F. Vardeman II !! @author Matthew Meineke -!! @version $Id: do_Forces.F90,v 1.36 2003-10-30 18:59:20 gezelter Exp $, $Date: 2003-10-30 18:59:20 $, $Name: not supported by cvs2svn $, $Revision: 1.36 $ +!! @version $Id: do_Forces.F90,v 1.37 2003-11-21 19:31:05 chrisfen Exp $, $Date: 2003-11-21 19:31:05 $, $Name: not supported by cvs2svn $, $Revision: 1.37 $ module do_Forces use force_globals @@ -444,7 +444,6 @@ contains #ifdef IS_MPI if (update_nlist) then - !! save current configuration, construct neighbor list, !! and calculate forces call saveNeighborList(nlocal, q) @@ -510,7 +509,7 @@ contains #else if (update_nlist) then - + ! save current configuration, contruct neighbor list, ! and calculate forces call saveNeighborList(natoms, q)