Handbook
Glossary
badness ( word -- n )
Vocabulary
reports.noise
Inputs
word
an
object
Outputs
n
an
object
Definition
USING:
assocs
combinators
generalizations
kernel
shuffle
;
IN:
reports.noise
:
badness
( word -- n )
H{
{
npick
6
}
{
3drop
1
}
{
bi
1/2
}
{
3dup
2
}
{
nkeep
5
}
{
over
2
}
{
3curry
2
}
{
curry
1/3
}
{
napply
2
}
{
swap
1
}
{
2nip
2
}
{
cleave
2
}
{
pick
4
}
{
?if
1/2
}
{
tri*
1
}
{
spread
2
}
{
compose
1/2
}
{
2over
4
}
{
swapd
3
}
{
2keep
1
}
{
3keep
3
}
{
nwith
4
}
{
2dip
2
}
{
if
1/3
}
{
unless
1/4
}
{
ndip
5
}
{
keep
1
}
{
2curry
1
}
{
2dup
1
}
{
-nrot
5
}
{
4dup
3
}
{
when
1/4
}
{
tri
1
}
{
2drop
1
}
{
dup
1/3
}
{
nrot
5
}
{
bi@
1
}
{
dip
1
}
{
unless*
1/3
}
{
cond
1/2
}
{
ndup
3
}
{
rot
3
}
{
case
1/2
}
{
drop
1/3
}
{
ncurry
3
}
{
when*
1/3
}
{
4drop
2
}
{
ndrop
2
}
{
-rot
3
}
{
nip
2
}
{
bi*
1/2
}
{
with
1/2
}
{
2swap
3
}
}
at
0
or
;