Handbook
Glossary
lowest-missing-number ( string-set -- min )
Vocabulary
escape-strings
Inputs
string-set
an
object
Outputs
min
an
object
Definition
USING:
assocs
kernel
math
math.functions
math.parser
math.statistics
ranges
sequences
sets
sorting
;
IN:
escape-strings
:
lowest-missing-number
( string-set -- min )
members
dup
[
length
]
histogram-by
dup
keys
length
[0..b]
[
[
of
]
keep
over
[
10^
<
]
[
nip
]
if
]
with
find
nip
[
[
[
length
]
]
dip
[
=
]
curry
compose
filter
sort
]
keep
[
[
drop
""
]
[
10^
<iota>
[
[
swap
?nth
dup
[
string>number
]
when
]
keep
=
not
]
with
find
nip
number>string
]
if-zero
]
keep
48
pad-head
;