diff --git a/src/eigenvalue.F90 b/src/eigenvalue.F90
index 9c0678f7a6..660a1119f4 100644
--- a/src/eigenvalue.F90
+++ b/src/eigenvalue.F90
@@ -38,8 +38,6 @@ contains
 
   subroutine run_eigenvalue()
 
-    integer(8) :: i  ! index over individual particles
-
     if (master) call header("K EIGENVALUE SIMULATION", level=1)
 
     ! Allocate particle