diff --git a/gap/structure.gi b/gap/structure.gi index c09f66a..47b6118 100644 --- a/gap/structure.gi +++ b/gap/structure.gi @@ -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;