match requirements for distributivity tests

This commit is contained in:
Glen Whitney 2017-10-20 15:30:44 +02:00
parent 7f53975ebc
commit 32a272fab9
1 changed files with 2 additions and 2 deletions

View File

@ -198,12 +198,12 @@ end);
## Distributivity/idempotence checkers for when need be ## Distributivity/idempotence checkers for when need be
InstallMethod(IsLSelfDistributive, "for collections with multiplication tables", InstallMethod(IsLSelfDistributive, "for collections with multiplication tables",
[HasMultiplicationTable], [IsMultiplicativeElementCollection and HasMultiplicationTable],
M -> IsLeftSelfDistributiveTable(MultiplicationTable(M)) M -> IsLeftSelfDistributiveTable(MultiplicationTable(M))
); );
InstallMethod(IsRSelfDistributive, "for collections with multiplication table", InstallMethod(IsRSelfDistributive, "for collections with multiplication table",
[HasMultiplicationTable], [IsMultiplicativeElementCollection and HasMultiplicationTable],
M -> IsRightSelfDistributiveTable(MultiplicationTable(M)) M -> IsRightSelfDistributiveTable(MultiplicationTable(M))
); );