diff --git a/code/homogenization_RGC.f90 b/code/homogenization_RGC.f90 index 8b22e5da0..e5fa58a41 100644 --- a/code/homogenization_RGC.f90 +++ b/code/homogenization_RGC.f90 @@ -60,7 +60,7 @@ subroutine homogenization_RGC_init(& character(len=1024) line write(6,*) - write(6,'(a20,a20,a12)') '<<<+- homogenization',homogenization_RGC_label,' init -+>>>' + write(6,'(a21,a20,a12)') '<<<+- homogenization',homogenization_RGC_label,' init -+>>>' write(6,*) '$Id$' write(6,*) diff --git a/code/homogenization_isostrain.f90 b/code/homogenization_isostrain.f90 index 9273a2b61..03e6458b1 100644 --- a/code/homogenization_isostrain.f90 +++ b/code/homogenization_isostrain.f90 @@ -55,7 +55,7 @@ subroutine homogenization_isostrain_init(& character(len=1024) line write(6,*) - write(6,'(a20,a20,a12)') '<<<+- homogenization',homogenization_isostrain_label,' init -+>>>' + write(6,'(a21,a20,a12)') '<<<+- homogenization',homogenization_isostrain_label,' init -+>>>' write(6,*) '$Id$' write(6,*)