(require "japanese.scm") (define default-im-name 'skk) (define ja-rk-rule (append '( ((("z" "h"). ())("¢«" "¢«" "¢«")) ((("z" "j"). ())("¢­" "¢­" "¢­")) ((("z" "k"). ())("¢¬" "¢¬" "¢¬")) ((("z" "l"). ())("¢ª" "¢ª" "¢ª")) ((("z" "."). ())("¡Ä" "¡Ä" "¡Ä")) ((("z" ","). ())("¡Å" "¡Å" "¡Å")) ((("z" "/"). ())("¡¦" "¡¦" "¡¦")) ((("z" "^"). ())("¡Á" "¡Á" "¡Á")) ((("z" "-"). ())("¡Ý" "¡Ý" "¡Ý")) ((("z" "["). ())("¡Ø" "¡Ø" "¡Ø")) ((("z" "]"). ())("¡Ù" "¡Ù" "¡Ù")) ((("z" " "). ())("¡¡" "¡¡" "¡¡")) ((("z" "("). ())("¡Ê" "¡Ê" "¡Ê")) ((("z" ")"). ())("¡Ë" "¡Ë" "¡Ë")) ((("z" "@"). ())("¡÷" "¡÷" "¡÷")) ) ja-rk-rule))