(require "japanese.scm") (define ja-rk-rule (append '((((",") . ()) ("," "," ",")) (((".") . ()) ("." "." ".")) ((("z" " "). ())(" " " " " "))) ja-rk-rule))