43 |
|
!! Calculates Long Range forces Lennard-Jones interactions. |
44 |
|
!! @author Charles F. Vardeman II |
45 |
|
!! @author Matthew Meineke |
46 |
< |
!! @version $Id: LJ.F90,v 1.14 2005-09-14 19:02:33 gezelter Exp $, $Date: 2005-09-14 19:02:33 $, $Name: not supported by cvs2svn $, $Revision: 1.14 $ |
46 |
> |
!! @version $Id: LJ.F90,v 1.15 2005-09-21 17:20:14 chrisfen Exp $, $Date: 2005-09-21 17:20:14 $, $Name: not supported by cvs2svn $, $Revision: 1.15 $ |
47 |
|
|
48 |
|
|
49 |
|
module lj |
157 |
|
defaultCutoff = thisRcut |
158 |
|
defaultShift = shiftedPot |
159 |
|
haveDefaultCutoff = .true. |
160 |
+ |
call createMixingMap() |
161 |
|
end subroutine setLJDefaultCutoff |
162 |
|
|
163 |
|
subroutine setLJUniformCutoff(thisRcut, shiftedPot) |