diff options
Diffstat (limited to 'src/algebra/strap/INT.lsp')
-rw-r--r-- | src/algebra/strap/INT.lsp | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/algebra/strap/INT.lsp b/src/algebra/strap/INT.lsp index d7368a63..52c49a41 100644 --- a/src/algebra/strap/INT.lsp +++ b/src/algebra/strap/INT.lsp @@ -261,8 +261,7 @@ (PUT '|INT;dec;2$;13| '|SPADreplace| '(XLAM (|x|) (|%isub| |x| 1))) -(PUT '|INT;unitCanonical;2$;55| '|SPADreplace| - '(XLAM (|x|) (|%iabs| |x|))) +(PUT '|INT;unitCanonical;2$;55| '|SPADreplace| '|%iabs|) (DEFUN |INT;writeOMInt| (|dev| |x| $) (SEQ (COND |