Remove unused get_realspace_cutoff call (#1196)

Signed-off-by: Igor S. Gerasimov <[email protected]>
grimme-lab · Feb 15, 2025 · c07df7a · c07df7a
1 parent b28fbff
commit c07df7a
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/peeq_module.f90 b/src/peeq_module.f90
@@ -671,8 +671,7 @@ pure subroutine drep_grad(repData,mol,trans,erep,gradient,sigma)
    real(wp) :: dtmp
    real(wp), parameter :: rthr = 1600.0_wp
    real(wp) :: w,t(3)
-   integer  :: latrep(3),tx,ty,tz,itr
-   call get_realspace_cutoff(mol%lattice,rthr,latrep)
+   integer  :: tx,ty,tz,itr
    w = 1.0_wp
    ! initialize
    erep = 0.0_wp