typo
This commit is contained in:
parent
85f37ad774
commit
0231c423a3
@ -465,7 +465,7 @@ end);
|
|||||||
|
|
||||||
OppHelper@ := function(Q, whichgens, cnstr)
|
OppHelper@ := function(Q, whichgens, cnstr)
|
||||||
local fam, elts, opp;
|
local fam, elts, opp;
|
||||||
elts := List(whichgen(Q), q -> OppositeObj(q));
|
elts := List(whichgens(Q), q -> OppositeObj(q));
|
||||||
fam := CollectionsFamily(OppositeFamily(ElementsFamily(FamilyObj(Q))));
|
fam := CollectionsFamily(OppositeFamily(ElementsFamily(FamilyObj(Q))));
|
||||||
opp := cnstr(fam, elts);
|
opp := cnstr(fam, elts);
|
||||||
if HasIsFinite(Q) then SetIsFinite(opp, IsFinite(Q)); fi;
|
if HasIsFinite(Q) then SetIsFinite(opp, IsFinite(Q)); fi;
|
||||||
|
Loading…
Reference in New Issue
Block a user