diff --git a/code/FEsolving.f90 b/code/FEsolving.f90
index b130eb65e..b7bf4bba0 100644
--- a/code/FEsolving.f90
+++ b/code/FEsolving.f90
@@ -57,7 +57,7 @@ module FEsolving
  logical, dimension(:,:), allocatable, public :: &
    calcMode
       
- logical, private :: & 
+ logical, public :: & 
    lastIncConverged  = .false., &
    outdatedByNewInc  = .false., &
    cutBack           = .false.