Searched refs:dedyi1 (Results 1 – 4 of 4) sorted by relevance
/dports/science/tinker/tinker/source/ |
H A D | echgdpl1.f | 49 real*8 dedxi1,dedyi1,dedzi1 local 153 dedyi1 = termy 179 dedyi1 = dedyi1*taper - dtapery 193 decd(2,i1) = decd(2,i1) + dedyi1 306 dedyi1 = termy 332 dedyi1 = dedyi1*taper - dtapery 346 decd(2,i1) = decd(2,i1) + dedyi1
|
H A D | echgdpl2.f | 48 real*8 dedxi1,dedyi1,dedzi1 local 178 dedyi1 = termy 297 hessx(2,i1) = hessx(2,i1) + dtaperx*dedyi1 314 & + dtaperx*dedyi1 + d2taperxy 315 hessy(2,i1) = hessy(2,i1) + dtapery*dedyi1 316 & + dtapery*dedyi1 + d2taperyy 318 & + dtaperz*dedyi1 + d2taperyz 333 hessz(2,i1) = hessz(2,i1) + dtaperz*dedyi1 432 dedyi1 = termy 842 dedyi1 = termy [all …]
|
H A D | edipole2.f | 62 real*8 dedxi1,dedyi1,dedzi1 local 240 dedyi1 = si1*termy - termyi 601 hessy(1,i1) = hessy(1,i1) + si1*dtaperx*dedyi1 603 hessy(2,i1) = hessy(2,i1) + si1*dtapery*dedyi1 605 hessy(3,i1) = hessy(3,i1) + si1*dtaperz*dedyi1 607 hessy(1,i2) = hessy(1,i2) + si2*dtaperx*dedyi1 609 hessy(2,i2) = hessy(2,i2) + si2*dtapery*dedyi1 611 hessy(3,i2) = hessy(3,i2) + si2*dtaperz*dedyi1 613 hessy(1,k1) = hessy(1,k1) - sk1*dtaperx*dedyi1 615 hessy(2,k1) = hessy(2,k1) - sk1*dtapery*dedyi1 [all …]
|
H A D | edipole1.f | 51 real*8 dedxi1,dedyi1,dedzi1 local 168 dedyi1 = si1*termy - termyi 197 dedyi1 = dedyi1*taper + si1*dtapery 214 ded(2,i1) = ded(2,i1) + dedyi1 355 dedyi1 = si1*termy - termyi 384 dedyi1 = dedyi1*taper + si1*dtapery 402 ded(2,i1) = ded(2,i1) + dedyi1
|