diff --git a/code/constitutive_dislotwin.f90 b/code/constitutive_dislotwin.f90
index 1bd39588e..432c4f623 100644
--- a/code/constitutive_dislotwin.f90
+++ b/code/constitutive_dislotwin.f90
@@ -756,7 +756,6 @@ subroutine constitutive_dislotwin_init(fileUnit)
                 
      plasticState(phase)%sizeState = sizeState
      plasticState(phase)%sizeDotState = sizeDotState
-     plasticState(phase)%nonlocal = .false.
      allocate(plasticState(phase)%aTolState           (sizeState),                source=0.0_pReal)
      allocate(plasticState(phase)%state0              (sizeState,NofMyPhase),     source=0.0_pReal)
      allocate(plasticState(phase)%partionedState0     (sizeState,NofMyPhase),     source=0.0_pReal)
diff --git a/code/constitutive_j2.f90 b/code/constitutive_j2.f90
index 1d39c2c8b..d713e0fce 100644
--- a/code/constitutive_j2.f90
+++ b/code/constitutive_j2.f90
@@ -315,7 +315,6 @@ subroutine constitutive_j2_init(fileUnit)
      sizeDotState = sizeState
      plasticState(phase)%sizeDotState = sizeDotState
      plasticState(phase)%sizePostResults = constitutive_j2_sizePostResults(instance)
-     plasticState(phase)%nonlocal = .false.
      allocate(plasticState(phase)%aTolState          (sizeState),source=constitutive_j2_aTolResistance(instance))
      allocate(plasticState(phase)%state0             (sizeState,NofMyPhase),source=constitutive_j2_tau0(instance))
      allocate(plasticState(phase)%partionedState0    (sizeState,NofMyPhase),source=0.0_pReal)
diff --git a/code/constitutive_phenopowerlaw.f90 b/code/constitutive_phenopowerlaw.f90
index 5408b2b5a..e24ea3da6 100644
--- a/code/constitutive_phenopowerlaw.f90
+++ b/code/constitutive_phenopowerlaw.f90
@@ -514,7 +514,6 @@ subroutine constitutive_phenopowerlaw_init(fileUnit)
      plasticState(phase)%sizeState = sizeState
      plasticState(phase)%sizeDotState = sizeDotState
      plasticState(phase)%sizePostResults = constitutive_phenopowerlaw_sizePostResults(instance)
-     plasticState(phase)%nonlocal = .false.
      allocate(plasticState(phase)%aTolState          (  sizeState),             source=0.0_pReal)
      allocate(plasticState(phase)%state0             (   sizeState,NofMyPhase), source=0.0_pReal)
      allocate(plasticState(phase)%partionedState0    (   sizeState,NofMyPhase), source=0.0_pReal)
diff --git a/code/constitutive_titanmod.f90 b/code/constitutive_titanmod.f90
index de26fb4fa..c1fd23982 100644
--- a/code/constitutive_titanmod.f90
+++ b/code/constitutive_titanmod.f90
@@ -847,7 +847,6 @@ subroutine constitutive_titanmod_init(fileUnit)
      plasticState(phase)%sizeState = sizeState
      plasticState(phase)%sizeDotState = sizeDotState
      plasticState(phase)%sizePostResults = constitutive_titanmod_sizePostResults(instance)
-     plasticState(phase)%nonlocal = .false.
      allocate(plasticState(phase)%aTolState           (sizeState),                source=constitutive_titanmod_aTolRho(instance))
      allocate(plasticState(phase)%state0              (sizeState,NofMyPhase),     source=0.0_pReal)
      allocate(plasticState(phase)%partionedState0     (sizeState,NofMyPhase),     source=0.0_pReal)
diff --git a/code/prec.f90 b/code/prec.f90
index e04f858de..b602114f2 100644
--- a/code/prec.f90
+++ b/code/prec.f90
@@ -62,7 +62,7 @@ module prec
    integer(pInt)                              :: sizeState = 0_pInt , &
                                                  sizeDotState = 0_pInt, &
                                                  sizePostResults = 0_pInt
-   logical                                    :: nonlocal
+   logical                                    :: nonlocal = .false.
    real(pReal), allocatable, dimension(:)     :: atolState
    real(pReal), allocatable, dimension(:,:)   :: state, &                                                     ! material points, state size
                                                  dotState, &