--- trunk/OOPSE/libmdtools/simulation_module.F90 2003/07/15 22:22:41 619 +++ trunk/OOPSE/libmdtools/simulation_module.F90 2003/07/15 22:29:50 620 @@ -88,6 +88,7 @@ contains nGlobal = CnGlobal thisSim = setThisSim + rcut2 = thisSim%rcut * thisSim%rcut rcut6 = rcut2 * rcut2 * rcut2 rlist2 = thisSim%rlist * thisSim%rlist