From 5668076b83033cf68eff08757c7f24330eb56521 Mon Sep 17 00:00:00 2001
From: Glen Whitney <gwhitney@post.harvard.edu>
Date: Thu, 19 Oct 2017 01:18:58 +0200
Subject: [PATCH] HasIsLeftRack didn't work, so just call IsLeftRack

---
 gap/structure.gi | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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;