Searched refs:dtaperx (Results 1 – 4 of 4) sorted by relevance
/dports/science/tinker/tinker/source/ |
H A D | echgdpl2.f | 74 real*8 dtaperx,dtapery,dtaperz local 197 dtaperx = xr * dtaper 451 dtaperx = xr * dtaper 643 & + dtaperx*dedxk1 - sk1*d2taperxx 661 & + dtaperx*dedyk1 - sk1*d2taperxy 679 & + dtaperx*dedzk1 - sk1*d2taperxz 698 & + dtaperx*dedxk2 - sk2*d2taperxx 716 & + dtaperx*dedyk2 - sk2*d2taperxy 734 & + dtaperx*dedzk2 - sk2*d2taperxz 861 dtaperx = xr * dtaper [all …]
|
H A D | edipole2.f | 88 real*8 dtaperx,dtapery,dtaperz local 262 dtaperx = xr * dtaper 577 hessx(1,i1) = hessx(1,i1) + si1*dtaperx*dedxi1 583 hessx(1,i2) = hessx(1,i2) + si2*dtaperx*dedxi1 589 hessx(1,k1) = hessx(1,k1) - sk1*dtaperx*dedxi1 595 hessx(1,k2) = hessx(1,k2) - sk2*dtaperx*dedxi1 601 hessy(1,i1) = hessy(1,i1) + si1*dtaperx*dedyi1 607 hessy(1,i2) = hessy(1,i2) + si2*dtaperx*dedyi1 613 hessy(1,k1) = hessy(1,k1) - sk1*dtaperx*dedyi1 619 hessy(1,k2) = hessy(1,k2) - sk2*dtaperx*dedyi1 [all …]
|
H A D | echgdpl1.f | 53 real*8 dtaperx,dtapery,dtaperz local 174 dtaperx = xr * dtaper 178 dedxi1 = dedxi1*taper - dtaperx 181 dedxk1 = dedxk1*taper + sk1*dtaperx 184 dedxk2 = dedxk2*taper + sk2*dtaperx 327 dtaperx = xr * dtaper 331 dedxi1 = dedxi1*taper - dtaperx 334 dedxk1 = dedxk1*taper + sk1*dtaperx 337 dedxk2 = dedxk2*taper + sk2*dtaperx
|
H A D | edipole1.f | 56 real*8 dtaperx,dtapery,dtaperz local 192 dtaperx = xr * dtaper 196 dedxi1 = dedxi1*taper + si1*dtaperx 199 dedxi2 = dedxi2*taper + si2*dtaperx 202 dedxk1 = dedxk1*taper - sk1*dtaperx 205 dedxk2 = dedxk2*taper - sk2*dtaperx 379 dtaperx = xr * dtaper 383 dedxi1 = dedxi1*taper + si1*dtaperx 386 dedxi2 = dedxi2*taper + si2*dtaperx 389 dedxk1 = dedxk1*taper - sk1*dtaperx [all …]
|