IsFilter is not an operation, which GAP doesn't like

This commit is contained in:
Glen Whitney 2017-10-18 13:19:57 +02:00
parent 92a7bff629
commit 6b679f8671
2 changed files with 2 additions and 5 deletions

View File

@ -45,8 +45,7 @@ DeclareGlobalFunction("LeftRack");
DeclareGlobalFunction("RightRack"); DeclareGlobalFunction("RightRack");
# Underlying operation # Underlying operation
DeclareOperation("CloneOfTypeByGenerators", DeclareGlobalFunction("CloneOfTypeByGenerators");
[IsFilter, IsFamily, IsCollection, IsAttribute]);
# Attributes for the generators # Attributes for the generators

View File

@ -1,9 +1,7 @@
## structure.gi RAQ Implementation of definitiions, reps, and elt operations ## structure.gi RAQ Implementation of definitiions, reps, and elt operations
## Create structures with generators ## Create structures with generators
InstallMethod(CloneOfTypeByGenerators, InstallGlobalFunction(CloneOfTypeByGenerators,
"for generic category of magma, family, collection, gen attrib",
[IsFilter, IsFamily, IsCollection, IsAttribute],
function(cat, fam, gens, genAttrib) function(cat, fam, gens, genAttrib)
local M; local M;
if not(IsEmpty(gens) or IsIdenticalObj(FamilyObj(gens), fam)) then if not(IsEmpty(gens) or IsIdenticalObj(FamilyObj(gens), fam)) then