diff --git a/src/group_mod.f90 b/src/group_mod.f90
index 17cd468..2b28770 100644
--- a/src/group_mod.f90
+++ b/src/group_mod.f90
@@ -527,8 +527,8 @@ subroutine output_group(g,iunit,mode_arg)
 
    else if (mode == 2) then
 
-      ! Write number of symmetry elements
-      write(iunit,FMT="(i9)") g%order
+      write(iunit,FMT="('dim  ', i3)") dim
+      write(iunit,FMT="('size ', i3)") g%order
       write(iunit,*)
 
       ! Write symmetry elements