Fall back to generators of domain
This commit is contained in:
parent
0b68afb47e
commit
8c939b4a91
@ -600,6 +600,8 @@ InstallOtherMethod(DirectProductOp, "for a list and non-quasigroup magma",
|
|||||||
genfunc := GeneratorsOfRightQuasigroup;
|
genfunc := GeneratorsOfRightQuasigroup;
|
||||||
elif "HasGeneratorsOfMagma" in jof then
|
elif "HasGeneratorsOfMagma" in jof then
|
||||||
genfunc := GeneratorsOfMagma;
|
genfunc := GeneratorsOfMagma;
|
||||||
|
elif "HasGeneratorsOfDomain" in jof then
|
||||||
|
genfunc := GeneratorsOfDomain;
|
||||||
else
|
else
|
||||||
Info(InfoRAQ,1, "RAQ: Unusual product, each of ", list,
|
Info(InfoRAQ,1, "RAQ: Unusual product, each of ", list,
|
||||||
" has generators, but not sure what kind; trying next method.");
|
" has generators, but not sure what kind; trying next method.");
|
||||||
|
Loading…
Reference in New Issue
Block a user