diff --git a/src/plastic_disloUCLA.f90 b/src/plastic_disloUCLA.f90
index 13956dd59..efab7bc0b 100644
--- a/src/plastic_disloUCLA.f90
+++ b/src/plastic_disloUCLA.f90
@@ -559,7 +559,6 @@ subroutine plastic_disloUCLA_results(instance,group)
   use results, only: &
     results_writeDataset
 
-  implicit none
   integer,          intent(in) :: instance
   character(len=*), intent(in) :: group
   
diff --git a/src/plastic_dislotwin.f90 b/src/plastic_dislotwin.f90
index 858199ada..e8aca7f89 100644
--- a/src/plastic_dislotwin.f90
+++ b/src/plastic_dislotwin.f90
@@ -1061,7 +1061,6 @@ subroutine plastic_dislotwin_results(instance,group)
   use results, only: &
     results_writeDataset
 
-  implicit none
   integer, intent(in) :: instance
   character(len=*) :: group
   integer :: o
diff --git a/src/plastic_isotropic.f90 b/src/plastic_isotropic.f90
index 1049dc9cf..4f2892f57 100644
--- a/src/plastic_isotropic.f90
+++ b/src/plastic_isotropic.f90
@@ -483,7 +483,6 @@ subroutine plastic_isotropic_results(instance,group)
   use results, only: &
     results_writeDataset
 
-  implicit none
   integer,          intent(in) :: instance
   character(len=*), intent(in) :: group
   
diff --git a/src/plastic_kinematichardening.f90 b/src/plastic_kinematichardening.f90
index 27bae7e40..a255572e1 100644
--- a/src/plastic_kinematichardening.f90
+++ b/src/plastic_kinematichardening.f90
@@ -550,7 +550,6 @@ subroutine plastic_kinehardening_results(instance,group)
   use results, only: &
     results_writeDataset
 
-  implicit none
   integer, intent(in) :: instance
   character(len=*) :: group
   integer :: o
diff --git a/src/plastic_none.f90 b/src/plastic_none.f90
index e34fd533b..6f2ef2230 100644
--- a/src/plastic_none.f90
+++ b/src/plastic_none.f90
@@ -31,7 +31,6 @@ subroutine plastic_none_init
    material_phase, &
    plasticState
 
- implicit none
  integer :: &
    Ninstance, &
    p, &
diff --git a/src/plastic_nonlocal.f90 b/src/plastic_nonlocal.f90
index c14223045..caaa0e4a2 100644
--- a/src/plastic_nonlocal.f90
+++ b/src/plastic_nonlocal.f90
@@ -2396,7 +2396,6 @@ subroutine plastic_nonlocal_results(instance,group)
   use results, only: &
     results_writeDataset
 
-  implicit none
   integer, intent(in) :: instance
   character(len=*) :: group
   integer :: o
diff --git a/src/plastic_phenopowerlaw.f90 b/src/plastic_phenopowerlaw.f90
index f2692a489..f8ebae68d 100644
--- a/src/plastic_phenopowerlaw.f90
+++ b/src/plastic_phenopowerlaw.f90
@@ -563,7 +563,6 @@ subroutine plastic_phenopowerlaw_results(instance,group)
   use results, only: &
     results_writeDataset
 
-  implicit none
   integer,          intent(in) :: instance
   character(len=*), intent(in) :: group