| 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) |
