fixes to elt names

This commit is contained in:
Glen Whitney 2017-10-25 02:28:03 +02:00
parent ee4774412c
commit 29e8955051
1 changed files with 2 additions and 2 deletions

View File

@ -40,13 +40,13 @@ end);
## And now create them from multiplication tables
# First a helper function
MagmaNumber@ := 1;
MagmaNumber@ := 0;
MagmaLetters@ := "ABCDEFGHJKMNPSTUV";
MagmaBase@ := Length(MagmaLetters@);
NextMagmaString@ := function(filts)
local str, n;
str := "l";
if filts <> (filts and IsLeftQuotientElement) then
if not "IsLeftQuotientElement" in NamesFilter(filts) then
str := "r";
fi;
n := MagmaNumber@;