Home
last modified time | relevance | path

Searched refs:dedzk1 (Results 1 – 4 of 4) sorted by relevance

/dports/science/tinker/tinker/source/
H A Dedipole1.f53 real*8 dedxk1,dedyk1,dedzk1 local
175 dedzk1 = -sk1*termz - termzk
204 dedzk1 = dedzk1*taper - sk1*dtaperz
221 ded(3,k1) = ded(3,k1) + dedzk1
238 & + xq1*dedzk1 + xq2*dedzk2)
241 & + yq1*dedzk1 + yq2*dedzk2)
242 vzz = zq1*dedzk1 + zq2*dedzk2
362 dedzk1 = -sk1*termz - termzk
391 dedzk1 = dedzk1*taper - sk1*dtaperz
410 ded(3,k1) = ded(3,k1) + dedzk1
[all …]
H A Dechgdpl1.f50 real*8 dedxk1,dedyk1,dedzk1 local
157 dedzk1 = -sk1*termz - termzk
183 dedzk1 = dedzk1*taper + sk1*dtaperz
197 decd(3,k1) = decd(3,k1) + dedzk1
215 vzz = zr1*dedzk1 + zr2*dedzk2
310 dedzk1 = -sk1*termz - termzk
336 dedzk1 = dedzk1*taper + sk1*dtaperz
350 decd(3,k1) = decd(3,k1) + dedzk1
369 vzz = zr1*dedzk1 + zr2*dedzk2
H A Dechgdpl2.f49 real*8 dedxk1,dedyk1,dedzk1 local
182 dedzk1 = -sk1*termz + termzk
305 hessx(3,k1) = hessx(3,k1) + dtaperx*dedzk1
323 hessy(3,k1) = hessy(3,k1) + dtapery*dedzk1
341 hessz(3,k1) = hessz(3,k1) + dtaperz*dedzk1
436 dedzk1 = -sk1*termz + termzk
679 & + dtaperx*dedzk1 - sk1*d2taperxz
681 & + dtapery*dedzk1 - sk1*d2taperyz
683 & + dtaperz*dedzk1 - sk1*d2taperzz
846 dedzk1 = -sk1*termz + termzk
[all …]
H A Dedipole2.f64 real*8 dedxk1,dedyk1,dedzk1 local
247 dedzk1 = -sk1*termz - termzk
594 & + si1*dtaperx*dedzk1 - sk1*si1*d2taperxz
618 & + si1*dtapery*dedzk1 - sk1*si1*d2taperyz
642 & + si1*dtaperz*dedzk1 - sk1*si1*d2taperzz
667 & + si2*dtaperx*dedzk1 - sk1*si2*d2taperxz
691 & + si2*dtapery*dedzk1 - sk1*si2*d2taperyz
715 & + si2*dtaperz*dedzk1 - sk1*si2*d2taperzz
885 dedzk1 = -sk1*termz - termzk
1232 & + si1*dtaperx*dedzk1 - sk1*si1*d2taperxz
[all …]