diff --git a/src/grid/DAMASK_grid.f90 b/src/grid/DAMASK_grid.f90
index d092fb477..df7df4d3b 100644
--- a/src/grid/DAMASK_grid.f90
+++ b/src/grid/DAMASK_grid.f90
@@ -431,9 +431,9 @@ program DAMASK_grid
                 case(FIELD_MECH_ID)
                   solres(field) = mech_solution(incInfo)
                 case(FIELD_THERMAL_ID)
-                  solres(field) = grid_thermal_spectral_solution(timeinc,timeIncOld)
+                  solres(field) = grid_thermal_spectral_solution(timeinc)
                 case(FIELD_DAMAGE_ID)
-                  solres(field) = grid_damage_spectral_solution(timeinc,timeIncOld)
+                  solres(field) = grid_damage_spectral_solution(timeinc)
               end select
   
               if (.not. solres(field)%converged) exit                                               ! no solution found
diff --git a/src/grid/grid_damage_spectral.f90 b/src/grid/grid_damage_spectral.f90
index 27dc5c1bd..7e529fc68 100644
--- a/src/grid/grid_damage_spectral.f90
+++ b/src/grid/grid_damage_spectral.f90
@@ -156,11 +156,10 @@ end subroutine grid_damage_spectral_init
 !--------------------------------------------------------------------------------------------------
 !> @brief solution for the spectral damage scheme with internal iterations
 !--------------------------------------------------------------------------------------------------
-function grid_damage_spectral_solution(timeinc,timeinc_old) result(solution)
+function grid_damage_spectral_solution(timeinc) result(solution)
  
   real(pReal), intent(in) :: &
-    timeinc, &                                                                                      !< increment in time for current solution
-    timeinc_old                                                                                     !< increment in time of last increment
+    timeinc                                                                                         !< increment in time for current solution
   integer :: i, j, k, cell
   type(tSolutionState) :: solution
   PetscInt  :: devNull
@@ -174,7 +173,6 @@ function grid_damage_spectral_solution(timeinc,timeinc_old) result(solution)
 !--------------------------------------------------------------------------------------------------
 ! set module wide availabe data 
   params%timeinc = timeinc
-  params%timeincOld = timeinc_old
  
   call SNESSolve(damage_snes,PETSC_NULL_VEC,solution_vec,ierr); CHKERRQ(ierr)
   call SNESGetConvergedReason(damage_snes,reason,ierr); CHKERRQ(ierr)
diff --git a/src/grid/grid_thermal_spectral.f90 b/src/grid/grid_thermal_spectral.f90
index 49be5ad7e..b4f9acddb 100644
--- a/src/grid/grid_thermal_spectral.f90
+++ b/src/grid/grid_thermal_spectral.f90
@@ -148,11 +148,10 @@ end subroutine grid_thermal_spectral_init
 !--------------------------------------------------------------------------------------------------
 !> @brief solution for the spectral thermal scheme with internal iterations
 !--------------------------------------------------------------------------------------------------
-function grid_thermal_spectral_solution(timeinc,timeinc_old) result(solution)
+function grid_thermal_spectral_solution(timeinc) result(solution)
  
   real(pReal), intent(in) :: &
-    timeinc, &                                                                                      !< increment in time for current solution
-    timeinc_old                                                                                     !< increment in time of last increment
+    timeinc                                                                                         !< increment in time for current solution
   integer :: i, j, k, cell
   type(tSolutionState) :: solution
   PetscInt  :: devNull
@@ -166,7 +165,6 @@ function grid_thermal_spectral_solution(timeinc,timeinc_old) result(solution)
 !--------------------------------------------------------------------------------------------------
 ! set module wide availabe data 
   params%timeinc = timeinc
-  params%timeincOld = timeinc_old
 
   call SNESSolve(thermal_snes,PETSC_NULL_VEC,solution_vec,ierr); CHKERRQ(ierr)
   call SNESGetConvergedReason(thermal_snes,reason,ierr); CHKERRQ(ierr)