Fix IsNilpotentGroup checking for p-groups

The trivial group is a p-group in GAP, but 1 is *not* a prime power.
gap-system · Apr 10, 2018 · 30d006f · 30d006f
1 parent 9e65169
commit 30d006f
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/lib/grp.gi b/lib/grp.gi
@@ -405,6 +405,9 @@ InstallMethod( IsNilpotentGroup,
         SetIsPGroup( G, true );
         SetPrimePGroup( G, SmallestRootInt( s ) );
         return true;
+    elif s = 1 then
+        SetIsPGroup( G, true );
+        return true;
     else
         SetIsPGroup( G, false );
     fi;