Searched refs:uayp (Results 1 – 2 of 2) sorted by relevance
/dports/science/tinker/tinker/source/ |
H A D | epolar2.f | 271 real*8 uaxp(3),uayp(3),uazp(3) local 382 uayp(j) = uap(2,ii,j) 1261 & + tkxx*uaxp(j) + tkxy*uayp(j) 1264 & + tkxy*uaxp(j) + tkyy*uayp(j) 1267 & + tkxz*uaxp(j) + tkyz*uayp(j) 1438 uayp(j) = uap(2,ii,j) 2322 & + tkxx*uaxp(j) + tkxy*uayp(j) 2325 & + tkxy*uaxp(j) + tkyy*uayp(j) 2328 & + tkxz*uaxp(j) + tkyz*uayp(j)
|
H A D | epolar1.f | 156 real*8 uaxp(3),uayp(3),uazp(3) local 262 uayp(j) = uap(2,ii,j) 1140 & + tkxx*uaxp(j) + tkxy*uayp(j) 1333 uayp(j) = uap(2,ii,j) 2604 real*8 uaxp(3),uayp(3),uazp(3) local 2725 uayp(j) = uap(2,ii,j) 4230 real*8 uaxp(3),uayp(3),uazp(3) local 4310 uayp(j) = uap(2,ii,j) 5480 uayp(j) = uap(2,ii,j) 7090 real*8 uaxp(3),uayp(3),uazp(3) local [all …]
|