Lines Matching refs:r2jk
2159 real*8 r2ij,r2jk,r2ik,mijk,imjk,ijmk,rijk3
2474 r2jk=r2abc(linjk)
2480 mijk=-r2ij+r2jk+r2ik
2481 imjk= r2ij-r2jk+r2ik
2482 ijmk= r2ij+r2jk-r2ik
2483 rijk3=r2ij*r2jk*r2ik
2497 dang=-0.375d0*(r2ij**3+r2ij**2*(r2jk+r2ik)
2498 . +r2ij*(3.0d0*r2jk**2+2.0*r2jk*r2ik+3.0*r2ik**2)
2499 . -5.0*(r2jk-r2ik)**2*(r2jk+r2ik))
2507 r=dsqrt(r2jk)
2509 dang=-0.375d0*(r2jk**3+r2jk**2*(r2ik+r2ij)
2510 . +r2jk*(3.0d0*r2ik**2+2.0*r2ik*r2ij+3.0*r2ij**2)
2521 dang=-0.375d0*(r2ik**3+r2ik**2*(r2jk+r2ij)
2522 . +r2ik*(3.0d0*r2jk**2+2.0*r2jk*r2ij+3.0*r2ij**2)
2523 . -5.0*(r2jk-r2ij)**2*(r2jk+r2ij))