Searched refs:tkx3 (Results 1 – 2 of 2) sorted by relevance
/dports/science/tinker/tinker/source/ |
H A D | epolar2.f | 251 real*8 tkx3,tky3,tkz3 local 677 tkx3 = psr3*uix + dsr3*uixp 686 tkx3 = dsr3k*uix 695 ufld(1,k) = ufld(1,k) + tkx3 + xr*tukr 1738 tkx3 = psr3*uix + dsr3*uixp 1747 tkx3 = dsr3k*uix 1756 ufld(1,k) = ufld(1,k) + tkx3 + xr*tukr
|
H A D | epolar1.f | 131 real*8 tkx3,tky3,tkz3 local 556 tkx3 = psr3*uix + dsr3*uixp 565 tkx3 = dsr3k*uix 1642 tkx3 = dsr3k*uix 2579 real*8 tkx3,tky3,tkz3 local 3029 tkx3 = dsr3k*uix 4203 real*8 tkx3,tky3,tkz3 local 4635 tkx3 = 2.0d0*rr3k*uix 5811 tkx3 = 2.0d0*rr3k*uix 7063 real*8 tkx3,tky3,tkz3 local [all …]
|