# | Line 89 | Line 89 | contains | |
---|---|---|
89 | thisSim%nLRParticles = nLRParticles | |
90 | thisSim%box = box | |
91 | thisSim%rlist = rlist | |
92 | + | thisSIm%rlistsq = rlist * rlist |
93 | thisSim%rcut = rcut | |
94 | thisSim%rcutsq = rcut * rcut | |
95 | thisSim%rcut6 = thisSim%rcutsq * thisSim%rcutsq * thisSim%rcutsq | |
# | Line 252 | Line 253 | contains | |
253 | thisrlist = thisSim%rlist | |
254 | if(present(rlist2)) rlist2 = thisSim%rlistsq | |
255 | ||
256 | + | |
257 | end subroutine getRlist | |
258 | ||
259 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |