--- trunk/OOPSE/libmdtools/calc_LJ_FF.F90 2004/01/30 15:01:09 999 +++ trunk/OOPSE/libmdtools/calc_LJ_FF.F90 2004/02/09 14:48:57 1041 @@ -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.16 2004-01-30 15:01:09 chrisfen Exp $, $Date: 2004-01-30 15:01:09 $, $Name: not supported by cvs2svn $, $Revision: 1.16 $ +!! @version $Id: calc_LJ_FF.F90,v 1.17 2004-02-09 14:48:57 chrisfen Exp $, $Date: 2004-02-09 14:48:57 $, $Name: not supported by cvs2svn $, $Revision: 1.17 $ module lj use definitions @@ -92,9 +92,9 @@ contains status = 0 -! LJ_rcut = rcut - ! ATTENTION! This is a hardwiring of rcut! - LJ_rcut = 9.0d0 + LJ_rcut = rcut +!!$ ! ATTENTION! This is a hardwiring of rcut! +!!$ LJ_rcut = 9.0d0 haveCut = .true. if (havePolicy) then