diff --git a/src/constitutive_plastic_nonlocal.f90 b/src/constitutive_plastic_nonlocal.f90
index 65fea24b2..7f21d0194 100644
--- a/src/constitutive_plastic_nonlocal.f90
+++ b/src/constitutive_plastic_nonlocal.f90
@@ -56,7 +56,7 @@ submodule(constitutive) plastic_nonlocal
       rhoSglScrewNeg0, &                                                                            !< initial screw_neg dislocation density
       rhoDipEdge0, &                                                                                !< initial edge dipole dislocation density
       rhoDipScrew0                                                                                  !< initial screw dipole dislocation density
-    integer,     dimension(:) ,allocatable :: &
+    integer,     dimension(:), allocatable :: &
       N_sl
   end type tInitialParameters