diff --git a/src/debug.f90 b/src/debug.f90
index ea2b659a1..55cc62ca0 100644
--- a/src/debug.f90
+++ b/src/debug.f90
@@ -283,11 +283,8 @@ end subroutine debug_reset
 subroutine debug_info
 
  implicit none
- character(len=1)  :: exceed
-
  
  !$OMP CRITICAL (write2out)
-
    debugOutputCPFEM: if (iand(debug_level(debug_CPFEM),debug_LEVELBASIC) /= 0 &
                       .and. any(debug_stressMinLocation /= 0_pInt) &
                       .and. any(debug_stressMaxLocation /= 0_pInt) ) then