diff options
Diffstat (limited to 'src/algebra/strap/COMRING.lsp')
| -rw-r--r-- | src/algebra/strap/COMRING.lsp | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/src/algebra/strap/COMRING.lsp b/src/algebra/strap/COMRING.lsp deleted file mode 100644 index 2c90cf82..00000000 --- a/src/algebra/strap/COMRING.lsp +++ /dev/null @@ -1,19 +0,0 @@ - -(/VERSIONCHECK 2) - -(DEFPARAMETER |CommutativeRing;AL| 'NIL) - -(DEFUN |CommutativeRing;| () - (LET ((#0=#:G1372 - (|Join| (|Ring|) (|BiModule| '$ '$) - (|mkCategory| '|package| NIL - '(((|commutative| "*") T)) 'NIL NIL)))) - (SETF (|shellEntry| #0# 0) '(|CommutativeRing|)) - #0#)) - -(DEFUN |CommutativeRing| () - (COND - (|CommutativeRing;AL|) - (T (SETQ |CommutativeRing;AL| (|CommutativeRing;|))))) - -(MAKEPROP '|CommutativeRing| 'NILADIC T) |