Scheme で Alcor の Abbreviation Scoring - 月の塵Schemevia Alcor の Abbreviation Scoring - steps to phantasienQuickSilver は使ったことがないのだけれどアルゴリズムが気になったので実装してみた。 Ruby 版からの翻訳で、原版は読んでいない。 アルゴリズムコードだけだとよくわからなかったので、自然言語で書き出してみた。文字列 str = c0 c1 ... cn に対するパターン pat = p0 p1 ... pm のスコア score(str, pat) を次のように定義する。n m のとき score(str, pat) = 0m = 0 のとき score(str, pat) = 0.9 それ以外の場合、 0 ≤ l ≤ m なる l について、 初期値 l := m として l を減少させながらスコアを求める l = 0 のとき、 score(str, pat
