diff options
Diffstat (limited to 'src/algebra/strap/DIFRING.lsp')
| -rw-r--r-- | src/algebra/strap/DIFRING.lsp | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/src/algebra/strap/DIFRING.lsp b/src/algebra/strap/DIFRING.lsp index 63e3b4fd..89e91f31 100644 --- a/src/algebra/strap/DIFRING.lsp +++ b/src/algebra/strap/DIFRING.lsp @@ -17,7 +17,7 @@ ((D ($ $ (|NonNegativeInteger|))) T)) NIL '((|NonNegativeInteger|)) NIL)) |DifferentialRing|) - (SETELT #0# 0 '(|DifferentialRing|)))))) + (|setShellEntry| #0# 0 '(|DifferentialRing|)))))) (DEFUN |DifferentialRing| () (LET () @@ -25,10 +25,4 @@ (|DifferentialRing;AL|) (T (SETQ |DifferentialRing;AL| (|DifferentialRing;|)))))) -(SETQ |$CategoryFrame| - (|put| '|DifferentialRing| '|isCategory| T - (|addModemap| '|DifferentialRing| '(|DifferentialRing|) - '((|Category|)) T '|DifferentialRing| - |$CategoryFrame|))) - (MAKEPROP '|DifferentialRing| 'NILADIC T) |