Searched refs:dedyi2 (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
243 dedyi2 = si2*termy + termyi
674 hessy(1,i1) = hessy(1,i1) + si1*dtaperx*dedyi2
676 hessy(2,i1) = hessy(2,i1) + si1*dtapery*dedyi2
678 hessy(3,i1) = hessy(3,i1) + si1*dtaperz*dedyi2
680 hessy(1,i2) = hessy(1,i2) + si2*dtaperx*dedyi2
682 hessy(2,i2) = hessy(2,i2) + si2*dtapery*dedyi2
684 hessy(3,i2) = hessy(3,i2) + si2*dtaperz*dedyi2
686 hessy(1,k1) = hessy(1,k1) - sk1*dtaperx*dedyi2
688 hessy(2,k1) = hessy(2,k1) - sk1*dtapery*dedyi2
[all …]
|
| H A D | edipole1.f | 52 real*8 dedxi2,dedyi2,dedzi2 local
171 dedyi2 = si2*termy + termyi
200 dedyi2 = dedyi2*taper + si2*dtapery
217 ded(2,i2) = ded(2,i2) + dedyi2
358 dedyi2 = si2*termy + termyi
387 dedyi2 = dedyi2*taper + si2*dtapery
405 ded(2,i2) = ded(2,i2) + dedyi2
|