always forgetting to go down to the underlying
This commit is contained in:
parent
070ad81eba
commit
ccf0e6f8e3
1 changed files with 1 additions and 1 deletions
|
@ -90,7 +90,7 @@ InstallMethod(GeneratorsOfMagma,
|
||||||
# idea: ^g^-1: * ^h: = ^g: \ ^h:, so the generators of the quasigroup
|
# idea: ^g^-1: * ^h: = ^g: \ ^h:, so the generators of the quasigroup
|
||||||
# together with their inverses generate the quandle as a magma.
|
# together with their inverses generate the quandle as a magma.
|
||||||
gens := GeneratorsOfLeftQuasigroup(Q);
|
gens := GeneratorsOfLeftQuasigroup(Q);
|
||||||
invgens := Set(gens, g -> Inverse(g));
|
invgens := Set(gens, g -> ConjugatorObj(Inverse(g![1])));
|
||||||
UniteSet(invgens, gens);
|
UniteSet(invgens, gens);
|
||||||
return invgens;
|
return invgens;
|
||||||
end);
|
end);
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue