list-tail
svn: r12017 original commit: c08e09ae6ca4cdcffb3bd79d6f5b01c3f752fbe6
This commit is contained in:
parent
01be0f1dd8
commit
e87cb50bd2
|
@ -235,7 +235,8 @@
|
|||
[assf (-poly (a b) ((a . -> . Univ) (-lst (-pair a b))
|
||||
. -> . (-opt (-pair a b))))]
|
||||
|
||||
[list-ref (-poly (a) ((-lst a) -Integer . -> . a))]
|
||||
[list-ref (-poly (a) ((-lst a) -Integer . -> . a))]
|
||||
[list-tail (-poly (a) ((-lst a) -Integer . -> . (-lst a)))]
|
||||
[positive? (-> N B)]
|
||||
[negative? (-> N B)]
|
||||
[odd? (-> N B)]
|
||||
|
|
Loading…
Reference in New Issue
Block a user