Revert "semipperm.gi: fix RankOfPartialPermSemigroup for groups"

This reverts commit 16ec90c. The
changed made there makes testinstall and teststandard fail when
all packages are loaded, because it requires the new version of
the Semigroups package.

Author: Alexander Konovalov

lib/semipperm.gi

@@ -94,17 +94,17 @@ InstallMethod(CodegreeOfPartialPermSemigroup,
 s-> DegreeOfPartialPermSemigroup(s));
 
 InstallMethod(RankOfPartialPermSemigroup,
-"for a partial perm semigroup with generators of semigroup",
+"for a partial perm semigroup",
 [IsPartialPermSemigroup and HasGeneratorsOfSemigroup],
 S -> RankOfPartialPermCollection(GeneratorsOfSemigroup(S)));
 
 InstallMethod(RankOfPartialPermSemigroup,
-"for a partial perm monoid",
-[IsPartialPermMonoid],
-S -> RankOfPartialPerm(One(S)));
+"for a partial perm semigroup",
+[IsPartialPermSemigroup and HasGeneratorsOfGroup],
+S -> RankOfPartialPermCollection(GeneratorsOfGroup(S)));
 
 InstallMethod(RankOfPartialPermCollection,
-"for a partial perm semigroup with generators of semigroup",
+"for a partial perm semigroup",
 [IsPartialPermSemigroup and HasGeneratorsOfSemigroup],
 s-> RankOfPartialPermCollection(GeneratorsOfSemigroup(s)));
 

tst/testinstall/semipperm.tst

@@ -86,9 +86,6 @@ gap> RankOfPartialPermSemigroup(S);
 gap> S := Group(PartialPerm([]));;
 gap> RankOfPartialPermSemigroup(S);
 0
-gap> S := Group([], PartialPerm([1, 2]));;
-gap> RankOfPartialPermSemigroup(S);
-2
 
 # Test Domain/ImageOfPartialPermCollection/Semigroup
 gap> S := Semigroup(PartialPerm([1, 2, 3], [4, 5, 11]),