1 ! Copyright (C) 2022 John Benediktsson
2 ! See http://factorcode.org/license.txt for BSD license
4 USING: accessors assocs continuations kernel math
5 math.statistics parser sequences spelling vocabs vocabs.parser ;
9 : did-you-mean ( name -- words )
10 dup all-words [ [ name>> ] histogram-by corrections ] keep
11 [ name>> swap member? ] with filter
12 <no-word-error> throw-restarts no-word-restarted ;