diff --git a/src/plastic_dislotwin.f90 b/src/plastic_dislotwin.f90
index cfd1ccb9c..eeaf806a3 100644
--- a/src/plastic_dislotwin.f90
+++ b/src/plastic_dislotwin.f90
@@ -263,11 +263,11 @@ subroutine plastic_dislotwin_init(fileUnit)
   
  write(6,'(/,a)')   ' <<<+-  constitutive_'//PLASTICITY_DISLOTWIN_label//' init  -+>>>'
  write(6,'(/,a)')   ' A. Ma and F. Roters, Acta Materialia, 52(12):3603–3612, 2004'
- write(6,'(/,a)')   ' https://doi.org/10.1016/j.actamat.2004.04.012'
+ write(6,'(a)')     ' https://doi.org/10.1016/j.actamat.2004.04.012'
  write(6,'(/,a)')   ' F.Roters et al., Computational Materials Science, 39:91–95, 2007'
- write(6,'(/,a)')   ' https://doi.org/10.1016/j.commatsci.2006.04.014'
+ write(6,'(a)')     ' https://doi.org/10.1016/j.commatsci.2006.04.014'
  write(6,'(/,a)')   ' Wong et al., Acta Materialia, 118:140–151, 2016'
- write(6,'(/,a)')   ' https://doi.org/10.1016/j.actamat.2016.07.032'
+ write(6,'(a,/)')     ' https://doi.org/10.1016/j.actamat.2016.07.032'
  write(6,'(a15,a)') ' Current time: ',IO_timeStamp()
 #include "compilation_info.f90"
  
@@ -1035,7 +1035,7 @@ subroutine plastic_dislotwin_microstructure(temperature,ipc,ip,el)
 
  integer(pInt) :: &
    instance, &
-   s,t,r, &
+   s, &
    ph, &
    of
  real(pReal) :: &
@@ -1729,8 +1729,6 @@ subroutine plastic_dislotwin_dotState(Tstar_v,Temperature,ipc,ip,el)
 
    enddo
  enddo 
- if (el==12) write(6,*) Tstar_v                                                                     
- if (el==12) write(6,*) plasticState(ph)%dotState(:,of),ph,of,el 
 end subroutine plastic_dislotwin_dotState