aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/ABELSG-.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/strap/ABELSG-.lsp')
-rw-r--r--src/algebra/strap/ABELSG-.lsp4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/algebra/strap/ABELSG-.lsp b/src/algebra/strap/ABELSG-.lsp
index 4f99c6ad..a248d398 100644
--- a/src/algebra/strap/ABELSG-.lsp
+++ b/src/algebra/strap/ABELSG-.lsp
@@ -1,6 +1,10 @@
(/VERSIONCHECK 2)
+(DECLAIM (FTYPE (FUNCTION ((|%IntegerSection| 1) |%Thing| |%Shell|)
+ |%Thing|)
+ |ABELSG-;*;Pi2S;1|))
+
(DEFUN |ABELSG-;*;Pi2S;1| (|n| |x| $)
(SPADCALL |n| |x| (|getShellEntry| $ 9)))