aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/SETCAT-.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/strap/SETCAT-.lsp')
-rw-r--r--src/algebra/strap/SETCAT-.lsp6
1 files changed, 4 insertions, 2 deletions
diff --git a/src/algebra/strap/SETCAT-.lsp b/src/algebra/strap/SETCAT-.lsp
index b7ec1f9d..a84a276e 100644
--- a/src/algebra/strap/SETCAT-.lsp
+++ b/src/algebra/strap/SETCAT-.lsp
@@ -12,9 +12,11 @@
(PUT '|SETCAT-;latex;SS;2| '|SPADreplace|
'(XLAM (|s|) "\\mbox{\\bf Unimplemented}"))
-(DEFUN |SETCAT-;hash;SSi;1| (|s| $) 0)
+(DEFUN |SETCAT-;hash;SSi;1| (|s| $) (DECLARE (IGNORE $)) 0)
-(DEFUN |SETCAT-;latex;SS;2| (|s| $) "\\mbox{\\bf Unimplemented}")
+(DEFUN |SETCAT-;latex;SS;2| (|s| $)
+ (DECLARE (IGNORE $))
+ "\\mbox{\\bf Unimplemented}")
(DEFUN |SetCategory&| (|#1|)
(PROG (|dv$1| |dv$| $ |pv$|)