;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\207" [require quail kkc] 2)
#@42 If non-nil, use type "nn" to insert ん.
(defvar quail-japanese-use-double-n nil (#$ . 147))
#@21 

(fn CONTROL-FLAG)
(defalias 'quail-japanese-update-translation #[257 "\211\204\304H\305U\204	\206\202\306\207\211\250\203wG
\304U\203.\304H\307\262\202i\304H\310U\203P\311\n\203i\211\304V\203i\312H\310U\203i\307\262\202i\211\312V\203e\304H\312HU\203e\313\202i\304H
\250\203v\314\315O\"\210\207" [quail-current-key quail-current-str quail-japanese-use-double-n unread-command-events 0 113 "" t 110 12435 1 12387 append nil] 6 (#$ . 246)])
(defalias 'quail-japanese-toggle-kana #[0 "\303\304	!\305	!\212
b\210\306\307\310#\203\311\"\210\202!\312\"\210)\304	!\305	!{\211\207" [quail-translating quail-conv-overlay quail-conversion-str nil overlay-start overlay-end re-search-forward "\\cH" t japanese-katakana-region japanese-hiragana-region] 6 nil nil])
(defalias 'quail-japanese-kanji-kkc #[0 "\305!\206`Sf\306U\203\305!Sb\210\307c\210\310\311!\210\312\313!!\305!
Z\314 \210\315\316\317\"\216\320\211\\\"\321`#\210`{
\\`U\203I\315\315\211\262
)\207" [quail-conv-overlay quail-current-str quail-conversion-str quail-converting quail-translating overlay-end 110 12435 delete-char 1 copy-marker overlay-start quail-delete-overlays nil make-closure #[0 "\300\301\211\223\207" [V0 nil] 3] kkc-region move-overlay] 7 nil nil])
#@16 

(fn KEY IDX)
(defalias 'quail-japanese-self-insert-and-switch-to-alpha #[514 "\302!\203\302!\303!|\210

SH	B\304\305\306\"\207" [quail-overlay unread-command-events overlay-start overlay-end quail-japanese-switch-package "q" 1] 5 (#$ . 1544)])
(defvar quail-japanese-switch-table '((122 . "japanese-zenkaku") (107 . "japanese-hankaku-kana") (104 . "japanese") (113 "japanese-ascii")))
(defvar quail-japanese-package-saved nil nil)
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local quail-japanese-package-saved put permanent-local t] 4)
#@16 

(fn KEY IDX)
(defalias 'quail-japanese-switch-package #[514 "\306!\203\306!\307!|\210\310\211\311

SH\f\236A\211\204'\312\313!\266\202R\211;\2034\314
!\266\202R\211@
\230\203I\203Q\314!\266\202R
\314
@!\210\210\315\316\310\"\207" [quail-overlay quail-current-str quail-converting quail-conversion-str quail-japanese-switch-table current-input-method overlay-start overlay-end nil "" quail-error "No package to be switched" activate-input-method throw quail-tag quail-japanese-package-saved] 6 (#$ . 2120)])
(defvar quail-japanese-transliteration-rules '(("a" "あ") ("i" "い") ("u" "う") ("e" "え") ("o" "お") ("ka" "か") ("ki" "き") ("ku" "く") ("ke" "け") ("ko" "こ") ("sa" "さ") ("si" "し") ("su" "す") ("se" "せ") ("so" "そ") ("ta" "た") ("ti" "ち") ("tu" "つ") ("te" "て") ("to" "と") ("na" "な") ("ni" "に") ("nu" "ぬ") ("ne" "ね") ("no" "の") ("ha" "は") ("hi" "ひ") ("hu" "ふ") ("he" "へ") ("ho" "ほ") ("ma" "ま") ("mi" "み") ("mu" "む") ("me" "め") ("mo" "も") ("ya" "や") ("yu" "ゆ") ("yo" "よ") ("ra" "ら") ("ri" "り") ("ru" "る") ("re" "れ") ("ro" "ろ") ("la" "ら") ("li" "り") ("lu" "る") ("le" "れ") ("lo" "ろ") ("wa" "わ") ("wi" "ゐ") ("wu" "う") ("we" "ゑ") ("wo" "を") ("n'" "ん") ("ga" "が") ("gi" "ぎ") ("gu" "ぐ") ("ge" "げ") ("go" "ご") ("za" "ざ") ("zi" "じ") ("zu" "ず") ("ze" "ぜ") ("zo" "ぞ") ("da" "だ") ("di" "ぢ") ("du" "づ") ("de" "で") ("do" "ど") ("ba" "ば") ("bi" "び") ("bu" "ぶ") ("be" "べ") ("bo" "ぼ") ("pa" "ぱ") ("pi" "ぴ") ("pu" "ぷ") ("pe" "ぺ") ("po" "ぽ") ("kya" ["きゃ"]) ("kyu" ["きゅ"]) ("kye" ["きぇ"]) ("kyo" ["きょ"]) ("sya" ["しゃ"]) ("syu" ["しゅ"]) ("sye" ["しぇ"]) ("syo" ["しょ"]) ("sha" ["しゃ"]) ("shu" ["しゅ"]) ("she" ["しぇ"]) ("sho" ["しょ"]) ("cha" ["ちゃ"]) ("chu" ["ちゅ"]) ("che" ["ちぇ"]) ("cho" ["ちょ"]) ("tya" ["ちゃ"]) ("tyu" ["ちゅ"]) ("tye" ["ちぇ"]) ("tyo" ["ちょ"]) ("nya" ["にゃ"]) ("nyu" ["にゅ"]) ("nye" ["にぇ"]) ("nyo" ["にょ"]) ("hya" ["ひゃ"]) ("hyu" ["ひゅ"]) ("hye" ["ひぇ"]) ("hyo" ["ひょ"]) ("mya" ["みゃ"]) ("myu" ["みゅ"]) ("mye" ["みぇ"]) ("myo" ["みょ"]) ("rya" ["りゃ"]) ("ryu" ["りゅ"]) ("rye" ["りぇ"]) ("ryo" ["りょ"]) ("lya" ["りゃ"]) ("lyu" ["りゅ"]) ("lye" ["りぇ"]) ("lyo" ["りょ"]) ("gya" ["ぎゃ"]) ("gyu" ["ぎゅ"]) ("gye" ["ぎぇ"]) ("gyo" ["ぎょ"]) ("zya" ["じゃ"]) ("zyu" ["じゅ"]) ("zye" ["じぇ"]) ("zyo" ["じょ"]) ("jya" ["じゃ"]) ("jyu" ["じゅ"]) ("jye" ["じぇ"]) ("jyo" ["じょ"]) ("ja" ["じゃ"]) ("ju" ["じゅ"]) ("je" ["じぇ"]) ("jo" ["じょ"]) ("bya" ["びゃ"]) ("byu" ["びゅ"]) ("bye" ["びぇ"]) ("byo" ["びょ"]) ("pya" ["ぴゃ"]) ("pyu" ["ぴゅ"]) ("pye" ["ぴぇ"]) ("pyo" ["ぴょ"]) ("kwa" ["くゎ"]) ("kwi" ["くぃ"]) ("kwe" ["くぇ"]) ("kwo" ["くぉ"]) ("tsa" ["つぁ"]) ("tsi" ["つぃ"]) ("tse" ["つぇ"]) ("tso" ["つぉ"]) ("fa" ["ふぁ"]) ("fi" ["ふぃ"]) ("fe" ["ふぇ"]) ("fo" ["ふぉ"]) ("gwa" ["ぐゎ"]) ("gwi" ["ぐぃ"]) ("gwe" ["ぐぇ"]) ("gwo" ["ぐぉ"]) ("dyi" ["でぃ"]) ("dyu" ["どぅ"]) ("dye" ["でぇ"]) ("dyo" ["どぉ"]) ("xwi" ["うぃ"]) ("xwe" ["うぇ"]) ("xwo" ["うぉ"]) ("shi" "し") ("tyi" ["てぃ"]) ("chi" "ち") ("tsu" "つ") ("ji" "じ") ("fu" "ふ") ("ye" ["いぇ"]) ("va" ["ヴぁ"]) ("vi" ["ヴぃ"]) ("vu" "ヴ") ("ve" ["ヴぇ"]) ("vo" ["ヴぉ"]) ("xa" "ぁ") ("xi" "ぃ") ("xu" "ぅ") ("xe" "ぇ") ("xo" "ぉ") ("xtu" "っ") ("xya" "ゃ") ("xyu" "ゅ") ("xyo" "ょ") ("xwa" "ゎ") ("xka" "ヵ") ("xke" "ヶ") ("1" "１") ("2" "２") ("3" "３") ("4" "４") ("5" "５") ("6" "６") ("7" "７") ("8" "８") ("9" "９") ("0" "０") ("!" "！") ("@" "＠") ("#" "＃") ("$" "＄") ("%" "％") ("^" "＾") ("&" "＆") ("*" "＊") ("(" "（") (")" "）") ("-" "ー") ("=" "＝") ("`" "｀") ("\\" "￥") ("|" "｜") ("_" "＿") ("+" "＋") ("~" "￣") ("[" "「") ("]" "」") ("{" "｛") ("}" "｝") (":" "：") (";" "；") ("\"" "”") ("'" "’") ("." "。") ("," "、") ("<" "＜") (">" "＞") ("?" "？") ("/" "／") ("z1" "○") ("z!" "●") ("z2" "▽") ("z@" "▼") ("z3" "△") ("z#" "▲") ("z4" "□") ("z$" "■") ("z5" "◇") ("z%" "◆") ("z6" "☆") ("z^" "★") ("z7" "◎") ("z&" "£") ("z8" "¢") ("z*" "×") ("z9" "♂") ("z(" "【") ("z0" "♀") ("z)" "】") ("z-" "〜") ("z_" "∴") ("z=" "≠") ("z+" "±") ("z\\" "＼") ("z|" "‖") ("z`" "´") ("z~" "¨") ("zq" "《") ("zQ" "〈") ("zw" "》") ("zW" "〉") ("zr" "々") ("zR" "仝") ("zt" "〆") ("zT" "§") ("zp" "〒") ("zP" "↑") ("z[" "『") ("z{" "〔") ("z]" "』") ("z}" "〕") ("zs" "ヽ") ("zS" "ヾ") ("zd" "ゝ") ("zD" "ゞ") ("zf" "〃") ("zF" "→") ("zg" "‐") ("zG" "—") ("zh" "←") ("zj" "↓") ("zk" "↑") ("zl" "→") ("z;" "゛") ("z:" "゜") ("z'" "‘") ("z\"" "“") ("zx" [":-"]) ("zX" [":-)"]) ("zc" "〇") ("zC" "℃") ("zv" "※") ("zV" "÷") ("zb" "°") ("zB" "←") ("zn" "′") ("zN" "↓") ("zm" "″") ("zM" "〓") ("z," "‥") ("z<" "≦") ("z." "…") ("z>" "≧") ("z/" "・") ("z?" "∞") ("\\\\" quail-japanese-self-insert-and-switch-to-alpha) ("{{" quail-japanese-self-insert-and-switch-to-alpha) ("}}" quail-japanese-self-insert-and-switch-to-alpha) ("qq" quail-japanese-switch-package) ("qz" quail-japanese-switch-package)))
(byte-code "\302\303\304\305\306\307\306\310\211\306\211\211\211\211\311\312&\210\211\203)\211@\313
@A@\"\210
A\266\202\202\210\302\314\304\315\306\316\306\310\211&\210\317	8\320\321!\210\203D\322\323!\210\302\324\304\325\306\326\306\310\211&\210\317	8\320\327!\210\203^\322\330!\210\306\207" [quail-japanese-transliteration-rules quail-current-package quail-define-package "japanese" "Japanese" "Aあ" nil "Japanese input method by Roman transliteration and Kana-Kanji conversion.\n\nWhen you use this input method, text entry proceeds in two stages:\nRoman-Kana transliteration and Kana-Kanji conversion.  When you start\nto enter text, you are in the first stage, Roman-Kana transliteration.\nType SPC to proceed to the next stage, Kana-Kanji conversion.\n\n:: Roman-Kana transliteration ::\n\nYou can input any Hiragana character as a sequence of lower-case\nletters, Japanese punctuation characters by typing punctuation keys,\nJapanese symbols by typing `z' followed by another key.  See below for\na list of all available sequences.  The characters you input are\nunderlined.\n\nIn addition, the following keys provide special effects:\n\nK	Change Hiragana to Katakana or Katakana to Hiragana.\nqq	Toggle between this input method and the input method `japanese-ascii'.\nqz	Shift to the input method `japanese-zenkaku'.\n	Typing \"qh\" will put you back to this input method.\nRET	Accept the current character sequence.\nSPC	Proceed to the next stage, Kana-Kanji conversion.\n\nThe input method `japanese-ascii' is used to enter ASCII characters.\nThis is almost the same as turning off the input method.  The only\ndifference is that typing `qq' will put you back into the Japanese\ninput method.\n\nThe input method `japanese-zenkaku' is used to enter full width\nJISX0208 characters corresponding to typed ASCII characters.\n\nList of the all key sequences for Roman-Kana transliteration is shown\nat the tail.\n\n:: Kana-Kanji conversion ::\n\nYou can convert the current Japanese characters (underlined) to\nKana-Kanji mixed text.  In this stage, the converted text is divided\ninto two parts, the current phrase (highlighted) and the remaining\ninput (underlined).  The following commands can be used on the\ncurrent phrase.\n\nSPC, C-n	kkc-next\n	Show the next candidate for the current phrase.\n	If successively typed `kkc-show-conversion-list-count' times,\n	conversion candidates are shown in the echo area.\nC-p		kkc-prev\n	Show the previous candidate for the current phrase.\n	If successively typed `kkc-show-conversion-list-count' times,\n	conversion candidates are shown in the echo area.\nl		kkc-show-conversion-list-or-next-group\n	Show at most 10 candidates for the current phrase in echo area.\n	If typed repeatedly, show the next 10 candidates.\nL		kkc-show-conversion-list-or-prev-group\n	Show at most 10 candidates for the current phrase in echo area.\n	If typed repeatedly, show the previous 10 candidates.\n0..9		kkc-select-from-list\n	Select a candidate corresponding to the typed number.\nH		kkc-hiragana\n	Convert the current phrase to Hiragana\nK		kkc-katakana\n	Convert the current phrase to Katakana\nC-o		kkc-longer\n	Extend the current phrase; pull in the first character of\n	the remaining input.\nC-i		kkc-shorter\n	Contract the current phrase; drop its last character\n	back into the remaining input.\nC-f		kkc-next-phrase\n	Accept the current phrase.  If there remains input, select\n	the first phrase as the current one, and show the first\n	candidate for the conversion.\nDEL, C-c	kkc-cancel\n	Cancel the conversion, shift back to the Roman-Kana\n	transliteration.\nreturn		kkc-terminate\n	Accept the whole conversion.\nC-SPC, C-@	kkc-first-char-only\n	Accept the first character of the current conversion,\n	delete the remaining input.\nC-h		kkc-help\n	List these key bindings.\n" t quail-japanese-update-translation (("K" . quail-japanese-toggle-kana) (" " . quail-japanese-kanji-kkc) ("
" . quail-no-conversion) ([return] . quail-no-conversion)) quail-defrule "japanese-ascii" "Aa" "Temporary ASCII input mode used within the input method `japanese'.\nType \"qq\" to go back to previous input method." 10 quail-install-map (nil (113 nil (113 . quail-japanese-switch-package))) quail-install-decode-map (decode-map) "japanese-zenkaku" "Ａ" "Japanese zenkaku alpha numeric character input method.\n---- Special key bindings ----\nqq:	toggle between this input method and the input method `japanese-ascii'.\nqh:	shift to the input method `japanese',\n	typing \"qz\" puts you back to this input method.\n" (nil (126 [#1="〜"]) (125 [#2="｝"]) (124 [#3="｜"]) (123 [#4="｛"]) (122 [#5="ｚ"]) (121 [#6="ｙ"]) (120 [#7="ｘ"]) (119 [#8="ｗ"]) (118 [#9="ｖ"]) (117 [#10="ｕ"]) (116 [#11="ｔ"]) (115 [#12="ｓ"]) (114 [#13="ｒ"]) (113 [#14="ｑ"] (104 . quail-japanese-switch-package) (113 . quail-japanese-switch-package)) (112 [#15="ｐ"]) (111 [#16="ｏ"]) (110 [#17="ｎ"]) (109 [#18="ｍ"]) (108 [#19="ｌ"]) (107 [#20="ｋ"]) (106 [#21="ｊ"]) (105 [#22="ｉ"]) (104 [#23="ｈ"]) (103 [#24="ｇ"]) (102 [#25="ｆ"]) (101 [#26="ｅ"]) (100 [#27="ｄ"]) (99 [#28="ｃ"]) (98 [#29="ｂ"]) (97 [#30="ａ"]) (96 [#31="‘"]) (95 [#32="＿"]) (94 [#33="＾"]) (93 [#34="］"]) (92 [#35="￥"]) (91 [#36="［"]) (90 [#37="Ｚ"]) (89 [#38="Ｙ"]) (88 [#39="Ｘ"]) (87 [#40="Ｗ"]) (86 [#41="Ｖ"]) (85 [#42="Ｕ"]) (84 [#43="Ｔ"]) (83 [#44="Ｓ"]) (82 [#45="Ｒ"]) (81 [#46="Ｑ"]) (80 [#47="Ｐ"]) (79 [#48="Ｏ"]) (78 [#49="Ｎ"]) (77 [#50="Ｍ"]) (76 [#51="Ｌ"]) (75 [#52="Ｋ"]) (74 [#53="Ｊ"]) (73 [#54="Ｉ"]) (72 [#55="Ｈ"]) (71 [#56="Ｇ"]) (70 [#57="Ｆ"]) (69 [#58="Ｅ"]) (68 [#59="Ｄ"]) (67 [#60="Ｃ"]) (66 [#61="Ｂ"]) (65 [#62="Ａ"]) (64 [#63="＠"]) (63 [#64="？"]) (62 [#65="＞"]) (61 [#66="＝"]) (60 [#67="＜"]) (59 [#68="；"]) (58 [#69="："]) (57 [#70="９"]) (56 [#71="８"]) (55 [#72="７"]) (54 [#73="６"]) (53 [#74="５"]) (52 [#75="４"]) (51 [#76="３"]) (50 [#77="２"]) (49 [#78="１"]) (48 [#79="０"]) (47 [#80="／"]) (46 [#81="．"]) (45 [#82="−"]) (44 [#83="，"]) (43 [#84="＋"]) (42 [#85="＊"]) (41 [#86="）"]) (40 [#87="（"]) (39 [#88="′"]) (38 [#89="＆"]) (37 [#90="％"]) (36 [#91="＄"]) (35 [#92="＃"]) (34 [#93="″"]) (33 [#94="！"]) (32 [#95="　"])) (decode-map (#1# . "~") (#2# . "}") (#3# . "|") (#4# . "{") (#5# . "z") (#6# . "y") (#7# . "x") (#8# . "w") (#9# . "v") (#10# . "u") (#11# . "t") (#12# . "s") (#13# . "r") (#14# . "q") (#15# . "p") (#16# . "o") (#17# . "n") (#18# . "m") (#19# . "l") (#20# . "k") (#21# . "j") (#22# . "i") (#23# . "h") (#24# . "g") (#25# . "f") (#26# . "e") (#27# . "d") (#28# . "c") (#29# . "b") (#30# . "a") (#31# . "`") (#32# . "_") (#33# . "^") (#34# . "]") (#35# . "\\") (#36# . "[") (#37# . "Z") (#38# . "Y") (#39# . "X") (#40# . "W") (#41# . "V") (#42# . "U") (#43# . "T") (#44# . "S") (#45# . "R") (#46# . "Q") (#47# . "P") (#48# . "O") (#49# . "N") (#50# . "M") (#51# . "L") (#52# . "K") (#53# . "J") (#54# . "I") (#55# . "H") (#56# . "G") (#57# . "F") (#58# . "E") (#59# . "D") (#60# . "C") (#61# . "B") (#62# . "A") (#63# . "@") (#64# . "?") (#65# . ">") (#66# . "=") (#67# . "<") (#68# . ";") (#69# . ":") (#70# . "9") (#71# . "8") (#72# . "7") (#73# . "6") (#74# . "5") (#75# . "4") (#76# . "3") (#77# . "2") (#78# . "1") (#79# . "0") (#80# . "/") (#81# . ".") (#82# . "-") (#83# . ",") (#84# . "+") (#85# . "*") (#86# . ")") (#87# . "(") (#88# . "'") (#89# . "&") (#90# . "%") (#91# . "$") (#92# . "#") (#93# . "\"") (#94# . "!") (#95# . " "))] 16)
#@21 

(fn CONTROL-FLAG)
(defalias 'quail-japanese-hankaku-update-translation #[257 "\301
!\262
;\203G\302V\204\250\203\303!\207" [quail-current-str quail-japanese-update-translation 0 japanese-hankaku] 3 (#$ . 14977)])
(byte-code "\303\304\305\306\307\310\307\311\211\307\211\211\211\211\312&\210\211\203Z\211@\313
@A@\211;\204*\314
!\203N\315
;\2034
\2027
\316H!\211;\203L\211G\317V\203L\320
!\266\202\202N\262
\211\262
\"\210
A\266\202\202\210\303\321\305\322\307\323\307\311\211\307\211\211\211\211\324&\210	AA\325\326\327\n\"8\240\207" [quail-japanese-transliteration-rules quail-current-package quail-package-alist quail-define-package "japanese-hankaku-kana" "Japanese" "ｱ" nil "Japanese hankaku katakana input method by Roman transliteration.\n---- Special key bindings ----\nqq:	toggle between this input method and the input method `japanese-ascii'.\n" t quail-japanese-hankaku-update-translation quail-defrule vectorp japanese-hankaku 0 1 vector "japanese-hiragana" "あ" "Japanese hiragana input method by Roman transliteration." quail-japanese-update-translation 2 assoc "japanese"] 15)
#@21 

(fn CONTROL-FLAG)
(defalias 'quail-japanese-katakana-update-translation #[257 "\301
!\262
;\203G\302V\204\250\203\303!\207" [quail-current-str quail-japanese-update-translation 0 japanese-katakana] 3 (#$ . 16105)])
(byte-code "\301\302\303\304\305\306\305\307\211\305\211\211\211\211\310&\210\211\203F\211@\311
@A@\211;\203*\312
!\202;\313
!\203:\314\312\315H!!\202;\211\262
\"\210
A\266\202\202\207" [quail-japanese-transliteration-rules quail-define-package "japanese-katakana" "Japanese" "ア" nil "Japanese katakana input method by Roman transliteration." t quail-japanese-katakana-update-translation quail-defrule japanese-katakana vectorp vector 0] 15)