Searched refs:rr9ik (Results 1 – 4 of 4) sorted by relevance
| /dports/science/tinker/tinker/source/ |
| H A D | empole3.f | 89 real*8 rr7ik,rr9ik local
293 rr9ik = dmpik(9)*rr9
299 & + term4ik*rr7ik + term5ik*rr9ik
502 rr9ik = dmpik(9)*rr9
627 real*8 rr7ik,rr9ik local
841 rr9ik = dmpik(9)*rr9
1100 real*8 rr7ik,rr9ik local
1276 rr9ik = dmpik(9)*rr9
1508 rr9ik = dmpik(9)*rr9
1798 real*8 rr7ik,rr9ik local
[all …]
|
| H A D | empole.f | 82 real*8 rr7ik,rr9ik local
269 rr9ik = dmpik(9)*rr9
275 & + term4ik*rr7ik + term5ik*rr9ik
452 rr9ik = dmpik(9)*rr9
545 real*8 rr7ik,rr9ik local
743 rr9ik = dmpik(9)*rr9
749 & + term4ik*rr7ik + term5ik*rr9ik
951 real*8 rr7ik,rr9ik local
1117 rr9ik = dmpe(9) - (1.0d0-scalek*dmpik(9))*rr9
1303 & + term4ik*rr7ik + term5ik*rr9ik
[all …]
|
| H A D | empole1.f | 86 real*8 rr7ik,rr9ik,rr11ik local
370 rr9ik = dmpik(9)*rr9
389 & -dkr*rr7ik+qkr*rr9ik)
391 & +dir*rr7ik+qir*rr9ik)
740 rr9ik = dmpik(9)*rr9
759 & -dkr*rr7ik+qkr*rr9ik)
761 & +dir*rr7ik+qir*rr9ik)
1054 real*8 rr7ik,rr9ik,rr11ik local
1349 rr9ik = dmpik(9)*rr9
1903 real*8 rr7ik,rr9ik,rr11ik local
[all …]
|
| H A D | empole2.f | 196 real*8 rr9ik,rr11ik local
481 rr9ik = dmpik(9)*rr9
483 de = term1*rr3 + term4ik*rr9ik + term5ik*rr11ik
493 & -dkr*rr7ik+qkr*rr9ik)
495 & +dir*rr7ik+qir*rr9ik)
814 rr9ik = dmpik(9)*rr9
816 de = term1*rr3 + term4ik*rr9ik + term5ik*rr11ik
826 & -dkr*rr7ik+qkr*rr9ik)
828 & +dir*rr7ik+qir*rr9ik)
|