Searched refs:dedzi2 (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
244 dedzi2 = si2*termz + termzi
698 hessz(1,i1) = hessz(1,i1) + si1*dtaperx*dedzi2
700 hessz(2,i1) = hessz(2,i1) + si1*dtapery*dedzi2
702 hessz(3,i1) = hessz(3,i1) + si1*dtaperz*dedzi2
704 hessz(1,i2) = hessz(1,i2) + si2*dtaperx*dedzi2
706 hessz(2,i2) = hessz(2,i2) + si2*dtapery*dedzi2
708 hessz(3,i2) = hessz(3,i2) + si2*dtaperz*dedzi2
710 hessz(1,k1) = hessz(1,k1) - sk1*dtaperx*dedzi2
712 hessz(2,k1) = hessz(2,k1) - sk1*dtapery*dedzi2
[all …]
|
| H A D | edipole1.f | 52 real*8 dedxi2,dedyi2,dedzi2 local
172 dedzi2 = si2*termz + termzi
201 dedzi2 = dedzi2*taper + si2*dtaperz
218 ded(3,i2) = ded(3,i2) + dedzi2
359 dedzi2 = si2*termz + termzi
388 dedzi2 = dedzi2*taper + si2*dtaperz
406 ded(3,i2) = ded(3,i2) + dedzi2
|