Home
last modified time | relevance | path

Searched refs:ranatm (Results 1 – 1 of 1) sorted by relevance

/dports/science/tinker/tinker/source/
H A Dxyzedit.f1912 integer ncopy,ranatm local
2085 ranatm = int(rand*dble(n)) + 1
2089 if (.not. remove(molcule(ranatm))) then
2090 start = imol(1,molcule(ranatm))
2091 stop = imol(2,molcule(ranatm))
2106 weigh = molmass(molcule(ranatm))