diff --git a/code/constitutive.f90 b/code/constitutive.f90
index f53c0209c..537ebe7e8 100644
--- a/code/constitutive.f90
+++ b/code/constitutive.f90
@@ -769,7 +769,7 @@ endsubroutine
 !* calculating the incremental change of microstructure based on the *
 !* state at the beginning of the timestep                            * 
 !*********************************************************************
-subroutine constitutive_collectDeltaState(Tstar_v, Fe, Fp, Temperature, ipc, ip, el)
+subroutine constitutive_collectDeltaState(Tstar_v, Temperature, ipc, ip, el)
 
 use prec, only:     pReal, pLongInt
 use debug, only:    debug_cumDeltaStateCalls, &
@@ -799,9 +799,6 @@ integer(pInt), intent(in) ::    ipc, &        ! component-ID of current integrat
                                 ip, &         ! current integration point
                                 el            ! current element
 real(pReal), intent(in) ::      Temperature
-real(pReal), dimension(3,3,homogenization_maxNgrains,mesh_maxNips,mesh_NcpElems), intent(in) :: &
-                                Fe, &         ! elastic deformation gradient
-                                Fp            ! plastic deformation gradient
 real(pReal), dimension(6), intent(in) :: &
                                 Tstar_v       ! 2nd Piola Kirchhoff stress tensor (Mandel)
 !*** local variables
@@ -828,7 +825,7 @@ select case (phase_plasticity(material_phase(ipc,ip,el)))
     constitutive_deltaState(ipc,ip,el)%p = constitutive_dislotwin_deltaState(Tstar_v,Temperature,constitutive_subState0,ipc,ip,el)
  
   case (constitutive_nonlocal_label)
-    constitutive_deltaState(ipc,ip,el)%p = constitutive_nonlocal_deltaState(Tstar_v, Fe, Fp, Temperature, constitutive_subState0, ipc, ip, el)
+    constitutive_deltaState(ipc,ip,el)%p = constitutive_nonlocal_deltaState(Tstar_v,Temperature,constitutive_subState0,ipc,ip,el)
  
 end select
 
diff --git a/code/constitutive_nonlocal.f90 b/code/constitutive_nonlocal.f90
index 559d787cb..2b4e6587b 100644
--- a/code/constitutive_nonlocal.f90
+++ b/code/constitutive_nonlocal.f90
@@ -1524,7 +1524,7 @@ endsubroutine
 !*********************************************************************
 !* incremental change of microstructure                              *
 !*********************************************************************
-function constitutive_nonlocal_deltaState(Tstar_v, Fe, Fp, Temperature, state, g,ip,el)
+function constitutive_nonlocal_deltaState(Tstar_v, Temperature, state, g,ip,el)
 
 use prec,     only: pReal, &
                     pInt, &
@@ -1543,9 +1543,6 @@ integer(pInt), intent(in) ::                g, &                      ! current
                                             el                        ! current element number
 real(pReal), intent(in) ::                  Temperature               ! temperature
 real(pReal), dimension(6), intent(in) ::    Tstar_v                   ! current 2nd Piola-Kirchhoff stress in Mandel notation
-real(pReal), dimension(3,3,homogenization_maxNgrains,mesh_maxNips,mesh_NcpElems), intent(in) :: &
-                                            Fe, &                     ! elastic deformation gradient
-                                            Fp                        ! plastic deformation gradient
 type(p_vec), dimension(homogenization_maxNgrains,mesh_maxNips,mesh_NcpElems), intent(in) :: &
                                             state                     ! current microstructural state