move file to chise/

[chise/ruby.git] / tools / t9.rb

diff --git a/tools/t9.rb b/tools/t9.rb
new file mode 100755 (executable)
index 0000000..f9495c0
--- /dev/null
+++ b/tools/t9.rb
@@ -0,0 +1,27 @@
+#!/usr/bin/env ruby
+$LOAD_PATH << '../src'
+require 'chise'
+require 'chise/kanjilist'
+include CHISE
+
+def atom_list(list)
+  list.map_character {|char|
+    d = yield(char)
+    d.char_length == 1 ? d : ""
+  }
+end
+
+def check_list(list)
+  d = atom_list(list){|char| char.decompose }
+  g = atom_list(list){|char| char.glyph_decompose }
+  da = d.to_a
+  ga = g.to_a
+  wa = da & ga
+  dd = (da - wa).join("")
+  gg = (ga - wa).join("")
+  puts "意味で分解できない文字: "+d, "これだけに含まれる文字: "+dd
+  puts   "形で分解できない文字: "+g, "これだけに含まれる文字: "+gg
+end
+
+check_list(KanjiList::JOYO_KANJI_LIST)
+check_list(KanjiList::JISX0208_KANJI_LIST)