--- trunk/OOPSE/libmdtools/calc_LJ_FF.F90 2004/05/24 21:03:30 1192 +++ trunk/OOPSE/libmdtools/calc_LJ_FF.F90 2004/05/27 00:48:12 1198 @@ -2,7 +2,7 @@ !! Corresponds to the force field defined in lj_FF.cpp !! @author Charles F. Vardeman II !! @author Matthew Meineke -!! @version $Id: calc_LJ_FF.F90,v 1.20 2004-05-24 21:03:24 gezelter Exp $, $Date: 2004-05-24 21:03:24 $, $Name: not supported by cvs2svn $, $Revision: 1.20 $ +!! @version $Id: calc_LJ_FF.F90,v 1.21 2004-05-27 00:48:12 tim Exp $, $Date: 2004-05-27 00:48:12 $, $Name: not supported by cvs2svn $, $Revision: 1.21 $ module lj use definitions @@ -277,8 +277,8 @@ contains #endif #ifdef IS_MPI - id1 = tagRow(atom1) - id2 = tagColumn(atom2) + id1 = AtomRowToGlobal(atom1) + id2 = AtomColToGlobal(atom2) #else id1 = atom1 id2 = atom2