no need for fixed-length string

2020-11-06 00:59:12 +01:00 · 2020-11-06 00:59:12 +01:00 · 10b8a04d89
parent 58a5d2666c
commit 10b8a04d89
1 changed files with 1 additions and 1 deletions
--- a/src/homogenization.f90
+++ b/src/homogenization.f90
@ -529,7 +529,7 @@ subroutine homogenization_results
    material_homogenization_type => homogenization_type

  integer :: p
-  character(len=pStringLen) :: group_base,group
+  character(len=:), allocatable :: group_base,group

  !real(pReal), dimension(:,:,:), allocatable :: temp