Home
last modified time | relevance | path

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

/dports/science/tinker/tinker/source/
H A Dinduce.f5469 real*8 puixs,puiys,puizs local
5567 puizs = uinps(3,ii)
5626 puirs = xr*puixs + yr*puiys + zr*puizs
5651 fkps(3) = rr3*puizs + rr5*puirs*zr
5696 fkps(1) = puixs*gux(2) + puiys*guy(2) + puizs*guz(2)
5697 fkps(2) = puixs*gux(3) + puiys*guy(3) + puizs*guz(3)
5698 fkps(3) = puixs*gux(4) + puiys*guy(4) + puizs*guz(4)
6547 real*8 puixs,puiys,puizs local
6604 puizs = uinps(3,ii)
6660 puirs = xr*puixs + yr*puiys + zr*puizs
[all …]
/dports/science/tinker/tinker/other/
H A Dinduce.no-tarray3660 real*8 puixs,puiys,puizs
4102 real*8 puixs,puiys,puizs
4175 puizs = uinps(3,i)
4237 puirs = xr*puixs + yr*puiys + zr*puizs
4262 fkps(3) = -rr3*puizs + rr5*puirs*zr
4307 fkps(1) = puixs*gux(2) + puiys*guy(2) + puizs*guz(2)
4308 fkps(2) = puixs*gux(3) + puiys*guy(3) + puizs*guz(3)
4996 real*8 puixs,puiys,puizs
5057 puizs = uinps(3,i)
5116 puirs = xr*puixs + yr*puiys + zr*puizs
[all …]