diff --git a/src/homogenization.f90 b/src/homogenization.f90
index 90654ee99..7cff91203 100644
--- a/src/homogenization.f90
+++ b/src/homogenization.f90
@@ -370,17 +370,17 @@ subroutine homogenization_results
 
     call mechanical_results(group_base,ho)
 
-    group = trim(group_base)//'/damage'
-    call results_closeGroup(results_addGroup(group))
     select case(damage_type(ho))
       case(DAMAGE_NONLOCAL_ID)
+        group = trim(group_base)//'/damage'
+        call results_closeGroup(results_addGroup(group))
         call damage_nonlocal_results(ho,group)
     end select
 
-    group = trim(group_base)//'/thermal'
-    call results_closeGroup(results_addGroup(group))
     select case(thermal_type(ho))
       case(THERMAL_CONDUCTION_ID)
+        group = trim(group_base)//'/thermal'
+        call results_closeGroup(results_addGroup(group))
         call thermal_conduction_results(ho,group)
     end select
 
diff --git a/src/homogenization_mechanical.f90 b/src/homogenization_mechanical.f90
index f14ddf4db..f7074bc40 100644
--- a/src/homogenization_mechanical.f90
+++ b/src/homogenization_mechanical.f90
@@ -224,7 +224,7 @@ module subroutine mechanical_results(group_base,ho)
 
   character(len=:), allocatable :: group
 
-  group = trim(group_base)//'/mech'
+  group = trim(group_base)//'/mechanical'
   call results_closeGroup(results_addGroup(group))
 
   select case(homogenization_type(ho))