Searched refs:tiz3 (Results 1 – 2 of 2) sorted by relevance
| /dports/science/tinker/tinker/source/ |
| H A D | epolar2.f | 249 real*8 tix3,tiy3,tiz3 local
676 tiz3 = psr3*ukz + dsr3*ukzp
685 tiz3 = dsr3i*ukz
694 ufld(3,i) = ufld(3,i) + tiz3 + zr*tuir
1737 tiz3 = psr3*ukz + dsr3*ukzp
1746 tiz3 = dsr3i*ukz
1755 ufld(3,i) = ufld(3,i) + tiz3 + zr*tuir
|
| H A D | epolar1.f | 129 real*8 tix3,tiy3,tiz3 local
555 tiz3 = psr3*ukz + dsr3*ukzp
564 tiz3 = dsr3i*ukz
1641 tiz3 = dsr3i*ukz
2577 real*8 tix3,tiy3,tiz3 local
3028 tiz3 = dsr3i*ukz
4201 real*8 tix3,tiy3,tiz3 local
4634 tiz3 = 2.0d0*rr3i*ukz
5810 tiz3 = 2.0d0*rr3i*ukz
7061 real*8 tix3,tiy3,tiz3 local
[all …]
|