aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/ABELSG.lsp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-03-07 05:49:53 +0000
committerdos-reis <gdr@axiomatics.org>2011-03-07 05:49:53 +0000
commita03b7716749e9fb997d99659967aa49ae6ca1569 (patch)
treef9ea530df62ac41622e2180077fb4d07aebd7d64 /src/algebra/strap/ABELSG.lsp
parent13c00cb56547feb8cd6b5b3c6386a881072862f6 (diff)
downloadopen-axiom-a03b7716749e9fb997d99659967aa49ae6ca1569.tar.gz
* interp/sys-utility.boot (getSystemModulePath): Use
systemAlgebraDirectory. * interp/database.boot (pathToDatabase): Use systemDatabaseDirectory. * algebra/integer.spad.pamphlet (Integer) [latex]: Tidy. * algebra/string.spad.pamphlet (Character) [latex]: Likewise. * algebra/Makefile.in: Rework bootstrapping set up. (COMPILE_LISP): Remove. (axiom_algebra_layer_strap): Likewise. (axiom_algebra_layer_strap_objects): Likewise. (axiom_algebra_bootstrap): Likewise. (oa_strap_0_fasls): New. (oa_strap_1_fasls): Likewise. (oa_strap_2_fasls): Likewise. (oa_strap_0_sources): Likewise. (oa_strap_1_sources): Likewise. (oa_strap_2_sources): Likewise. * src/algerab/strap: Remove.
Diffstat (limited to 'src/algebra/strap/ABELSG.lsp')
-rw-r--r--src/algebra/strap/ABELSG.lsp21
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)