diff --git a/src/BC-Cavity.f90 b/src/BC-Cavity.f90
index 93aa266335270ccff0ac0e3b1367aecfe41fb89a..9cf189fb3d516d5a33334c099696b45a6b791219 100644
--- a/src/BC-Cavity.f90
+++ b/src/BC-Cavity.f90
@@ -35,7 +35,7 @@ contains
       real(mytype), dimension(xsize(1), xsize(2), xsize(3), numscalar) :: phi1
 
       real(mytype) :: x
-      integer :: k, j, i, is
+      integer :: i
 
       ! This does not apply in case of restart
       if (irestart == 0) then