Home
last modified time | relevance | path

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

/dports/science/tinker/tinker/source/
H A Dechgdpl1.f50 real*8 dedxk1,dedyk1,dedzk1 local
156 dedyk1 = -sk1*termy - termyk
182 dedyk1 = dedyk1*taper + sk1*dtapery
196 decd(2,k1) = decd(2,k1) + dedyk1
213 vyy = yr1*dedyk1 + yr2*dedyk2
214 vzy = zr1*dedyk1 + zr2*dedyk2
309 dedyk1 = -sk1*termy - termyk
335 dedyk1 = dedyk1*taper + sk1*dtapery
349 decd(2,k1) = decd(2,k1) + dedyk1
367 vyy = yr1*dedyk1 + yr2*dedyk2
[all …]
H A Dedipole1.f53 real*8 dedxk1,dedyk1,dedzk1 local
174 dedyk1 = -sk1*termy - termyk
203 dedyk1 = dedyk1*taper - sk1*dtapery
220 ded(2,k1) = ded(2,k1) + dedyk1
239 vyy = yq1*dedyk1 + yq2*dedyk2
240 vzy = 0.5d0 * (zq1*dedyk1 + zq2*dedyk2
361 dedyk1 = -sk1*termy - termyk
390 dedyk1 = dedyk1*taper - sk1*dtapery
409 ded(2,k1) = ded(2,k1) + dedyk1
429 vyy = yq1*dedyk1 + yq2*dedyk2
[all …]
H A Dechgdpl2.f49 real*8 dedxk1,dedyk1,dedzk1 local
181 dedyk1 = -sk1*termy + termyk
303 hessx(2,k1) = hessx(2,k1) + dtaperx*dedyk1
321 hessy(2,k1) = hessy(2,k1) + dtapery*dedyk1
339 hessz(2,k1) = hessz(2,k1) + dtaperz*dedyk1
435 dedyk1 = -sk1*termy + termyk
661 & + dtaperx*dedyk1 - sk1*d2taperxy
663 & + dtapery*dedyk1 - sk1*d2taperyy
665 & + dtaperz*dedyk1 - sk1*d2taperyz
845 dedyk1 = -sk1*termy + termyk
[all …]
H A Dedipole2.f64 real*8 dedxk1,dedyk1,dedzk1 local
246 dedyk1 = -sk1*termy - termyk
592 & + si1*dtaperx*dedyk1 - sk1*si1*d2taperxy
616 & + si1*dtapery*dedyk1 - sk1*si1*d2taperyy
640 & + si1*dtaperz*dedyk1 - sk1*si1*d2taperyz
665 & + si2*dtaperx*dedyk1 - sk1*si2*d2taperxy
689 & + si2*dtapery*dedyk1 - sk1*si2*d2taperyy
713 & + si2*dtaperz*dedyk1 - sk1*si2*d2taperyz
884 dedyk1 = -sk1*termy - termyk
1230 & + si1*dtaperx*dedyk1 - sk1*si1*d2taperxy
[all …]