Searched refs:uizp (Results 1 – 2 of 2) sorted by relevance
| /dports/science/tinker/tinker/source/ |
| H A D | epolar2.f | 229 real*8 uixp,uiyp,uizp local
376 uizp = uinp(3,ii)
545 uirp = uixp*xr + uiyp*yr + uizp*zr
679 tkz3 = psr3*uiz + dsr3*uizp
707 tkz5 = 2.0d0 * (psr5*uiz+dsr5*uizp)
968 & - tkxx*uixp - tkxy*uiyp - tkxz*uizp
970 & - tkxy*uixp - tkyy*uiyp - tkyz*uizp
1432 uizp = uinp(3,ii)
1606 uirp = uixp*xr + uiyp*yr + uizp*zr
1740 tkz3 = psr3*uiz + dsr3*uizp
[all …]
|
| H A D | epolar1.f | 109 real*8 uixp,uiyp,uizp local
256 uizp = uinp(3,ii)
558 tkz3 = psr3*uiz + dsr3*uizp
1327 uizp = uinp(3,ii)
2557 real*8 uixp,uiyp,uizp local
2719 uizp = uinp(3,ii)
4181 real*8 uixp,uiyp,uizp local
4304 uizp = uinp(3,ii)
5474 uizp = uinp(3,ii)
7041 real*8 uixp,uiyp,uizp local
[all …]
|