Searched defs:ewald_ddapc_pot (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | cp_ddapc_methods.F | 633 RECURSIVE SUBROUTINE ewald_ddapc_pot(cp_para_env, coeff, factor, cell, multipole_section, & subroutine
644 CHARACTER(len=*), PARAMETER :: routineN = 'ewald_ddapc_pot', & argument
645 routineP = moduleN//':'//routineN
647 INTEGER :: ewmdim, handle, idim, idim1, idim2, idimo, igauss1, igauss2, ip1, ip2, &
648 iparticle1, iparticle2, istart_g, k1, k2, k3, n_rep, ndim, nmax1, nmax2, nmax3, r1, r2, &
649 r3, rmax1, rmax2, rmax3
650 LOGICAL :: analyt
651 REAL(KIND=dp) :: alpha, eps, ew_neut, fac, fac3, fs, g_ewald, galpha, gsq, gsqi, ij_fac, &
652 my_val, r, r2tmp, r_ewald, rc1, rc12, rc2, rc22, rcut, rcut2, t1, tol, tol1
653 REAL(KIND=dp), DIMENSION(3) :: fvec, gvec, ra, rvec
[all …]
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | cp_ddapc_methods.F | 633 RECURSIVE SUBROUTINE ewald_ddapc_pot(cp_para_env, coeff, factor, cell, multipole_section, & subroutine
644 CHARACTER(len=*), PARAMETER :: routineN = 'ewald_ddapc_pot', & argument
645 routineP = moduleN//':'//routineN
647 INTEGER :: ewmdim, handle, idim, idim1, idim2, idimo, igauss1, igauss2, ip1, ip2, &
648 iparticle1, iparticle2, istart_g, k1, k2, k3, n_rep, ndim, nmax1, nmax2, nmax3, r1, r2, &
649 r3, rmax1, rmax2, rmax3
650 LOGICAL :: analyt
651 REAL(KIND=dp) :: alpha, eps, ew_neut, fac, fac3, fs, g_ewald, galpha, gsq, gsqi, ij_fac, &
652 my_val, r, r2tmp, r_ewald, rc1, rc12, rc2, rc22, rcut, rcut2, t1, tol, tol1
653 REAL(KIND=dp), DIMENSION(3) :: fvec, gvec, ra, rvec
[all …]
|