whitespace adjustments

src/phase_mechanical_plastic_nonlocal.f90

@@ -772,6 +772,7 @@ module subroutine nonlocal_LpAndItsTangent(Lp,dLp_dMp, &
     tau, &                                                                                          !< resolved shear stress including backstress terms
     dot_gamma                                                                                       !< shear rate
 
+
   associate(prm => param(ph),dst=>dependentState(ph),stt=>state(ph))
 
     !*** shortcut to state variables
@@ -871,6 +872,7 @@ module subroutine plastic_nonlocal_deltaState(Mp,ph,en)
     dUpperOld, &                                                                                    ! old maximum stable dipole distance for edges and screws
     deltaDUpper                                                                                     ! change in maximum stable dipole distance for edges and screws
 
+
   associate(prm => param(ph),dst => dependentState(ph),del => deltaState(ph))
 
   mu = elastic_mu(ph,en)
@@ -1394,6 +1396,7 @@ module subroutine plastic_nonlocal_updateCompatibility(orientation,ph,i,e)
     belowThreshold
   type(rotation) :: mis
 
+
   associate(prm => param(ph))
     ns = prm%sum_N_sl