Home
last modified time | relevance | path

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

/dports/science/tinker/tinker/source/
H A Depolar2.f271 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 Depolar1.f156 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 …]