/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-original/ |
H A D | frce_shrt.f | 17 real*8 evdw,rij,drij,rijsq,force,etmp local 33 drij=sqrt(rijsq(k)) 48 evdw=evdw+(potpar(potindex,1)/drij**12 49 $ -potpar(potindex,2)/drij**6) 50 etmp = (potpar(potindex,1)/drij**12 51 $ -potpar(potindex,2)/drij**6) 53 force=(12*potpar(potindex,1)/drij**12 68 $ *exp(-drij/potpar(potindex,2)) 69 $ -potpar(potindex,3)/drij**6) 71 force=(drij*potpar(potindex,1) [all …]
|
H A D | ewald_excl.f | 15 real*8 rij,drij,arij,rijsq local 32 drij=sqrt(rijsq(k)) 33 arij=alpha*drij 36 $ *(1-erfxc(arij))/drij 40 $ /(drij*rijsq(k))
|
H A D | ewald_real.f | 15 real*8 rij,drij,arij,rijsq local 32 drij=sqrt(rijsq(k)) 33 arij=alpha*drij 36 $ *erfxc(arij)/drij 39 $ (erfxc(arij)+2*arij/sqrpi*exp(-arij*arij))/(drij*rijsq(k))
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-original/ |
H A D | frce_shrt.f | 17 real*8 evdw,rij,drij,rijsq,force,etmp local 33 drij=sqrt(rijsq(k)) 48 evdw=evdw+(potpar(potindex,1)/drij**12 49 $ -potpar(potindex,2)/drij**6) 50 etmp = (potpar(potindex,1)/drij**12 51 $ -potpar(potindex,2)/drij**6) 53 force=(12*potpar(potindex,1)/drij**12 68 $ *exp(-drij/potpar(potindex,2)) 69 $ -potpar(potindex,3)/drij**6) 71 force=(drij*potpar(potindex,1) [all …]
|
H A D | ewald_excl.f | 15 real*8 rij,drij,arij,rijsq local 32 drij=sqrt(rijsq(k)) 33 arij=alpha*drij 36 $ *(1-erfxc(arij))/drij 40 $ /(drij*rijsq(k))
|
H A D | ewald_real.f | 15 real*8 rij,drij,arij,rijsq local 32 drij=sqrt(rijsq(k)) 33 arij=alpha*drij 36 $ *erfxc(arij)/drij 39 $ (erfxc(arij)+2*arij/sqrpi*exp(-arij*arij))/(drij*rijsq(k))
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-serial/ |
H A D | frce_shrt.f | 21 real*8 evdw,rij,drij,rijsq,force local 36 drij=sqrt(rijsq(k)) 50 evdw=evdw+(potpar(potindex,1)/drij**12 51 $ -potpar(potindex,2)/drij**6) 53 force=(12*potpar(potindex,1)/drij**12 54 $ -6*potpar(potindex,2)/drij**6)/rijsq(k) 55 write(24,*) drij,rijsq(k) 67 $ *exp(-drij/potpar(potindex,2)) 68 $ -potpar(potindex,3)/drij**6) 70 force=(drij*potpar(potindex,1) [all …]
|
H A D | ewald_real.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *erfxc(arij)/drij 43 $ (erfxc(arij)+2*arij/sqrpi*exp(-arij*arij))/(drij*rijsq(k))
|
H A D | ewald_excl.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *(1-erfxc(arij))/drij 44 $ /(drij*rijsq(k))
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-9-10-08/ |
H A D | frce_shrt.f | 21 real*8 evdw,rij,drij,rijsq,force local 36 drij=sqrt(rijsq(k)) 50 evdw=evdw+(potpar(potindex,1)/drij**12 51 $ -potpar(potindex,2)/drij**6) 53 force=(12*potpar(potindex,1)/drij**12 54 $ -6*potpar(potindex,2)/drij**6)/rijsq(k) 55 write(24,*) drij,rijsq(k) 67 $ *exp(-drij/potpar(potindex,2)) 68 $ -potpar(potindex,3)/drij**6) 70 force=(drij*potpar(potindex,1) [all …]
|
H A D | ewald_excl.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *(1-erfxc(arij))/drij 44 $ /(drij*rijsq(k))
|
H A D | ewald_real.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *erfxc(arij)/drij 43 $ (erfxc(arij)+2*arij/sqrpi*exp(-arij*arij))/(drij*rijsq(k))
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-serial/ |
H A D | frce_shrt.f | 21 real*8 evdw,rij,drij,rijsq,force local 36 drij=sqrt(rijsq(k)) 50 evdw=evdw+(potpar(potindex,1)/drij**12 51 $ -potpar(potindex,2)/drij**6) 53 force=(12*potpar(potindex,1)/drij**12 54 $ -6*potpar(potindex,2)/drij**6)/rijsq(k) 55 write(24,*) drij,rijsq(k) 67 $ *exp(-drij/potpar(potindex,2)) 68 $ -potpar(potindex,3)/drij**6) 70 force=(drij*potpar(potindex,1) [all …]
|
H A D | ewald_real.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *erfxc(arij)/drij 43 $ (erfxc(arij)+2*arij/sqrpi*exp(-arij*arij))/(drij*rijsq(k))
|
H A D | ewald_excl.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *(1-erfxc(arij))/drij 44 $ /(drij*rijsq(k))
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-9-10-08/ |
H A D | frce_shrt.f | 21 real*8 evdw,rij,drij,rijsq,force local 36 drij=sqrt(rijsq(k)) 50 evdw=evdw+(potpar(potindex,1)/drij**12 51 $ -potpar(potindex,2)/drij**6) 53 force=(12*potpar(potindex,1)/drij**12 54 $ -6*potpar(potindex,2)/drij**6)/rijsq(k) 55 write(24,*) drij,rijsq(k) 67 $ *exp(-drij/potpar(potindex,2)) 68 $ -potpar(potindex,3)/drij**6) 70 force=(drij*potpar(potindex,1) [all …]
|
H A D | ewald_real.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *erfxc(arij)/drij 43 $ (erfxc(arij)+2*arij/sqrpi*exp(-arij*arij))/(drij*rijsq(k))
|
H A D | ewald_excl.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *(1-erfxc(arij))/drij 44 $ /(drij*rijsq(k))
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-subgroups/ |
H A D | frce_shrt.f | 21 real*8 evdw,rij,drij,rijsq,force local 35 drij=sqrt(rijsq(k)) 49 evdw=evdw+(potpar(potindex,1)/drij**12 50 $ -potpar(potindex,2)/drij**6) 52 force=(12*potpar(potindex,1)/drij**12 53 $ -6*potpar(potindex,2)/drij**6)/rijsq(k) 66 $ *exp(-drij/potpar(potindex,2)) 67 $ -potpar(potindex,3)/drij**6) 69 force=(drij*potpar(potindex,1) 70 $ *exp(-drij/potpar(potindex,2)) [all …]
|
H A D | ewald_excl.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *(1-erfxc(arij))/drij 44 $ /(drij*rijsq(k))
|
H A D | ewald_real.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *erfxc(arij)/drij 43 $ (erfxc(arij)+2*arij/sqrpi*exp(-arij*arij))/(drij*rijsq(k))
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-subgroups/ |
H A D | frce_shrt.f | 21 real*8 evdw,rij,drij,rijsq,force local 35 drij=sqrt(rijsq(k)) 49 evdw=evdw+(potpar(potindex,1)/drij**12 50 $ -potpar(potindex,2)/drij**6) 52 force=(12*potpar(potindex,1)/drij**12 53 $ -6*potpar(potindex,2)/drij**6)/rijsq(k) 66 $ *exp(-drij/potpar(potindex,2)) 67 $ -potpar(potindex,3)/drij**6) 69 force=(drij*potpar(potindex,1) 70 $ *exp(-drij/potpar(potindex,2)) [all …]
|
H A D | ewald_excl.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *(1-erfxc(arij))/drij 44 $ /(drij*rijsq(k))
|
H A D | ewald_real.f | 19 real*8 rij,drij,arij,rijsq local 36 drij=sqrt(rijsq(k)) 37 arij=alpha*drij 40 $ *erfxc(arij)/drij 43 $ (erfxc(arij)+2*arij/sqrpi*exp(-arij*arij))/(drij*rijsq(k))
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | semi_empirical_int_ana.F | 127 drij(1) = rijv(1)/rij 128 drij(2) = rijv(2)/rij 129 drij(3) = rijv(3)/rij 132 xtmp = drij(3) 133 drij(3) = drij(1) 134 drij(1) = xtmp 622 drij(1) = rijv(1)/rij 703 denuc = tmp*drij 1301 xtmp = drij(3) 1302 drij(3) = drij(1) [all …]
|