From 8d8a8103eb71c5be1ee9435f614bca5706568ca7 Mon Sep 17 00:00:00 2001 From: Franz Roters Date: Wed, 21 Mar 2012 07:51:07 +0000 Subject: [PATCH] lastIncConverged, outdatedByNewInc, and cutBack need to be public as well! please keep in mind the FEM interfaces which also need to work!!! --- code/FEsolving.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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.