glen/RAQ
1
0
Fork 0
Code Issues 1 Pull Requests Releases Wiki Activity

have to map indices back into the family

Browse Source
This commit is contained in:
Glen Whitney 2017-10-18 13:36:38 +02:00
parent d278a47beb
commit 1c8d3fbe52
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gap/structure.gi
View File

@ -106,7 +106,10 @@ InstallOtherMethod(LeftQuotient,
IsIdenticalObj,
[IsLeftQuotientElement, IsMagmaByMultiplicationTableObj],
function (l,r)
return LeftDivisionTable(FamilyObj(l))[l![1],r![1]];
local fam, ix;
fam := FamilyObj(l);
ix := LeftDivisionTable(fam)[l![1],r![1]];
return fam!.set[ix];
end);
## Create division tables as needed