From fb39c9e02e82ecd5cdf8a8a1b6c045e35c971995 Mon Sep 17 00:00:00 2001
From: Glen Whitney <gwhitney@post.harvard.edu>
Date: Sun, 29 Oct 2017 15:12:01 -0400
Subject: [PATCH] Print methods for quasigroup/loop elms jsut for this specific
 representation

---
 gap/elements.gi | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gap/elements.gi b/gap/elements.gi
index 2fdb0a1..a6a3c6b 100644
--- a/gap/elements.gi
+++ b/gap/elements.gi
@@ -12,8 +12,8 @@
 ##  DISPLAYING AND COMPARING ELEMENTS
 ##  -------------------------------------------------------------------------
 
-InstallMethod( PrintObj, "for a quasigroup element",
-    [ IsQuasigroupElement ],
+InstallMethod( PrintObj, "for a default quasigroup element",
+    [ IsQuasigroupElmRep ],
 function( obj )
     local F;
     F := FamilyObj( obj );
@@ -21,7 +21,7 @@ function( obj )
 end );
 
 InstallMethod( PrintObj, "for a loop element",
-    [ IsLoopElement ],
+    [ IsLoopElmRep ],
 function( obj )
     local F;
     F := FamilyObj( obj );