Home
last modified time | relevance | path

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

/dports/science/tinker/tinker/source/
H A Depolar2.f252 real*8 tkx5,tky5,tkz5 local
706 tky5 = 2.0d0 * (psr5*uiy+dsr5*uiyp)
715 tky5 = 2.0d0 * (dsr5k*uiy)
730 dufld(2,k) = dufld(2,k) - xr*tky5 - yr*tkx5
732 dufld(3,k) = dufld(3,k) - yr*tky5 - yr*yr*tukr
735 dufld(5,k) = dufld(5,k) - yr*tkz5 - zr*tky5
1767 tky5 = 2.0d0 * (psr5*uiy+dsr5*uiyp)
1776 tky5 = 2.0d0 * (dsr5k*uiy)
1791 dufld(2,k) = dufld(2,k) - xr*tky5 - yr*tkx5
1793 dufld(3,k) = dufld(3,k) - yr*tky5 - yr*yr*tukr
[all …]
H A Depolar1.f132 real*8 tkx5,tky5,tkz5 local
585 tky5 = 2.0d0 * (psr5*uiy+dsr5*uiyp)
594 tky5 = 2.0d0 * (dsr5k*uiy)
1671 tky5 = 2.0d0 * (dsr5k*uiy)
2580 real*8 tkx5,tky5,tkz5 local
3058 tky5 = 2.0d0 * (dsr5k*uiy)
4204 real*8 tkx5,tky5,tkz5 local
4664 tky5 = 4.0d0 * (rr5k*uiy)
5840 tky5 = 4.0d0 * (rr5k*uiy)
7064 real*8 tkx5,tky5,tkz5 local
[all …]