aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/ABELGRP.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/strap/ABELGRP.lsp')
-rw-r--r--src/algebra/strap/ABELGRP.lsp22
1 files changed, 0 insertions, 22 deletions
diff --git a/src/algebra/strap/ABELGRP.lsp b/src/algebra/strap/ABELGRP.lsp
deleted file mode 100644
index a089f569..00000000
--- a/src/algebra/strap/ABELGRP.lsp
+++ /dev/null
@@ -1,22 +0,0 @@
-
-(/VERSIONCHECK 2)
-
-(DEFPARAMETER |AbelianGroup;AL| 'NIL)
-
-(DEFUN |AbelianGroup;| ()
- (LET ((#0=#:G1374
- (|sublisV| (PAIR '(#1=#:G1373) '((|Integer|)))
- (|Join| (|CancellationAbelianMonoid|)
- (|LeftLinearSet| '#1#)
- (|mkCategory| '|domain|
- '(((- ($ $)) T) ((- ($ $ $)) T)) NIL 'NIL
- NIL)))))
- (SETF (|shellEntry| #0# 0) '(|AbelianGroup|))
- #0#))
-
-(DEFUN |AbelianGroup| ()
- (COND
- (|AbelianGroup;AL|)
- (T (SETQ |AbelianGroup;AL| (|AbelianGroup;|)))))
-
-(MAKEPROP '|AbelianGroup| 'NILADIC T)