add in-range
This commit is contained in:
parent
eb56a1006f
commit
96daa7518a
|
@ -17,6 +17,7 @@
|
||||||
sequence-add-between
|
sequence-add-between
|
||||||
in-list
|
in-list
|
||||||
in-set
|
in-set
|
||||||
|
in-range
|
||||||
)
|
)
|
||||||
|
|
||||||
(require "core-types.rkt")
|
(require "core-types.rkt")
|
||||||
|
@ -48,7 +49,8 @@
|
||||||
[sequence-add-between : (∀ (X) (→fn (Sequence X) X (Sequence X)))])
|
[sequence-add-between : (∀ (X) (→fn (Sequence X) X (Sequence X)))])
|
||||||
|
|
||||||
(require/typed racket/base
|
(require/typed racket/base
|
||||||
[in-list : (∀ (X) (→fn (List X) (Sequence X)))])
|
[in-list : (∀ (X) (→fn (List X) (Sequence X)))]
|
||||||
|
[in-range : (→fn Int (Sequence Int))])
|
||||||
(require/typed racket/set
|
(require/typed racket/set
|
||||||
[in-set : (∀ (X) (→fn (Set X) (Sequence X)))])
|
[in-set : (∀ (X) (→fn (Set X) (Sequence X)))])
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue