HasIsLeftRack didn't work, so just call IsLeftRack
This commit is contained in:
parent
f065049281
commit
5668076b83
@ -249,12 +249,12 @@ InstallMethod(IsRSelfDistributive, "for magma",
|
||||
|
||||
## View and print and such
|
||||
LeftObjString@ := function(Q)
|
||||
if HasIsLeftRack(Q) and IsLeftRack(Q) then return "LeftRack"; fi;
|
||||
if IsLeftRack(Q) then return "LeftRack"; fi;
|
||||
return "LeftQuasigroup";
|
||||
end;
|
||||
|
||||
RightObjString@ := function(Q)
|
||||
if HasIsRightRack(Q) and IsRightRack(Q) then return "RightRack"; fi;
|
||||
if IsRightRack(Q) then return "RightRack"; fi;
|
||||
return "RightQuasigroup";
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user