have to map indices back into the family
This commit is contained in:
parent
d278a47beb
commit
1c8d3fbe52
|
@ -106,7 +106,10 @@ InstallOtherMethod(LeftQuotient,
|
||||||
IsIdenticalObj,
|
IsIdenticalObj,
|
||||||
[IsLeftQuotientElement, IsMagmaByMultiplicationTableObj],
|
[IsLeftQuotientElement, IsMagmaByMultiplicationTableObj],
|
||||||
function (l,r)
|
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);
|
end);
|
||||||
|
|
||||||
## Create division tables as needed
|
## Create division tables as needed
|
||||||
|
|
Loading…
Reference in New Issue