From 7bd82b57975bbc1ff5b87fed0739815c620ecdcc Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Thu, 11 Jun 2009 21:51:23 +0000
Subject: 	* algebra/: Remove quotes from operator namaes in signatures.

---
 src/algebra/domain.spad.pamphlet | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/algebra/domain.spad.pamphlet')

diff --git a/src/algebra/domain.spad.pamphlet b/src/algebra/domain.spad.pamphlet
index acaed108..32fb782d 100644
--- a/src/algebra/domain.spad.pamphlet
+++ b/src/algebra/domain.spad.pamphlet
@@ -354,8 +354,8 @@ SystemPredicate(): Public == Private where
   Private == add
     x = y == EQUAL(x,y)$Lisp
     coerce(x: %): OutputForm ==
-      NOT(x)$Lisp => '_false::OutputForm
-      EQ(x,'T)$Lisp => '_true::OutputForm
+      NOT(x)$Lisp => 'false::OutputForm
+      EQ(x,'T)$Lisp => 'true::OutputForm
       EQCAR(x,'NOT)$Lisp => not(CADR(x)$Lisp : % :: OutputForm)
 
 @
-- 
cgit v1.2.3