From bc5fcf2c1426e63e4d24b7c08f387de72479ec95 Mon Sep 17 00:00:00 2001
From: Martin Diehl <m.diehl@mpie.de>
Date: Mon, 16 Jul 2018 10:51:42 +0200
Subject: [PATCH] leftover variable from cleaning

---
 src/debug.f90 | 3 ---
 1 file changed, 3 deletions(-)

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