leftover variable from cleaning

This commit is contained in:
Martin Diehl 2018-07-16 10:51:42 +02:00
parent 942883e9dd
commit bc5fcf2c14
1 changed files with 0 additions and 3 deletions

View File

@ -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