1 files changed, 0 insertions, 21 deletions
diff --git a/src/algebra/strap/ABELSG.lsp b/src/algebra/strap/ABELSG.lsp
deleted file mode 100644
index 5a89a18f..00000000
--- a/src/algebra/strap/ABELSG.lsp
+++ /dev/null
@@ -1,21 +0,0 @@
-
-(/VERSIONCHECK 2) 
-
-(DEFPARAMETER |AbelianSemiGroup;AL| 'NIL) 
-
-(DEFUN |AbelianSemiGroup;| ()
-  (LET ((#0=#:G1372
-            (|Join| (|SetCategory|)
-                    (|mkCategory| '|domain|
-                        '(((+ ($ $ $)) T)
-                          ((* ($ (|PositiveInteger|) $)) T))
-                        NIL '((|PositiveInteger|)) NIL))))
-    (SETF (|shellEntry| #0# 0) '(|AbelianSemiGroup|))
-    #0#)) 
-
-(DEFUN |AbelianSemiGroup| ()
-  (COND
-    (|AbelianSemiGroup;AL|)
-    (T (SETQ |AbelianSemiGroup;AL| (|AbelianSemiGroup;|))))) 
-
-(MAKEPROP '|AbelianSemiGroup| 'NILADIC T)