Merge pull request #278 from AlexKnauth/flatten

add type for flatten
This commit is contained in:
Sam Tobin-Hochstadt 2015-12-29 17:24:43 -05:00
commit 3a7e616f97

View File

@ -771,6 +771,8 @@
((-lst b) b) . ->... .(-lst c)))]
[append*
(-poly (a) ((-lst (-lst a)) . -> . (-lst a)))]
[flatten
(Univ . -> . (-lst Univ))]
[permutations (-poly (a) (-> (-lst a) (-lst (-lst a))))]
[in-permutations (-poly (a) (-> (-lst a) (-seq (-lst a))))]
[argmin (-poly (a) ((a . -> . -Real) (-lst a) . -> . a))]