diff --git a/src/summary.F90 b/src/summary.F90 index 5fcdbf81ce..68f967a744 100644 --- a/src/summary.F90 +++ b/src/summary.F90 @@ -400,7 +400,6 @@ contains integer, allocatable :: zaids(:) integer(HID_T) :: materials_group integer(HID_T) :: material_group - integer(HID_T) :: sab_group type(Material), pointer :: m materials_group = create_group(file_id, "materials")