Searched refs:dedxi2 (Results 1 – 2 of 2) sorted by relevance
| /dports/science/tinker/tinker/source/ |
| H A D | edipole2.f | 63 real*8 dedxi2,dedyi2,dedzi2 local
242 dedxi2 = si2*termx + termxi
650 hessx(1,i1) = hessx(1,i1) + si1*dtaperx*dedxi2
652 hessx(2,i1) = hessx(2,i1) + si1*dtapery*dedxi2
654 hessx(3,i1) = hessx(3,i1) + si1*dtaperz*dedxi2
656 hessx(1,i2) = hessx(1,i2) + si2*dtaperx*dedxi2
658 hessx(2,i2) = hessx(2,i2) + si2*dtapery*dedxi2
660 hessx(3,i2) = hessx(3,i2) + si2*dtaperz*dedxi2
662 hessx(1,k1) = hessx(1,k1) - sk1*dtaperx*dedxi2
664 hessx(2,k1) = hessx(2,k1) - sk1*dtapery*dedxi2
[all …]
|
| H A D | edipole1.f | 52 real*8 dedxi2,dedyi2,dedzi2 local
170 dedxi2 = si2*termx + termxi
199 dedxi2 = dedxi2*taper + si2*dtaperx
216 ded(1,i2) = ded(1,i2) + dedxi2
357 dedxi2 = si2*termx + termxi
386 dedxi2 = dedxi2*taper + si2*dtaperx
404 ded(1,i2) = ded(1,i2) + dedxi2
|