leim/quail/latin-post.el

   1 ;; Quail packages for inputting various European characters.
   2
   3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
   4 ;; Licensed to the Free Software Foundation.
   5
   6 ;; Keywords: multilingual, input method, latin
   7
   8 ;; This file is part of GNU Emacs.
   9
  10 ;; GNU Emacs is free software; you can redistribute it and/or modify
  11 ;; it under the terms of the GNU General Public License as published by
  12 ;; the Free Software Foundation; either version 2, or (at your option)
  13 ;; any later version.
  14
  15 ;; GNU Emacs is distributed in the hope that it will be useful,
  16 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 ;; GNU General Public License for more details.
  19
  20 ;; You should have received a copy of the GNU General Public License
  21 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
  22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  23 ;; Boston, MA 02111-1307, USA.
  24
  25 ;; Author: TAKAHASHI Naoto <ntakahas@etl.go.jp>
  26
  27 (require 'quail)
  28
  29 (quail-define-package
  30  "latin-1-postfix" "Latin-1" "1<" t
  31  "Latin-1 character input method with postfix modifiers
  32
  33              | postfix | examples
  34  ------------+---------+----------
  35   acute      |    '    | a' -> \e,Aa\e(B
  36   grave      |    `    | a` -> \e,A`\e(B
  37   circumflex |    ^    | a^ -> \e,Ab\e(B
  38   diaeresis  |    \"    | a\" -> \e,Ad\e(B
  39   tilde      |    ~    | a~ -> \e,Ac\e(B
  40   cedilla    |    ,    | c, -> \e,Ag\e(B
  41   nordic     |    /    | d/ -> \e,Ap\e(B   t/ -> \e,A~\e(B   a/ -> \e,Ae\e(B   e/ -> \e,Af\e(B   o/ -> \e,Ax\e(B
  42   others     |    /    | s/ -> \e,A_\e(B   ?/ -> \e,A?\e(B   !/ -> \e,A!\e(B   // -> \e,A0\e(B
  43              | various | << -> \e,A+\e(B   >> -> \e,A;\e(B   o_ -> \e,A:\e(B   a_ -> \e,A*\e(B
  44
  45 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  46 " nil t nil nil nil nil nil nil nil nil t)
  47
  48 (quail-define-rules
  49  ("A`" ?\e,A@\e(B)
  50  ("A'" ?\e,AA\e(B)
  51  ("A^" ?\e,AB\e(B)
  52  ("A~" ?\e,AC\e(B)
  53  ("A\"" ?\e,AD\e(B)
  54  ("A/" ?\e,AE\e(B)
  55  ("a`" ?\e,A`\e(B)
  56  ("a'" ?\e,Aa\e(B)
  57  ("a^" ?\e,Ab\e(B)
  58  ("a~" ?\e,Ac\e(B)
  59  ("a\"" ?\e,Ad\e(B)
  60  ("a/" ?\e,Ae\e(B)
  61  ("E`" ?\e,AH\e(B)
  62  ("E'" ?\e,AI\e(B)
  63  ("E^" ?\e,AJ\e(B)
  64  ("E\"" ?\e,AK\e(B)
  65  ("E/" ?\e,AF\e(B)
  66  ("e`" ?\e,Ah\e(B)
  67  ("e'" ?\e,Ai\e(B)
  68  ("e^" ?\e,Aj\e(B)
  69  ("e\"" ?\e,Ak\e(B)
  70  ("e/" ?\e,Af\e(B)
  71  ("I`" ?\e,AL\e(B)
  72  ("i`" ?\e,Al\e(B)
  73  ("I'" ?\e,AM\e(B)
  74  ("i'" ?\e,Am\e(B)
  75  ("I^" ?\e,AN\e(B)
  76  ("i^" ?\e,An\e(B)
  77  ("I\"" ?\e,AO\e(B)
  78  ("i\"" ?\e,Ao\e(B)
  79  ("O`" ?\e,AR\e(B)
  80  ("o`" ?\e,Ar\e(B)
  81  ("O'" ?\e,AS\e(B)
  82  ("o'" ?\e,As\e(B)
  83  ("O^" ?\e,AT\e(B)
  84  ("o^" ?\e,At\e(B)
  85  ("O~" ?\e,AU\e(B)
  86  ("o~" ?\e,Au\e(B)
  87  ("O\"" ?\e,AV\e(B)
  88  ("o\"" ?\e,Av\e(B)
  89  ("O/" ?\e,AX\e(B)
  90  ("o/" ?\e,Ax\e(B)
  91  ("U`" ?\e,AY\e(B)
  92  ("u`" ?\e,Ay\e(B)
  93  ("U'" ?\e,AZ\e(B)
  94  ("u'" ?\e,Az\e(B)
  95  ("U^" ?\e,A[\e(B)
  96  ("u^" ?\e,A{\e(B)
  97  ("U\"" ?\e,A\\e(B)
  98  ("u\"" ?\e,A|\e(B)
  99  ("Y'" ?\e,A]\e(B)
 100  ("y'" ?\e,A}\e(B)
 101  ("y\"" ?\e,A\x7f\e(B)
 102  ("D/" ?\e,AP\e(B)
 103  ("d/" ?\e,Ap\e(B)
 104  ("T/" ?\e,A^\e(B)
 105  ("t/" ?\e,A~\e(B)
 106  ("s/" ?\e,A_\e(B)
 107  ("C," ?\e,AG\e(B)
 108  ("c," ?\e,Ag\e(B)
 109  ("N~" ?\e,AQ\e(B)
 110  ("n~" ?\e,Aq\e(B)
 111  ("?/" ?\e,A?\e(B)
 112  ("!/" ?\e,A!\e(B)
 113  ("<<" ?\e,A+\e(B)
 114  (">>" ?\e,A;\e(B)
 115  ("o_" ?\e,A:\e(B)
 116  ("a_" ?\e,A*\e(B)
 117  ("//" ?\e,A0\e(B)
 118
 119  ("A``" ["A`"])
 120  ("A''" ["A'"])
 121  ("A^^" ["A^"])
 122  ("A~~" ["A~"])
 123  ("A\"\"" ["A\""])
 124  ("A//" ["A/"])
 125  ("a``" ["a`"])
 126  ("a''" ["a'"])
 127  ("a^^" ["a^"])
 128  ("a~~" ["a~"])
 129  ("a\"\"" ["a\""])
 130  ("a//" ["a/"])
 131  ("E``" ["E`"])
 132  ("E''" ["E'"])
 133  ("E^^" ["E^"])
 134  ("E\"\"" ["E\""])
 135  ("E//" ["E/"])
 136  ("e``" ["e`"])
 137  ("e''" ["e'"])
 138  ("e^^" ["e^"])
 139  ("e\"\"" ["e\""])
 140  ("e//" ["e/"])
 141  ("I``" ["I`"])
 142  ("i``" ["i`"])
 143  ("I''" ["I'"])
 144  ("i''" ["i'"])
 145  ("I^^" ["I^"])
 146  ("i^^" ["i^"])
 147  ("I\"\"" ["I\""])
 148  ("i\"\"" ["i\""])
 149  ("O``" ["O`"])
 150  ("o``" ["o`"])
 151  ("O''" ["O'"])
 152  ("o''" ["o'"])
 153  ("O^^" ["O^"])
 154  ("o^^" ["o^"])
 155  ("O~~" ["O~"])
 156  ("o~~" ["o~"])
 157  ("O\"\"" ["O\""])
 158  ("o\"\"" ["o\""])
 159  ("O//" ["O/"])
 160  ("o//" ["o/"])
 161  ("U``" ["U`"])
 162  ("u``" ["u`"])
 163  ("U''" ["U'"])
 164  ("u''" ["u'"])
 165  ("U^^" ["U^"])
 166  ("u^^" ["u^"])
 167  ("U\"\"" ["U\""])
 168  ("u\"\"" ["u\""])
 169  ("Y''" ["Y'"])
 170  ("y''" ["y'"])
 171  ("y\"\"" ["y\""])
 172  ("D//" ["D/"])
 173  ("d//" ["d/"])
 174  ("T//" ["T/"])
 175  ("t//" ["t/"])
 176  ("s//" ["s/"])
 177  ("C,," ["C,"])
 178  ("c,," ["c,"])
 179  ("N~~" ["N~"])
 180  ("n~~" ["n~"])
 181  ("?//" ["?/"])
 182  ("!//" ["!/"])
 183  ("<<<" ["<<"])
 184  (">>>" [">>"])
 185  ("o__" ["o_"])
 186  ("a__" ["a_"])
 187  ("///" ["//"])
 188  )
 189
 190 (quail-define-package
 191  "latin-2-postfix" "Latin-2" "2<" t
 192  "Latin-2 character input method with postfix modifiers
 193
 194              | postfix | examples
 195  ------------+---------+----------
 196   acute      |    '    | a' -> \e,Ba\e(B
 197   ogonek     |    ,    | a, -> \e,B1\e(B
 198   diaeresis  |    \"    | a\" -> \e,Bd\e(B
 199   circumflex |    ^    | a^ -> \e,Bb\e(B
 200   breve      |    ~    | a~ -> \e,Bc\e(B
 201   cedilla    |    ,    | c, -> \e,Bg\e(B
 202   caron      |    ~    | c~ -> \e,Bh\e(B
 203   dbl. acute |    :    | o: -> \e,Bu\e(B
 204   ring       |    .    | u. -> \e,By\e(B
 205   dot        |    .    | z. -> \e,B?\e(B
 206   stroke     |    /    | d/ -> \e,Bp\e(B
 207   others     |    /    | s/ -> \e,B_\e(B
 208
 209 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
 210 " nil t nil nil nil nil nil nil nil nil t)
 211
 212 (quail-define-rules
 213  ("A'" ?\e,BA\e(B)
 214  ("A," ?\e,B!\e(B)
 215  ("A\"" ?\e,BD\e(B)
 216  ("A^" ?\e,BB\e(B)
 217  ("A~" ?\e,BC\e(B)
 218  ("C'" ?\e,BF\e(B)
 219  ("C," ?\e,BG\e(B)
 220  ("C~" ?\e,BH\e(B)
 221  ("D/" ?\e,BP\e(B)
 222  ("D~" ?\e,BO\e(B)
 223  ("E'" ?\e,BI\e(B)
 224  ("E," ?\e,BJ\e(B)
 225  ("E\"" ?\e,BK\e(B)
 226  ("E~" ?\e,BL\e(B)
 227  ("I'" ?\e,BM\e(B)
 228  ("I^" ?\e,BN\e(B)
 229  ("L'" ?\e,BE\e(B)
 230  ("L/" ?\e,B#\e(B)
 231  ("L~" ?\e,B%\e(B)
 232  ("N'" ?\e,BQ\e(B)
 233  ("N~" ?\e,BR\e(B)
 234  ("O'" ?\e,BS\e(B)
 235  ("O:" ?\e,BU\e(B)
 236  ("O\"" ?\e,BV\e(B)
 237  ("O^" ?\e,BT\e(B)
 238  ("R'" ?\e,B@\e(B)
 239  ("R~" ?\e,BX\e(B)
 240  ("S'" ?\e,B&\e(B)
 241  ("S," ?\e,B*\e(B)
 242  ("S~" ?\e,B)\e(B)
 243  ("T," ?\e,B^\e(B)
 244  ("T~" ?\e,B+\e(B)
 245  ("U'" ?\e,BZ\e(B)
 246  ("U:" ?\e,B[\e(B)
 247  ("U\"" ?\e,B\\e(B)
 248  ("U." ?\e,BY\e(B)
 249  ("Y'" ?\e,B]\e(B)
 250  ("Z'" ?\e,B,\e(B)
 251  ("Z." ?\e,B/\e(B)
 252  ("Z~" ?\e,B.\e(B)
 253  ("a'" ?\e,Ba\e(B)
 254  ("a," ?\e,B1\e(B)
 255  ("a\"" ?\e,Bd\e(B)
 256  ("a^" ?\e,Bb\e(B)
 257  ("a~" ?\e,Bc\e(B)
 258  ("c'" ?\e,Bf\e(B)
 259  ("c," ?\e,Bg\e(B)
 260  ("c~" ?\e,Bh\e(B)
 261  ("d/" ?\e,Bp\e(B)
 262  ("d~" ?\e,Bo\e(B)
 263  ("e'" ?\e,Bi\e(B)
 264  ("e," ?\e,Bj\e(B)
 265  ("e\"" ?\e,Bk\e(B)
 266  ("e~" ?\e,Bl\e(B)
 267  ("i'" ?\e,Bm\e(B)
 268  ("i^" ?\e,Bn\e(B)
 269  ("l'" ?\e,Be\e(B)
 270  ("l/" ?\e,B3\e(B)
 271  ("l~" ?\e,B5\e(B)
 272  ("n'" ?\e,Bq\e(B)
 273  ("n~" ?\e,Br\e(B)
 274  ("o'" ?\e,Bs\e(B)
 275  ("o:" ?\e,Bu\e(B)
 276  ("o\"" ?\e,Bv\e(B)
 277  ("o^" ?\e,Bt\e(B)
 278  ("r'" ?\e,B`\e(B)
 279  ("r~" ?\e,Bx\e(B)
 280  ("s'" ?\e,B6\e(B)
 281  ("s," ?\e,B:\e(B)
 282  ("s/" ?\e,B_\e(B)
 283  ("s~" ?\e,B9\e(B)
 284  ("t," ?\e,B~\e(B)
 285  ("t~" ?\e,B;\e(B)
 286  ("u'" ?\e,Bz\e(B)
 287  ("u:" ?\e,B{\e(B)
 288  ("u\"" ?\e,B|\e(B)
 289  ("u." ?\e,By\e(B)
 290  ("y'" ?\e,B}\e(B)
 291  ("z'" ?\e,B<\e(B)
 292  ("z." ?\e,B?\e(B)
 293  ("z~" ?\e,B>\e(B)
 294
 295  ("A''" ["A'"])
 296  ("A,," ["A,"])
 297  ("A\"\"" ["A\""])
 298  ("A^^" ["A^"])
 299  ("A~~" ["A~"])
 300  ("C''" ["C'"])
 301  ("C,," ["C,"])
 302  ("C~~" ["C~"])
 303  ("D//" ["D/"])
 304  ("D~~" ["D~"])
 305  ("E''" ["E'"])
 306  ("E,," ["E,"])
 307  ("E\"\"" ["E\""])
 308  ("E~~" ["E~"])
 309  ("I''" ["I'"])
 310  ("I^^" ["I^"])
 311  ("L''" ["L'"])
 312  ("L//" ["L/"])
 313  ("L~~" ["L~"])
 314  ("N''" ["N'"])
 315  ("N~~" ["N~"])
 316  ("O''" ["O'"])
 317  ("O::" ["O:"])
 318  ("O\"\"" ["O\""])
 319  ("O^^" ["O^"])
 320  ("R''" ["R'"])
 321  ("R~~" ["R~"])
 322  ("S''" ["S'"])
 323  ("S,," ["S,"])
 324  ("S~~" ["S~"])
 325  ("T,," ["T,"])
 326  ("T~~" ["T~"])
 327  ("U''" ["U'"])
 328  ("U::" ["U:"])
 329  ("U\"\"" ["U\""])
 330  ("U.." ["U."])
 331  ("Y''" ["Y'"])
 332  ("Z''" ["Z'"])
 333  ("Z.." ["Z."])
 334  ("Z~~" ["Z~"])
 335  ("a''" ["a'"])
 336  ("a,," ["a,"])
 337  ("a\"\"" ["a\""])
 338  ("a^^" ["a^"])
 339  ("a~~" ["a~"])
 340  ("c''" ["c'"])
 341  ("c,," ["c,"])
 342  ("c~~" ["c~"])
 343  ("d//" ["d/"])
 344  ("d~~" ["d~"])
 345  ("e''" ["e'"])
 346  ("e,," ["e,"])
 347  ("e\"\"" ["e\""])
 348  ("e~~" ["e~"])
 349  ("i''" ["i'"])
 350  ("i^^" ["i^"])
 351  ("l''" ["l'"])
 352  ("l//" ["l/"])
 353  ("l~~" ["l~"])
 354  ("n''" ["n'"])
 355  ("n~~" ["n~"])
 356  ("o''" ["o'"])
 357  ("o::" ["o:"])
 358  ("o\"\"" ["o\""])
 359  ("o^^" ["o^"])
 360  ("r''" ["r'"])
 361  ("r~~" ["r~"])
 362  ("s''" ["s'"])
 363  ("s,," ["s,"])
 364  ("s//" ["s/"])
 365  ("s~~" ["s~"])
 366  ("t,," ["t,"])
 367  ("t~~" ["t~"])
 368  ("u''" ["u'"])
 369  ("u::" ["u:"])
 370  ("u\"\"" ["u\""])
 371  ("u.." ["u."])
 372  ("y''" ["y'"])
 373  ("z''" ["z'"])
 374  ("z.." ["z."])
 375  ("z~~" ["z~"])
 376  )
 377
 378 (quail-define-package
 379  "latin-3-postfix" "Latin-3" "3<" t
 380  "Latin-3 character input method with postfix modifiers
 381
 382              | postfix | examples
 383  ------------+---------+----------
 384   acute      |    '    | a' -> \e,Ca\e(B
 385   grave      |    `    | a` -> \e,C`\e(B
 386   circumflex |    ^    | a^ -> \e,Cb\e(B
 387   diaeresis  |    \"    | a\" -> \e,Cd\e(B
 388   dot        |    .    | c. -> \e,Ce\e(B   i. -> \e,C9\e(B   I. -> \e,C)\e(B
 389   cedilla    |    ,    | c, -> \e,Cg\e(B
 390   breve      |    ~    | g~ -> \e,C;\e(B
 391   tilde      |    ~    | n~ -> \e,Cq\e(B
 392   stroke     |    /    | h/ -> \e,C1\e(B
 393   others     |    /    | s/ -> \e,C_\e(B
 394
 395 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
 396 " nil t nil nil nil nil nil nil nil nil t)
 397
 398 (quail-define-rules
 399  ("A`" ?\e,C@\e(B)
 400  ("A'" ?\e,CA\e(B)
 401  ("A^" ?\e,CB\e(B)
 402  ("A\"" ?\e,CD\e(B)
 403  ("C." ?\e,CE\e(B)
 404  ("C^" ?\e,CF\e(B)
 405  ("C," ?\e,CG\e(B)
 406  ("E`" ?\e,CH\e(B)
 407  ("E'" ?\e,CI\e(B)
 408  ("E^" ?\e,CJ\e(B)
 409  ("E\"" ?\e,CK\e(B)
 410  ("G~" ?\e,C+\e(B)
 411  ("G." ?\e,CU\e(B)
 412  ("G^" ?\e,CX\e(B)
 413  ("H/" ?\e,C!\e(B)
 414  ("H^" ?\e,C&\e(B)
 415  ("I." ?\e,C)\e(B)
 416  ("I`" ?\e,CL\e(B)
 417  ("I'" ?\e,CM\e(B)
 418  ("I^" ?\e,CN\e(B)
 419  ("I\"" ?\e,CO\e(B)
 420  ("J^" ?\e,C,\e(B)
 421  ("N~" ?\e,CQ\e(B)
 422  ("O`" ?\e,CR\e(B)
 423  ("O'" ?\e,CS\e(B)
 424  ("O^" ?\e,CT\e(B)
 425  ("O\"" ?\e,CV\e(B)
 426  ("S," ?\e,C*\e(B)
 427  ("S^" ?\e,C^\e(B)
 428  ("U`" ?\e,CY\e(B)
 429  ("U'" ?\e,CZ\e(B)
 430  ("U^" ?\e,C[\e(B)
 431  ("U\"" ?\e,C\\e(B)
 432  ("U~" ?\e,C]\e(B)
 433  ("Z." ?\e,C/\e(B)
 434  ("a`" ?\e,C`\e(B)
 435  ("a'" ?\e,Ca\e(B)
 436  ("a^" ?\e,Cb\e(B)
 437  ("a\"" ?\e,Cd\e(B)
 438  ("c." ?\e,Ce\e(B)
 439  ("c^" ?\e,Cf\e(B)
 440  ("c," ?\e,Cg\e(B)
 441  ("e`" ?\e,Ch\e(B)
 442  ("e'" ?\e,Ci\e(B)
 443  ("e^" ?\e,Cj\e(B)
 444  ("e\"" ?\e,Ck\e(B)
 445  ("g~" ?\e,C;\e(B)
 446  ("g." ?\e,Cu\e(B)
 447  ("g^" ?\e,Cx\e(B)
 448  ("h/" ?\e,C1\e(B)
 449  ("h^" ?\e,C6\e(B)
 450  ("i." ?\e,C9\e(B)
 451  ("i`" ?\e,Cl\e(B)
 452  ("i'" ?\e,Cm\e(B)
 453  ("i^" ?\e,Cn\e(B)
 454  ("i\"" ?\e,Co\e(B)
 455  ("j^" ?\e,C<\e(B)
 456  ("n~" ?\e,Cq\e(B)
 457  ("o`" ?\e,Cr\e(B)
 458  ("o'" ?\e,Cs\e(B)
 459  ("o^" ?\e,Ct\e(B)
 460  ("o\"" ?\e,Cv\e(B)
 461  ("s," ?\e,C:\e(B)
 462  ("s/" ?\e,C_\e(B)
 463  ("s^" ?\e,C~\e(B)
 464  ("u`" ?\e,Cy\e(B)
 465  ("u'" ?\e,Cz\e(B)
 466  ("u^" ?\e,C{\e(B)
 467  ("u\"" ?\e,C|\e(B)
 468  ("u~" ?\e,C}\e(B)
 469  ("z." ?\e,C?\e(B)
 470
 471  ("A``" ["A`"])
 472  ("A''" ["A'"])
 473  ("A^^" ["A^"])
 474  ("A\"\"" ["A\""])
 475  ("C.." ["C."])
 476  ("C^^" ["C^"])
 477  ("C,," ["C,"])
 478  ("E``" ["E`"])
 479  ("E''" ["E'"])
 480  ("E^^" ["E^"])
 481  ("E\"\"" ["E\""])
 482  ("G~~" ["G~"])
 483  ("G.." ["G."])
 484  ("G^^" ["G^"])
 485  ("H//" ["H/"])
 486  ("H^^" ["H^"])
 487  ("I.." ["I."])
 488  ("I``" ["I`"])
 489  ("I''" ["I'"])
 490  ("I^^" ["I^"])
 491  ("I\"\"" ["I\""])
 492  ("J^^" ["J^"])
 493  ("N~~" ["N~"])
 494  ("O``" ["O`"])
 495  ("O''" ["O'"])
 496  ("O^^" ["O^"])
 497  ("O\"\"" ["O\""])
 498  ("S,," ["S,"])
 499  ("S^^" ["S^"])
 500  ("U``" ["U`"])
 501  ("U''" ["U'"])
 502  ("U^^" ["U^"])
 503  ("U\"\"" ["U\""])
 504  ("U~~" ["U~"])
 505  ("Z.." ["Z."])
 506  ("a``" ["a`"])
 507  ("a''" ["a'"])
 508  ("a^^" ["a^"])
 509  ("a\"\"" ["a\""])
 510  ("c.." ["c."])
 511  ("c^^" ["c^"])
 512  ("c,," ["c,"])
 513  ("e``" ["e`"])
 514  ("e''" ["e'"])
 515  ("e^^" ["e^"])
 516  ("e\"\"" ["e\""])
 517  ("g~~" ["g~"])
 518  ("g.." ["g."])
 519  ("g^^" ["g^"])
 520  ("h//" ["h/"])
 521  ("h^^" ["h^"])
 522  ("i.." ["i."])
 523  ("i``" ["i`"])
 524  ("i''" ["i'"])
 525  ("i^^" ["i^"])
 526  ("i\"\"" ["i\""])
 527  ("j^^" ["j^"])
 528  ("n~~" ["n~"])
 529  ("o``" ["o`"])
 530  ("o''" ["o'"])
 531  ("o^^" ["o^"])
 532  ("o\"\"" ["o\""])
 533  ("s,," ["s,"])
 534  ("s//" ["s/"])
 535  ("s^^" ["s^"])
 536  ("u``" ["u`"])
 537  ("u''" ["u'"])
 538  ("u^^" ["u^"])
 539  ("u\"\"" ["u\""])
 540  ("u~~" ["u~"])
 541  ("z.." ["z."])
 542  )
 543
 544 (quail-define-package
 545  "latin-4-postfix" "Latin-4" "4<" t
 546  "Latin-4 characters input method with postfix modifiers
 547
 548              | postfix | examples
 549  ------------+---------+----------
 550   acute      |    '    | a' -> \e,Da\e(B
 551   circumflex |    ^    | a^ -> \e,Db\e(B
 552   diaeresis  |    \"    | a\" -> \e,Dd\e(B
 553   ogonek     |    ,    | a, -> \e,D1\e(B
 554   macron     |    -    | a- -> \e,D`\e(B
 555   tilde      |    ~    | a~ -> \e,Dc\e(B
 556   caron      |    ~    | c~ -> \e,Dh\e(B
 557   dot        |    .    | e. -> \e,Dl\e(B
 558   cedilla    |    ,    | k, -> \e,Ds\e(B   g, -> \e,D;\e(B
 559   stroke     |    /    | d/ -> \e,Dp\e(B
 560   nordic     |    /    | a/ -> \e,De\e(B   e/ -> \e,Df\e(B   o/ -> \e,Dx\e(B
 561   others     |    /    | s/ -> \e,D_\e(B   n/ -> \e,D?\e(B   k/ -> \e,D"\e(B
 562
 563 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
 564 " nil t nil nil nil nil nil nil nil nil t)
 565
 566 (quail-define-rules
 567  ("A," ?\e,D!\e(B)
 568  ("A-" ?\e,D@\e(B)
 569  ("A'" ?\e,DA\e(B)
 570  ("A^" ?\e,DB\e(B)
 571  ("A~" ?\e,DC\e(B)
 572  ("A\"" ?\e,DD\e(B)
 573  ("A/" ?\e,DE\e(B)
 574  ("C~" ?\e,DH\e(B)
 575  ("D/" ?\e,DP\e(B)
 576  ("E/" ?\e,DF\e(B)
 577  ("E-" ?\e,D*\e(B)
 578  ("E'" ?\e,DI\e(B)
 579  ("E," ?\e,DJ\e(B)
 580  ("E\"" ?\e,DK\e(B)
 581  ("E." ?\e,DL\e(B)
 582  ("G," ?\e,D+\e(B)
 583  ("I~" ?\e,D%\e(B)
 584  ("I," ?\e,DG\e(B)
 585  ("I'" ?\e,DM\e(B)
 586  ("I^" ?\e,DN\e(B)
 587  ("I-" ?\e,DO\e(B)
 588  ("K," ?\e,DS\e(B)
 589  ("L," ?\e,D&\e(B)
 590  ("N/" ?\e,D=\e(B)
 591  ("N," ?\e,DQ\e(B)
 592  ("O-" ?\e,DR\e(B)
 593  ("O^" ?\e,DT\e(B)
 594  ("O~" ?\e,DU\e(B)
 595  ("O\"" ?\e,DV\e(B)
 596  ("O/" ?\e,DX\e(B)
 597  ("R," ?\e,D#\e(B)
 598  ("S~" ?\e,D)\e(B)
 599  ("T/" ?\e,D,\e(B)
 600  ("U," ?\e,DY\e(B)
 601  ("U'" ?\e,DZ\e(B)
 602  ("U^" ?\e,D[\e(B)
 603  ("U\"" ?\e,D\\e(B)
 604  ("U~" ?\e,D]\e(B)
 605  ("U-" ?\e,D^\e(B)
 606  ("Z~" ?\e,D.\e(B)
 607  ("a," ?\e,D1\e(B)
 608  ("a-" ?\e,D`\e(B)
 609  ("a'" ?\e,Da\e(B)
 610  ("a^" ?\e,Db\e(B)
 611  ("a~" ?\e,Dc\e(B)
 612  ("a\"" ?\e,Dd\e(B)
 613  ("a/" ?\e,De\e(B)
 614  ("c~" ?\e,Dh\e(B)
 615  ("d/" ?\e,Dp\e(B)
 616  ("e/" ?\e,Df\e(B)
 617  ("e-" ?\e,D:\e(B)
 618  ("e'" ?\e,Di\e(B)
 619  ("e," ?\e,Dj\e(B)
 620  ("e\"" ?\e,Dk\e(B)
 621  ("e." ?\e,Dl\e(B)
 622  ("g," ?\e,D;\e(B)
 623  ("i~" ?\e,D5\e(B)
 624  ("i," ?\e,Dg\e(B)
 625  ("i'" ?\e,Dm\e(B)
 626  ("i^" ?\e,Dn\e(B)
 627  ("i-" ?\e,Do\e(B)
 628  ("k/" ?\e,D"\e(B)
 629  ("k," ?\e,Ds\e(B)
 630  ("l," ?\e,D6\e(B)
 631  ("n/" ?\e,D?\e(B)
 632  ("n," ?\e,Dq\e(B)
 633  ("o-" ?\e,Dr\e(B)
 634  ("o^" ?\e,Dt\e(B)
 635  ("o~" ?\e,Du\e(B)
 636  ("o\"" ?\e,Dv\e(B)
 637  ("o/" ?\e,Dx\e(B)
 638  ("r," ?\e,D3\e(B)
 639  ("s/" ?\e,D_\e(B)
 640  ("s~" ?\e,D9\e(B)
 641  ("t/" ?\e,D<\e(B)
 642  ("u," ?\e,Dy\e(B)
 643  ("u'" ?\e,Dz\e(B)
 644  ("u^" ?\e,D{\e(B)
 645  ("u\"" ?\e,D|\e(B)
 646  ("u~" ?\e,D}\e(B)
 647  ("u-" ?\e,D~\e(B)
 648  ("z~" ?\e,D>\e(B)
 649
 650  ("A,," ["A,"])
 651  ("A--" ["A-"])
 652  ("A''" ["A'"])
 653  ("A^^" ["A^"])
 654  ("A~~" ["A~"])
 655  ("A\"\"" ["A\""])
 656  ("A//" ["A/"])
 657  ("C~~" ["C~"])
 658  ("D//" ["D/"])
 659  ("E//" ["E/"])
 660  ("E--" ["E-"])
 661  ("E''" ["E'"])
 662  ("E,," ["E,"])
 663  ("E\"\"" ["E\""])
 664  ("E.." ["E."])
 665  ("G,," ["G,"])
 666  ("I~~" ["I~"])
 667  ("I,," ["I,"])
 668  ("I''" ["I'"])
 669  ("I^^" ["I^"])
 670  ("I--" ["I-"])
 671  ("K,," ["K,"])
 672  ("L,," ["L,"])
 673  ("N//" ["N/"])
 674  ("N,," ["N,"])
 675  ("O--" ["O-"])
 676  ("O^^" ["O^"])
 677  ("O~~" ["O~"])
 678  ("O\"\"" ["O\""])
 679  ("O//" ["O/"])
 680  ("R,," ["R,"])
 681  ("S~~" ["S~"])
 682  ("T//" ["T/"])
 683  ("U,," ["U,"])
 684  ("U''" ["U'"])
 685  ("U^^" ["U^"])
 686  ("U\"\"" ["U\""])
 687  ("U~~" ["U~"])
 688  ("U--" ["U-"])
 689  ("Z~~" ["Z~"])
 690  ("a,," ["a,"])
 691  ("a--" ["a-"])
 692  ("a''" ["a'"])
 693  ("a^^" ["a^"])
 694  ("a~~" ["a~"])
 695  ("a\"\"" ["a\""])
 696  ("a//" ["a/"])
 697  ("c~~" ["c~"])
 698  ("d//" ["d/"])
 699  ("e//" ["e/"])
 700  ("e--" ["e-"])
 701  ("e''" ["e'"])
 702  ("e,," ["e,"])
 703  ("e\"\"" ["e\""])
 704  ("e.." ["e."])
 705  ("g,," ["g,"])
 706  ("i~~" ["i~"])
 707  ("i,," ["i,"])
 708  ("i''" ["i'"])
 709  ("i^^" ["i^"])
 710  ("i--" ["i-"])
 711  ("k//" ["k/"])
 712  ("k,," ["k,"])
 713  ("l,," ["l,"])
 714  ("n//" ["n/"])
 715  ("n,," ["n,"])
 716  ("o--" ["o-"])
 717  ("o^^" ["o^"])
 718  ("o~~" ["o~"])
 719  ("o\"\"" ["o\""])
 720  ("o//" ["o/"])
 721  ("r,," ["r,"])
 722  ("s//" ["s/"])
 723  ("s~~" ["s~"])
 724  ("t//" ["t/"])
 725  ("u,," ["u,"])
 726  ("u''" ["u'"])
 727  ("u^^" ["u^"])
 728  ("u\"\"" ["u\""])
 729  ("u~~" ["u~"])
 730  ("u--" ["u-"])
 731  ("z~~" ["z~"])
 732  )
 733
 734 (quail-define-package
 735  "latin-5-postfix" "Latin-5" "5<" t
 736  "Latin-5 characters input method with postfix modifiers
 737
 738              | postfix | examples
 739  ------------+---------+----------
 740   acute      |    '    | a' -> \e,Ma\e(B
 741   grave      |    `    | a` -> \e,M`\e(B
 742   circumflex |    ^    | a^ -> \e,Mb\e(B
 743   diaeresis  |    \"    | a\" -> \e,Md\e(B
 744   tilde      |    ~    | a~ -> \e,Mc\e(B
 745   breve      |    ~    | g~ -> \e,Mp\e(B
 746   cedilla    |    ,    | c, -> \e,Mg\e(B
 747   dot        |    .    | i. -> \e,M}\e(B   I. -> \e,M]\e(B
 748   nordic     |    /    | a/ -> \e,Me\e(B   e/ -> \e,Mf\e(B   o/ -> \e,Mx\e(B
 749   others     |    /    | s/ -> \e,M_\e(B
 750
 751 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
 752 " nil t nil nil nil nil nil nil nil nil t)
 753
 754 (quail-define-rules
 755  ("A'" ?\e,MA\e(B)
 756  ("A/" ?\e,ME\e(B)
 757  ("A\"" ?\e,MD\e(B)
 758  ("A^" ?\e,MB\e(B)
 759  ("A`" ?\e,M@\e(B)
 760  ("A~" ?\e,MC\e(B)
 761  ("C," ?\e,MG\e(B)
 762  ("E'" ?\e,MI\e(B)
 763  ("E/" ?\e,MF\e(B)
 764  ("E\"" ?\e,MK\e(B)
 765  ("E^" ?\e,MJ\e(B)
 766  ("E`" ?\e,MH\e(B)
 767  ("G~" ?\e,MP\e(B)
 768  ("I'" ?\e,MM\e(B)
 769  ("I." ?\e,M]\e(B)
 770  ("I\"" ?\e,MO\e(B)
 771  ("I^" ?\e,MN\e(B)
 772  ("I`" ?\e,ML\e(B)
 773  ("N~" ?\e,MQ\e(B)
 774  ("O'" ?\e,MS\e(B)
 775  ("O/" ?\e,MX\e(B)
 776  ("O\"" ?\e,MV\e(B)
 777  ("O^" ?\e,MT\e(B)
 778  ("O`" ?\e,MR\e(B)
 779  ("O~" ?\e,MU\e(B)
 780  ("S," ?\e,M^\e(B)
 781  ("U'" ?\e,MZ\e(B)
 782  ("U\"" ?\e,M\\e(B)
 783  ("U^" ?\e,M[\e(B)
 784  ("U`" ?\e,MY\e(B)
 785  ("a'" ?\e,Ma\e(B)
 786  ("a/" ?\e,Me\e(B)
 787  ("a\"" ?\e,Md\e(B)
 788  ("a^" ?\e,Mb\e(B)
 789  ("a`" ?\e,M`\e(B)
 790  ("a~" ?\e,Mc\e(B)
 791  ("c," ?\e,Mg\e(B)
 792  ("e'" ?\e,Mi\e(B)
 793  ("e/" ?\e,Mf\e(B)
 794  ("e\"" ?\e,Mk\e(B)
 795  ("e^" ?\e,Mj\e(B)
 796  ("e`" ?\e,Mh\e(B)
 797  ("g~" ?\e,Mp\e(B)
 798  ("i'" ?\e,Mm\e(B)
 799  ("i." ?\e,M}\e(B)
 800  ("i\"" ?\e,Mo\e(B)
 801  ("i^" ?\e,Mn\e(B)
 802  ("i`" ?\e,Ml\e(B)
 803  ("n~" ?\e,Mq\e(B)
 804  ("o'" ?\e,Ms\e(B)
 805  ("o/" ?\e,Mx\e(B)
 806  ("o\"" ?\e,Mv\e(B)
 807  ("o^" ?\e,Mt\e(B)
 808  ("o`" ?\e,Mr\e(B)
 809  ("o~" ?\e,Mu\e(B)
 810  ("s," ?\e,M~\e(B)
 811  ("s/" ?\e,M_\e(B)
 812  ("u'" ?\e,Mz\e(B)
 813  ("u\"" ?\e,M|\e(B)
 814  ("u^" ?\e,M{\e(B)
 815  ("u`" ?\e,My\e(B)
 816  ("y\"" ?\e,M\x7f\e(B)
 817
 818  ("A''" ["A'"])
 819  ("A//" ["A/"])
 820  ("A\"\"" ["A\""])
 821  ("A^^" ["A^"])
 822  ("A``" ["A`"])
 823  ("A~~" ["A~"])
 824  ("C,," ["C,"])
 825  ("E''" ["E'"])
 826  ("E//" ["E/"])
 827  ("E\"\"" ["E\""])
 828  ("E^^" ["E^"])
 829  ("E``" ["E`"])
 830  ("G~~" ["G~"])
 831  ("I''" ["I'"])
 832  ("I.." ["I."])
 833  ("I\"\"" ["I\""])
 834  ("I^^" ["I^"])
 835  ("I``" ["I`"])
 836  ("N~~" ["N~"])
 837  ("O''" ["O'"])
 838  ("O//" ["O/"])
 839  ("O\"\"" ["O\""])
 840  ("O^^" ["O^"])
 841  ("O``" ["O`"])
 842  ("O~~" ["O~"])
 843  ("S,," ["S,"])
 844  ("U''" ["U'"])
 845  ("U\"\"" ["U\""])
 846  ("U^^" ["U^"])
 847  ("U``" ["U`"])
 848  ("a''" ["a'"])
 849  ("a//" ["a/"])
 850  ("a\"\"" ["a\""])
 851  ("a^^" ["a^"])
 852  ("a``" ["a`"])
 853  ("a~~" ["a~"])
 854  ("c,," ["c,"])
 855  ("e''" ["e'"])
 856  ("e//" ["e/"])
 857  ("e\"\"" ["e\""])
 858  ("e^^" ["e^"])
 859  ("e``" ["e`"])
 860  ("g~~" ["g~"])
 861  ("i''" ["i'"])
 862  ("i.." ["i."])
 863  ("i\"\"" ["i\""])
 864  ("i^^" ["i^"])
 865  ("i``" ["i`"])
 866  ("n~~" ["n~"])
 867  ("o''" ["o'"])
 868  ("o//" ["o/"])
 869  ("o\"\"" ["o\""])
 870  ("o^^" ["o^"])
 871  ("o``" ["o`"])
 872  ("o~~" ["o~"])
 873  ("s,," ["s,"])
 874  ("s//" ["s/"])
 875  ("u''" ["u'"])
 876  ("u\"\"" ["u\""])
 877  ("u^^" ["u^"])
 878  ("u``" ["u`"])
 879  ("y\"\"" ["y\""])
 880  )
 881
 882 (quail-define-package
 883  "danish-postfix" "Latin-1" "DA<" t
 884  "Danish input method (rule: AE -> \e,AF\e(B, OE -> \e,AX\e(B, AA -> \e,AE\e(B, E' -> \e,AI\e(B)
 885
 886 Doubling the postfix separates the letter and postfix: e.g. aee -> ae
 887 "
 888  nil t nil nil nil nil nil nil nil nil t)
 889
 890 (quail-define-rules
 891  ("AE" ?\e,AF\e(B)
 892  ("ae" ?\e,Af\e(B)
 893  ("OE" ?\e,AX\e(B)
 894  ("oe" ?\e,Ax\e(B)
 895  ("AA" ?\e,AE\e(B)
 896  ("aa" ?\e,Ae\e(B)
 897  ("E'" ?\e,AI\e(B)
 898  ("e'" ?\e,Ai\e(B)
 899
 900  ("AEE" ["AE"])
 901  ("aee" ["ae"])
 902  ("OEE" ["OE"])
 903  ("oee" ["oe"])
 904  ("AAA" ["AA"])
 905  ("aaa" ["aa"])
 906  ("E''" ["E'"])
 907  ("e''" ["e'"])
 908  )
 909
 910 (quail-define-package
 911  "esperanto-postfix" "Latin-3" "EO<" t
 912  "Esperanto input method with postfix modifiers
 913
 914 A following ^ or x will produce an accented character,
 915 e.g. c^ -> \e,Cf\e(B   gx -> \e,Cx\e(B   u^ -> \e,C}\e(B.
 916
 917 Doubling the postfix separates the letter and postfix,
 918 e.g. a'' -> a'.
 919 " nil t nil nil nil nil nil nil nil nil t)
 920
 921 (quail-define-rules
 922  ("Cx" ?\e,CF\e(B)
 923  ("C^" ?\e,CF\e(B)
 924  ("cx" ?\e,Cf\e(B)
 925  ("c^" ?\e,Cf\e(B)
 926  ("Gx" ?\e,CX\e(B)
 927  ("G^" ?\e,CX\e(B)
 928  ("gx" ?\e,Cx\e(B)
 929  ("g^" ?\e,Cx\e(B)
 930  ("Hx" ?\e,C&\e(B)
 931  ("H^" ?\e,C&\e(B)
 932  ("hx" ?\e,C6\e(B)
 933  ("h^" ?\e,C6\e(B)
 934  ("Jx" ?\e,C,\e(B)
 935  ("J^" ?\e,C,\e(B)
 936  ("jx" ?\e,C<\e(B)
 937  ("j^" ?\e,C<\e(B)
 938  ("Sx" ?\e,C^\e(B)
 939  ("S^" ?\e,C^\e(B)
 940  ("sx" ?\e,C~\e(B)
 941  ("s^" ?\e,C~\e(B)
 942  ("Ux" ?\e,C]\e(B)
 943  ("U^" ?\e,C]\e(B)
 944  ("ux" ?\e,C}\e(B)
 945  ("u^" ?\e,C}\e(B)
 946
 947  ("Cxx" ["Cx"])
 948  ("C^^" ["C^"])
 949  ("cxx" ["cx"])
 950  ("c^^" ["c^"])
 951  ("Gxx" ["Gx"])
 952  ("G^^" ["G^"])
 953  ("gxx" ["gx"])
 954  ("g^^" ["g^"])
 955  ("Hxx" ["Hx"])
 956  ("H^^" ["H^"])
 957  ("hxx" ["hx"])
 958  ("h^^" ["h^"])
 959  ("Jxx" ["Jx"])
 960  ("J^^" ["J^"])
 961  ("jxx" ["jx"])
 962  ("j^^" ["j^"])
 963  ("Sxx" ["Sx"])
 964  ("S^^" ["S^"])
 965  ("sxx" ["sx"])
 966  ("s^^" ["s^"])
 967  ("Uxx" ["Ux"])
 968  ("U^^" ["U^"])
 969  ("uxx" ["ux"])
 970  ("u^^" ["u^"])
 971  )
 972
 973 (quail-define-package
 974  "finnish-postfix" "Latin-1" "FI<" t
 975  "Finnish (Suomi) input method
 976
 977 AE  -> \e,AD\e(B
 978 AEE -> AE
 979 OE  -> \e,AV\e(B
 980 OEE -> OE
 981 "
 982  nil t nil nil nil nil nil nil nil nil t)
 983
 984 (quail-define-rules
 985  ("AE" ?\e,AD\e(B)
 986  ("ae" ?\e,Ad\e(B)
 987  ("OE" ?\e,AV\e(B)
 988  ("oe" ?\e,Av\e(B)
 989
 990  ("AEE" ["AE"])
 991  ("aee" ["ae"])
 992  ("OEE" ["OE"])
 993  ("oee" ["oe"])
 994  )
 995
 996 (quail-define-package
 997  "french-postfix" "Latin-1" "FR<" t
 998  "French (Fran\e,Ag\e(Bais) input method with postfix modifiers
 999
1000 ` pour grave, ' pour aigu, ^ pour circonflexe, et \" pour tr\e,Ai\e(Bma.
1001 Par exemple: a` -> \e,A`\e(B   e' -> \e,Ai\e(B.
1002
1003 \e,AG\e(B, \e,A+\e(B, et \e,A;\e(B sont produits par C,, <<, et >>.
1004
1005 En doublant la frappe des diacritiques, ils s'isoleront de la lettre.
1006 Par exemple: e'' -> e'
1007
1008 <e dans l'o> n'est pas disponible."
1009  nil t nil nil nil nil nil nil nil nil t)
1010
1011 (quail-define-rules
1012  ("A`" ?\e,A@\e(B)
1013  ("A^" ?\e,AB\e(B)
1014  ("a`" ?\e,A`\e(B)
1015  ("a^" ?\e,Ab\e(B)
1016  ("E`" ?\e,AH\e(B)
1017  ("E'" ?\e,AI\e(B)
1018  ("E^" ?\e,AJ\e(B)
1019  ("E\"" ?\e,AK\e(B)
1020  ("e`" ?\e,Ah\e(B)
1021  ("e'" ?\e,Ai\e(B)
1022  ("e^" ?\e,Aj\e(B)
1023  ("e\"" ?\e,Ak\e(B)
1024  ("I^" ?\e,AN\e(B)
1025  ("I\"" ?\e,AO\e(B)
1026  ("i^" ?\e,An\e(B)
1027  ("i\"" ?\e,Ao\e(B)
1028  ("O^" ?\e,AT\e(B)
1029  ("o^" ?\e,At\e(B)
1030  ("U`" ?\e,AY\e(B)
1031  ("U^" ?\e,A[\e(B)
1032  ("U\"" ?\e,A\\e(B)
1033  ("u`" ?\e,Ay\e(B)
1034  ("u^" ?\e,A{\e(B)
1035  ("u\"" ?\e,A|\e(B)
1036  ("C," ?\e,AG\e(B)
1037  ("c," ?\e,Ag\e(B)
1038  ("<<" ?\e,A+\e(B)
1039  (">>" ?\e,A;\e(B)
1040
1041  ("A``" ["A`"])
1042  ("A^^" ["A^"])
1043  ("a``" ["a`"])
1044  ("a^^" ["a^"])
1045  ("E``" ["E`"])
1046  ("E''" ["E'"])
1047  ("E^^" ["E^"])
1048  ("E\"\"" ["E\""])
1049  ("e``" ["e`"])
1050  ("e''" ["e'"])
1051  ("e^^" ["e^"])
1052  ("e\"\"" ["e\""])
1053  ("I^^" ["I^"])
1054  ("I\"\"" ["I\""])
1055  ("i^^" ["i^"])
1056  ("i\"\"" ["i\""])
1057  ("O^^" ["O^"])
1058  ("o^^" ["o^"])
1059  ("U``" ["U`"])
1060  ("U^^" ["U^"])
1061  ("U\"\"" ["U\""])
1062  ("u``" ["u`"])
1063  ("u^^" ["u^"])
1064  ("u\"\"" ["u\""])
1065  ("C,," ["C,"])
1066  ("c,," ["c,"])
1067  ("<<<" ["<<"])
1068  (">>>" [">>"])
1069  )
1070
1071 (quail-define-package
1072  "german-postfix" "Latin-1" "DE<" t
1073  "German (Deutsch) input method
1074
1075 ae  -> \e,Ad\e(B
1076 aee -> ae
1077 oe  -> \e,Av\e(B
1078 oee -> oe
1079 ue  -> \e,A|\e(B
1080 uee -> ue
1081 sz  -> \e,A_\e(B
1082 szz -> sz
1083 "
1084  nil t nil nil nil nil nil nil nil nil t)
1085
1086 (quail-define-rules
1087  ("AE" ?\e,AD\e(B)
1088  ("ae" ?\e,Ad\e(B)
1089  ("OE" ?\e,AV\e(B)
1090  ("oe" ?\e,Av\e(B)
1091  ("UE" ?\e,A\\e(B)
1092  ("ue" ?\e,A|\e(B)
1093  ("sz" ?\e,A_\e(B)
1094
1095  ("AEE" ["AE"])
1096  ("aee" ["ae"])
1097  ("OEE" ["OE"])
1098  ("oee" ["oe"])
1099  ("UEE" ["UE"])
1100  ("uee" ["ue"])
1101  ("szz" ["sz"])
1102  )
1103
1104 (quail-define-package
1105  "icelandic-postfix" "Latin-1" "IS<" t
1106  "Icelandic (\e,AM\e(Bslenska) input method with postfix modifiers
1107
1108 A' -> \e,AA\e(B
1109 E' -> \e,AI\e(B
1110 I' -> \e,AM\e(B
1111 O' -> \e,AS\e(B
1112 U' -> \e,AZ\e(B
1113 Y' -> \e,A]\e(B
1114 AE -> \e,AF\e(B
1115 OE -> \e,AV\e(B
1116 D/ -> \e,AP\e(B (eth)
1117 T/ -> \e,A^\e(B (thorn)
1118
1119 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
1120 " nil t nil nil nil nil nil nil nil nil t)
1121
1122 (quail-define-rules
1123  ("A'" ?\e,AA\e(B)
1124  ("a'" ?\e,Aa\e(B)
1125  ("E'" ?\e,AI\e(B)
1126  ("e'" ?\e,Ai\e(B)
1127  ("I'" ?\e,AM\e(B)
1128  ("i'" ?\e,Am\e(B)
1129  ("O'" ?\e,AS\e(B)
1130  ("o'" ?\e,As\e(B)
1131  ("U'" ?\e,AZ\e(B)
1132  ("u'" ?\e,Az\e(B)
1133  ("Y'" ?\e,A]\e(B)
1134  ("y'" ?\e,A}\e(B)
1135  ("AE" ?\e,AF\e(B)
1136  ("ae" ?\e,Af\e(B)
1137  ("OE" ?\e,AV\e(B)
1138  ("oe" ?\e,Av\e(B)
1139  ("D/" ?\e,AP\e(B)
1140  ("d/" ?\e,Ap\e(B)
1141  ("T/" ?\e,A^\e(B)
1142  ("t/" ?\e,A~\e(B)
1143
1144  ("A''" ["A'"])
1145  ("a''" ["a'"])
1146  ("E''" ["E'"])
1147  ("e''" ["e'"])
1148  ("I''" ["I'"])
1149  ("i''" ["i'"])
1150  ("O''" ["O'"])
1151  ("o''" ["o'"])
1152  ("U''" ["U'"])
1153  ("u''" ["u'"])
1154  ("Y''" ["Y'"])
1155  ("y''" ["y'"])
1156  ("AEE" ["AE"])
1157  ("aee" ["ae"])
1158  ("OEE" ["OE"])
1159  ("oee" ["oe"])
1160  ("D//" ["D/"])
1161  ("d//" ["d/"])
1162  ("T//" ["T/"])
1163  ("t//" ["t/"])
1164  )
1165
1166 (quail-define-package
1167  "italian-postfix" "Latin-1" "IT<" t
1168  "Italian (Italiano) input method with postfix modifiers
1169
1170 a` -> \e,A`\e(B    A` -> \e,A@\e(B    e' -> \e,Ai\e(B    << -> \e,A+\e(B
1171 e` -> \e,Ah\e(B    E` -> \e,AH\e(B    E' -> \e,AI\e(B    >> -> \e,A;\e(B
1172 i` -> \e,Al\e(B    I` -> \e,AL\e(B               o_ -> \e,A:\e(B
1173 o` -> \e,Ar\e(B    O` -> \e,AR\e(B               a_ -> \e,A*\e(B
1174 u` -> \e,Ay\e(B    U` -> \e,AY\e(B
1175
1176 Typewriter-style italian characters.
1177
1178 Doubling the postfix separates the letter and postfix: e.g. a`` -> a`
1179 " nil t nil nil nil nil nil nil nil nil t)
1180
1181 (quail-define-rules
1182  ("A`" ?\e,A@\e(B)
1183  ("a`" ?\e,A`\e(B)
1184  ("E`" ?\e,AH\e(B)
1185  ("E'" ?\e,AI\e(B)
1186  ("e`" ?\e,Ah\e(B)
1187  ("e'" ?\e,Ai\e(B)
1188  ("I`" ?\e,AL\e(B)
1189  ("i`" ?\e,Al\e(B)
1190  ("O`" ?\e,AR\e(B)
1191  ("o`" ?\e,Ar\e(B)
1192  ("U`" ?\e,AY\e(B)
1193  ("u`" ?\e,Ay\e(B)
1194  ("<<" ?\e,A+\e(B)
1195  (">>" ?\e,A;\e(B)
1196  ("o_" ?\e,A:\e(B)
1197  ("a_" ?\e,A*\e(B)
1198
1199  ("A``" ["A`"])
1200  ("a``" ["a`"])
1201  ("E``" ["E`"])
1202  ("E''" ["E'"])
1203  ("e``" ["e`"])
1204  ("e''" ["e'"])
1205  ("I``" ["I`"])
1206  ("i``" ["i`"])
1207  ("O``" ["O`"])
1208  ("o``" ["o`"])
1209  ("U``" ["U`"])
1210  ("u``" ["u`"])
1211  ("<<<" ["<<"])
1212  (">>>" [">>"])
1213  ("o__" ["o_"])
1214  ("a__" ["a_"])
1215  )
1216
1217 (quail-define-package
1218  "norwegian-postfix" "Latin-1" "NO<" t
1219  "Norwegian (Norsk) input method (rule: AE->\e,AF\e(B   OE->\e,AX\e(B   AA->\e,AE\e(B   E'->\e,AI\e(B)
1220
1221 Doubling the postfix separates the letter and postfix: e.g. aee -> ae
1222 "
1223  nil t nil nil nil nil nil nil nil nil t)
1224
1225 (quail-define-rules
1226  ("AE" ?\e,AF\e(B)
1227  ("ae" ?\e,Af\e(B)
1228  ("OE" ?\e,AX\e(B)
1229  ("oe" ?\e,Ax\e(B)
1230  ("AA" ?\e,AE\e(B)
1231  ("aa" ?\e,Ae\e(B)
1232  ("E'" ?\e,AI\e(B)
1233  ("e'" ?\e,Ai\e(B)
1234
1235  ("AEE" ["AE"])
1236  ("aee" ["ae"])
1237  ("OEE" ["OE"])
1238  ("oee" ["oe"])
1239  ("AAA" ["AA"])
1240  ("aaa" ["aa"])
1241  ("E''" ["E'"])
1242  ("e''" ["e'"])
1243  )
1244
1245 (quail-define-package
1246  "scandinavian-postfix" "Latin-1" "SC<" t
1247  "Scandinavian input method with postfix modifiers
1248 Supported languages are Swidish, Norwegian, Danish, and Finnish.
1249
1250 ae -> \e,Af\e(B
1251 oe -> \e,Ax\e(B
1252 aa -> \e,Ae\e(B
1253 a\" -> \e,Ad\e(B
1254 o\" -> \e,Av\e(B
1255 e' -> \e,Ai\e(B
1256
1257 Doubling the postfix separates the letter and postfix:
1258 aee -> ae   o\"\" -> o\"   etc.
1259 " nil t nil nil nil nil nil nil nil nil t)
1260
1261 (quail-define-rules
1262  ("AE" ?\e,AF\e(B)
1263  ("ae" ?\e,Af\e(B)
1264  ("OE" ?\e,AX\e(B)
1265  ("oe" ?\e,Ax\e(B)
1266  ("AA" ?\e,AE\e(B)
1267  ("aa" ?\e,Ae\e(B)
1268  ("A\"" ?\e,AD\e(B)
1269  ("a\"" ?\e,Ad\e(B)
1270  ("O\"" ?\e,AV\e(B)
1271  ("o\"" ?\e,Av\e(B)
1272  ("E'" ?\e,AI\e(B)
1273  ("e'" ?\e,Ai\e(B)
1274
1275  ("AEE" ["AE"])
1276  ("aee" ["ae"])
1277  ("OEE" ["OE"])
1278  ("oee" ["oe"])
1279  ("AAA" ["AA"])
1280  ("aaa" ["aa"])
1281  ("A\"\"" ["A\""])
1282  ("a\"\"" ["a\""])
1283  ("O\"\"" ["O\""])
1284  ("o\"\"" ["o\""])
1285  ("E''" ["E'"])
1286  ("e''" ["e'"])
1287  )
1288
1289 (quail-define-package
1290  "spanish-postfix" "Latin-1" "ES<" t
1291  "Spanish (Espa\e,Aq\e(Bol) input method with postfix modifiers
1292
1293 A' -> \e,AA\e(B
1294 E' -> \e,AI\e(B
1295 I' -> \e,AM\e(B
1296 O' -> \e,AS\e(B
1297 U' -> \e,AZ\e(B
1298 N~ -> \e,AQ\e(B
1299 !/ -> \e,A!\e(B
1300 ?/ -> \e,A?\e(B
1301
1302 Doubling the postfix separates the letter and postfix:
1303 a'' -> a'   n~~ -> n~, etc.
1304 " nil t nil nil nil nil nil nil nil nil t)
1305
1306 (quail-define-rules
1307  ("A'" ?\e,AA\e(B)
1308  ("a'" ?\e,Aa\e(B)
1309  ("E'" ?\e,AI\e(B)
1310  ("e'" ?\e,Ai\e(B)
1311  ("I'" ?\e,AM\e(B)
1312  ("i'" ?\e,Am\e(B)
1313  ("O'" ?\e,AS\e(B)
1314  ("o'" ?\e,As\e(B)
1315  ("U'" ?\e,AZ\e(B)
1316  ("u'" ?\e,Az\e(B)
1317  ("U\"" ?\e,C\\e(B)
1318  ("u\"" ?\e,C|\e(B)
1319  ("N~" ?\e,AQ\e(B)
1320  ("n~" ?\e,Aq\e(B)
1321  ("?/" ?\e,A?\e(B)
1322  ("!/" ?\e,A!\e(B)
1323
1324  ("A''" ["A'"])
1325  ("a''" ["a'"])
1326  ("E''" ["E'"])
1327  ("e''" ["e'"])
1328  ("I''" ["I'"])
1329  ("i''" ["i'"])
1330  ("O''" ["O'"])
1331  ("o''" ["o'"])
1332  ("U''" ["U'"])
1333  ("u''" ["u'"])
1334  ("U\"" ["U\""])
1335  ("u\"" ["U\""])
1336  ("N~~" ["N~"])
1337  ("n~~" ["n~"])
1338  ("?//" ["?/"])
1339  ("!//" ["!/"])
1340  )
1341
1342 (quail-define-package
1343  "swedish-postfix" "Latin-1" "SV<" t
1344  "Swedish (Svenska) input method (rule: AA -> \e,AE\e(B   AE -> \e,AD\e(B   OE -> \e,AV\e(B   E' -> \e,AI\e(B)
1345
1346 Doubling the postfix separates the letter and postfix: e.g. aee -> ae
1347 " nil t nil nil nil nil nil nil nil nil t)
1348
1349 (quail-define-rules
1350  ("AA" ?\e,AE\e(B)
1351  ("aa" ?\e,Ae\e(B)
1352  ("AE" ?\e,AD\e(B)
1353  ("ae" ?\e,Ad\e(B)
1354  ("OE" ?\e,AV\e(B)
1355  ("oe" ?\e,Av\e(B)
1356  ("E'" ?\e,AI\e(B)
1357  ("e'" ?\e,Ai\e(B)
1358
1359  ("AAA" ["AA"])
1360  ("aaa" ["aa"])
1361  ("AEE" ["AE"])
1362  ("aee" ["ae"])
1363  ("OEE" ["OE"])
1364  ("oee" ["oe"])
1365  ("E''" ["E'"])
1366  ("e''" ["e'"])
1367  )
1368
1369 (quail-define-package
1370  "turkish-latin-3-postfix" "Latin-3" "TR3<" t
1371  "Turkish (T\e,C|\e(Brk\e,Cg\e(Be) input method with postfix modifiers.
1372
1373 This is for those who use Latin-3 (ISO-8859-3) for Turkish.  If you
1374 use Latin-5 (ISO-8859-9), you should use \"turkish-postfix\" instead.
1375
1376 Note for I, \e,C9\e(B, \e,C)\e(B, i.
1377
1378 A^ -> \e,CB\e(B
1379 C, -> \e,CG\e(B
1380 G^ -> \e,C+\e(B
1381 I  -> I
1382 i  -> \e,C9\e(B
1383 I. -> \e,C)\e(B
1384 i. -> i
1385 O\" -> \e,CV\e(B
1386 S, -> \e,C*\e(B
1387 U\" -> \e,C\\e(B
1388 U^ -> \e,C[\e(B
1389
1390 Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
1391 " nil t nil nil nil nil nil nil nil nil t)
1392
1393 (quail-define-rules
1394  ("A^" ?\e,CB\e(B)
1395  ("a^" ?\e,Cb\e(B)
1396  ("C," ?\e,CG\e(B)
1397  ("c," ?\e,Cg\e(B)
1398  ("G^" ?\e,C+\e(B)
1399  ("g^" ?\e,C;\e(B)
1400  ("I." ?\e,C)\e(B)
1401  ("i" ?\e,C9\e(B)
1402  ("i." ?i)
1403  ("O\"" ?\e,CV\e(B)
1404  ("o\"" ?\e,Cv\e(B)
1405  ("S," ?\e,C*\e(B)
1406  ("s," ?\e,C:\e(B)
1407  ("U\"" ?\e,C\\e(B)
1408  ("u\"" ?\e,C|\e(B)
1409  ("U^" ?\e,C[\e(B)
1410  ("u^" ?\e,C{\e(B)
1411
1412  ("A^^" ["A^"])
1413  ("a^^" ["a^"])
1414  ("C,," ["C,"])
1415  ("c,," ["c,"])
1416  ("G^^" ["G^"])
1417  ("g^^" ["g^"])
1418  ("I.." ["I."])
1419  ("i" ["i"])
1420  ("i.." ["i."])
1421  ("O\"\"" ["O\""])
1422  ("o\"\"" ["o\""])
1423  ("S,," ["S,"])
1424  ("s,," ["s,"])
1425  ("U\"\"" ["U\""])
1426  ("u\"\"" ["u\""])
1427  ("U^^" ["U^"])
1428  ("u^^" ["u^"])
1429  )
1430
1431 (quail-define-package
1432  "turkish-postfix" "Latin-5" "TR<" t
1433  "Turkish (T\e,M|\e(Brk\e,Mg\e(Be) input method with postfix modifiers.
1434
1435 This is for those who use Latin-5 (ISO-8859-9) for Turkish.  If you
1436 use Latin-3 (ISO-8859-3), you should use \"turkish-latin-3-postfix\"
1437 instead.
1438
1439 Note for I, \e,M}\e(B, \e,M]\e(B, i.
1440
1441 A^ -> \e,MB\e(B
1442 C, -> \e,MG\e(B
1443 G^ -> \e,MP\e(B
1444 I  -> I
1445 i  -> \e,M}\e(B
1446 I. -> \e,M]\e(B
1447 i. -> i
1448 O\" -> \e,MV\e(B
1449 S, -> \e,M^\e(B
1450 U\" -> \e,M\\e(B
1451 U^ -> \e,M[\e(B
1452
1453 Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
1454 " nil t nil nil nil nil nil nil nil nil t)
1455
1456 (quail-define-rules
1457  ("A^" ?\e,MB\e(B)
1458  ("a^" ?\e,Mb\e(B)
1459  ("C," ?\e,MG\e(B)
1460  ("c," ?\e,Mg\e(B)
1461  ("G^" ?\e,MP\e(B)
1462  ("g^" ?\e,Mp\e(B)
1463  ("I." ?\e,M]\e(B)
1464  ("i" ?\e,M}\e(B)
1465  ("i." ?i)
1466  ("O\"" ?\e,MV\e(B)
1467  ("o\"" ?\e,Mv\e(B)
1468  ("S," ?\e,M^\e(B)
1469  ("s," ?\e,M~\e(B)
1470  ("U\"" ?\e,M\\e(B)
1471  ("u\"" ?\e,M|\e(B)
1472  ("U^" ?\e,M[\e(B)
1473  ("u^" ?\e,M{\e(B)
1474
1475  ("A^^" ["A^"])
1476  ("a^^" ["a^"])
1477  ("C,," ["C,"])
1478  ("c,," ["c,"])
1479  ("G^^" ["G^"])
1480  ("g^^" ["g^"])
1481  ("I.." ["I."])
1482  ("i" ["i"])
1483  ("i.." ["i."])
1484  ("O\"\"" ["O\""])
1485  ("o\"\"" ["o\""])
1486  ("S,," ["S,"])
1487  ("s,," ["s,"])
1488  ("U\"\"" ["U\""])
1489  ("u\"\"" ["u\""])
1490  ("U^^" ["U^"])
1491  ("u^^" ["u^"])
1492  )
1493
1494 (quail-define-package
1495  "british" "Latin-1" "\e,A#\e(B@" t
1496  "British English input method with Latin-1 character \e,A#\e(B (# -> \e,A#\e(B)"
1497  nil t nil nil nil nil nil nil nil nil t)
1498
1499 (quail-define-rules
1500  ("#" [?\e,A#\e(B ?#])
1501  )
1502
1503 ;; The following are various quail packages for those who think
1504 ;; the aboves are too awkward.  Supported languages and their
1505 ;; package name are:
1506 ;;
1507 ;; French       (frnch, azerty)
1508 ;; Icelandic    (iclndc)
1509 ;; Denish       (dnsh)
1510 ;; Norwegian    (nrwgn)
1511 ;; Swedish      (swdsh)
1512 ;; Finnish      (fnnsh)
1513 ;; German       (grmn)
1514 ;; Italian      (itln)
1515 ;; Spanish      (spnsh)
1516 ;; Dvorak       (dvorak)
1517 ;;
1518 ;;; 92.12.15  created for Mule Ver.0.9.6 by Takahashi N. <ntakahas@etl.go.jp>
1519 ;;; 92.12.29  modified by Takahashi N. <ntakahas@etl.go.jp>
1520
1521 ;;
1522 (quail-define-package
1523  "french-keyboard" "Latin-1" "FR@" t
1524  "French (Fran\e,Ag\e(Bais) input method simulating some French keyboard
1525 <e dans l'o> n'est pas disponible." nil t t t t nil nil nil nil nil t)
1526
1527 ;; \e,Aj\e(B1  \e,Ai\e(B2  \e,Ah\e(B3  \e,At\e(B4  \e,An\e(B5  \e,Ao\e(B6  \e,Ab\e(B7  \e,A{\e(B8  \e,Ay\e(B9  \e,A`\e(B0  -_  \e,Ak\e(B+  `~
1528 ;;  qQ  wW  eE  rR  tT  yY  uU  iI  oO  pP  \e,AgG\e(B  \e,A|\e(B&
1529 ;;   aA  sS  dD  fF  gG  hH  jJ  kK  lL  ;:  '"  \|
1530 ;;    zZ  xX  cC  vV  bB  nN  mM  ,(  .)  !?
1531
1532 (quail-define-rules
1533  ("1" ?\e,Aj\e(B)
1534  ("2" ?\e,Ai\e(B)
1535  ("3" ?\e,Ah\e(B)
1536  ("4" ?\e,At\e(B)
1537  ("5" ?\e,An\e(B)
1538  ("6" ?\e,Ao\e(B)
1539  ("7" ?\e,Ab\e(B)
1540  ("8" ?\e,A{\e(B)
1541  ("9" ?\e,Ay\e(B)
1542  ("0" ?\e,A`\e(B)
1543  ("=" ?\e,Ak\e(B)
1544  ("[" ?\e,Ag\e(B)
1545  ("]" ?\e,A|\e(B)
1546
1547  ("!" ?1)
1548  ("@" ?2)
1549  ("#" ?3)
1550  ("$" ?4)
1551  ("%" ?5)
1552  ("^" ?6)
1553  ("&" ?7)
1554  ("*" ?8)
1555  ("(" ?9)
1556  (")" ?0)
1557  ("{" ?\e,AG\e(B)
1558  ("}" ?&)
1559  ("<" ?\()
1560  (">" ?\))
1561  )
1562
1563 ;;
1564 (quail-define-package
1565  "french-azerty" "Latin-1" "AZ@" t
1566  "French (Fran\e,Ag\e(Bais) input method simulating Azerty keyboard
1567
1568 Similaire au clavier fran\e,Ag\e(Bais de SUN.
1569 pr\e,Ai\e(Bfixes:  ^ pour circonflexe,  \e,A(\e(B pour tr\e,Ai\e(Bma.
1570 <e dans l'o> n'est pas disponible." nil t t t t nil nil nil nil nil t)
1571
1572 ;; &1  \e,Ai\e(B2  "3  '4  (5  \e,A'\e(B6  \e,Ah\e(B7  !8  \e,Ag\e(B9  \e,A`\e(B0  )\e,A0\e(B -_  @~
1573 ;;  aA  zZ  eE  rR  tT  yY  uU  iI  oO  pP  ^\e,A(\e(B  `$
1574 ;;   qQ  sS  dD  fF  gG  hH  jJ  kK  lL  mM  \e,Ay\e(B%  *|
1575 ;;    wW  xX  cC  vV  bB  nN  ,?  ;.  :/  =+
1576
1577 (quail-define-rules
1578  ("1" ?&)
1579  ("2" ?\e,Ai\e(B)
1580  ("3" ?\")
1581  ("4" ?')
1582  ("5" ?\()
1583  ("6" ?\e,A'\e(B)
1584  ("7" ?\e,Ah\e(B)
1585  ("8" ?!)
1586  ("9" ?\e,Ag\e(B)
1587  ("0" ?\e,A`\e(B)
1588  ("-" ?\))
1589  ("=" ?-)
1590  ("`" ?@)
1591  ("q" ?a)
1592  ("w" ?z)
1593  ("e" ?e)
1594  ("r" ?r)
1595  ("t" ?t)
1596  ("y" ?y)
1597  ("u" ?u)
1598  ("i" ?i)
1599  ("o" ?o)
1600  ("p" ?p)
1601  ("[" ?^)
1602  ("]" ?`)
1603  ("a" ?q)
1604  ("s" ?s)
1605  ("d" ?d)
1606  ("f" ?f)
1607  ("g" ?g)
1608  ("h" ?h)
1609  ("j" ?j)
1610  ("k" ?k)
1611  ("l" ?l)
1612  (";" ?m)
1613  ("'" ?\e,Ay\e(B)
1614  ("\\" ?*)
1615  ("z" ?w)
1616  ("x" ?x)
1617  ("c" ?c)
1618  ("v" ?v)
1619  ("b" ?b)
1620  ("n" ?n)
1621  ("m" ?,)
1622  ("," ?\;)
1623  ("." ?:)
1624  ("/" ?=)
1625
1626  ("!" ?1)
1627  ("@" ?2)
1628  ("#" ?3)
1629  ("$" ?4)
1630  ("%" ?5)
1631  ("^" ?6)
1632  ("&" ?7)
1633  ("*" ?8)
1634  ("(" ?9)
1635  (")" ?0)
1636  ("_" ?\e,A0\e(B)
1637  ("+" ?_)
1638  ("~" ?~)
1639  ("Q" ?A)
1640  ("W" ?Z)
1641  ("E" ?E)
1642  ("R" ?R)
1643  ("T" ?T)
1644  ("Y" ?Y)
1645  ("U" ?U)
1646  ("I" ?I)
1647  ("O" ?O)
1648  ("P" ?P)
1649  ("{" ?\e,A(\e(B)
1650  ("}" ?$)
1651  ("A" ?Q)
1652  ("S" ?S)
1653  ("D" ?D)
1654  ("F" ?F)
1655  ("G" ?G)
1656  ("H" ?H)
1657  ("J" ?J)
1658  ("K" ?K)
1659  ("L" ?L)
1660  (":" ?M)
1661  ("\"" ?%)
1662  ("|" ?|)
1663  ("Z" ?W)
1664  ("X" ?X)
1665  ("C" ?C)
1666  ("V" ?V)
1667  ("B" ?B)
1668  ("N" ?N)
1669  ("M" ??)
1670  ("<" ?.)
1671  (">" ?/)
1672  ("?" ?+)
1673
1674  ("[q" ?\e,Ab\e(B)
1675  ("[e" ?\e,Aj\e(B)
1676  ("[i" ?\e,An\e(B)
1677  ("[o" ?\e,At\e(B)
1678  ("[u" ?\e,A{\e(B)
1679
1680  ("{e" ?\e,Ak\e(B)
1681  ("{i" ?\e,Ao\e(B)
1682  ("{u" ?\e,A|\e(B)
1683
1684  ("[[" ?^)
1685  ("{{" ?\e,A(\e(B)
1686  )
1687
1688 ;;
1689 (quail-define-package
1690  "icelandic-keyboard" "Latin-1" "IS@" t
1691  "Icelandic (\e,AM\e(Bslenska) input method simulating some Icelandic keyboard
1692
1693 Dead accent is right to \e,Af\e(B." nil t t t t nil nil nil nil nil t)
1694
1695 ;; 1!  2"  3#  4$  5%  6^  7&  8*  9(  0)  \e,AvV\e(B  -_  `~
1696 ;;  qQ  wW  eE  rR  tT  yY  uU  iI  oO  pP  \e,ApP\e(B  '?
1697 ;;   aA  sS  dD  fF  gG  hH  jJ  kK  lL  \e,AfF\e(B  \e,A44\e(B  +*
1698 ;;    zZ  xX  cC  vV  bB  nN  mM  ,;  .:  \e,A~^\e(B
1699
1700 (quail-define-rules
1701  ("-" ?\e,Av\e(B)
1702  ("=" ?-)
1703  ("[" ?\e,Ap\e(B)
1704  ("]" ?')
1705  (";" ?\e,Af\e(B)
1706  ("'" ?\e,A4\e(B)
1707  ("\\" ?+)
1708  ("/" ?\e,A~\e(B)
1709
1710  ("@" ?\")
1711  ("_" ?\e,AV\e(B)
1712  ("+" ?_)
1713  ("{" ?\e,AP\e(B)
1714  ("}" ??)
1715  (":" ?\e,AF\e(B)
1716  ("\"" ?\e,A4\e(B)
1717  ("|" ?*)
1718  ("<" ?\;)
1719  (">" ?:)
1720  ("?" ?\e,A^\e(B)
1721
1722  ("'a" ?\e,Aa\e(B)
1723  ("'e" ?\e,Ai\e(B)
1724  ("'i" ?\e,Am\e(B)
1725  ("'o" ?\e,As\e(B)
1726  ("'u" ?\e,Az\e(B)
1727  ("'y" ?\e,A}\e(B)
1728  ("'A" ?\e,AA\e(B)
1729  ("'E" ?\e,AI\e(B)
1730  ("'I" ?\e,AM\e(B)
1731  ("'O" ?\e,AS\e(B)
1732  ("'U" ?\e,AZ\e(B)
1733  ("'Y" ?\e,A]\e(B)
1734
1735  ("''" ?\e,A4\e(B)
1736  )
1737
1738 ;;
1739 (quail-define-package
1740  "danish-keyboard" "Latin-1" "DA@" t
1741  "Danish input method simulating SUN Danish keyboard"
1742  nil t t t t nil nil nil nil nil t)
1743
1744 ;; 1!  2"  3#  4\e,A$\e(B  5%  6&  7/  8(  9)  0=  +?  \e,A='\e(B  ~^
1745 ;;  qQ  wW  eE  rR  tT  yY  uU  iI  oO  pP  \e,AeE\e(B  \e,AiI\e(B
1746 ;;   aA  sS  dD  fF  gG  hH  jJ  kK  lL  \e,AfF\e(B  \e,AxX\e(B  '*
1747 ;;    zZ  xX  cC  vV  bB  nN  mM  ,;  .:  -_
1748
1749 (quail-define-rules
1750  ("-" ?+)
1751  ("=" ?\e,A=\e(B)
1752  ("`" ?~)
1753  ("[" ?\e,Ae\e(B)
1754  ("]" ?\e,Ai\e(B)
1755  (";" ?\e,Af\e(B)
1756  ("'" ?\e,Ax\e(B)
1757  ("\\" ?')
1758  ("/" ?-)
1759
1760  ("@" ?\")
1761  ("$" ?\e,A$\e(B)
1762  ("^" ?&)
1763  ("&" ?/)
1764  ("*" ?\()
1765  ("(" ?\))
1766  (")" ?=)
1767  ("_" ??)
1768  ("+" ?\e,A'\e(B)
1769  ("~" ?^)
1770  ("{" ?\e,AE\e(B)
1771  ("}" ?\e,AI\e(B)
1772  (":" ?\e,AF\e(B)
1773  ("\"" ?\e,AX\e(B)
1774  ("|" ?*)
1775  ("<" ?\;)
1776  (">" ?:)
1777  ("?" ?_)
1778  )
1779
1780 ;;
1781 (quail-define-package
1782  "norwegian-keyboard" "Latin-1" "NO@" t
1783  "Norwegian (Norsk) input method simulating SUN Norwegian keyboard"
1784  nil t t t t nil nil nil nil nil t)
1785
1786 ;; 1!  2"  3#  4\e,A$\e(B  5%  6&  7/  8(  9)  0=  +?  |\e,A'\e(B  ~^
1787 ;;  qQ  wW  eE  rR  tT  yY  uU  iI  oO  pP  \e,AeE\e(B  \e,AiI\e(B
1788 ;;   aA  sS  dD  fF  gG  hH  jJ  kK  lL  \e,AxX\e(B  \e,AfF\e(B  '*
1789 ;;    zZ  xX  cC  vV  bB  nN  mM  ,;  .:  '?
1790
1791 (quail-define-rules
1792  ("-" ?+)
1793  ("=" ?|)
1794  ("`" ?~)
1795  ("[" ?\e,Ae\e(B)
1796  ("]" ?\e,Ai\e(B)
1797  (";" ?\e,Ax\e(B)
1798  ("'" ?\e,Af\e(B)
1799  ("\\" ?')
1800  ("/" ?-)
1801
1802  ("!" ?!)
1803  ("@" ?\")
1804  ("$" ?\e,A$\e(B)
1805  ("^" ?&)
1806  ("&" ?/)
1807  ("*" ?\()
1808  ("(" ?\))
1809  (")" ?=)
1810  ("_" ??)
1811  ("+" ?\e,A'\e(B)
1812  ("~" ?^)
1813  ("{" ?\e,AE\e(B)
1814  ("}" ?\e,AI\e(B)
1815  (":" ?\e,AX\e(B)
1816  ("\"" ?\e,AF\e(B)
1817  ("|" ?*)
1818  ("<" ?\;)
1819  (">" ?:)
1820  ("?" ?_)
1821  )
1822
1823 ;;
1824 (quail-define-package
1825  "swedish-keyboard" "Latin-1" "SV@" t
1826  "Swedish (Svenska) input method simulating SUN Swedish/Finnish keyboard"
1827  nil t t t t nil nil nil nil nil t)
1828
1829 ;; 1!  2"  3#  4\e,A$\e(B  5%  6&  7/  8(  9)  0=  +?  \e,A'=\e(B  ~^
1830 ;;  qQ  wW  eE  rR  tT  yY  uU  iI  oO  pP  \e,AeE\e(B  \e,AiI\e(B
1831 ;;   aA  sS  dD  fF  gG  hH  jJ  kK  lL  \e,AvV\e(B  \e,AdD\e(B  '*
1832 ;;    zZ  xX  cC  vV  bB  nN  mM  ,;  .:  -_
1833
1834 (quail-define-rules
1835  ("-" ?+)
1836  ("=" ?\e,A'\e(B)
1837  ("`" ?~)
1838  ("[" ?\e,Ae\e(B)
1839  ("]" ?\e,Ai\e(B)
1840  (";" ?\e,Av\e(B)
1841  ("'" ?\e,Ad\e(B)
1842  ("\\" ?')
1843  ("/" ?-)
1844
1845  ("@" ?\")
1846  ("$" ?\e,A$\e(B)
1847  ("^" ?&)
1848  ("&" ?/)
1849  ("*" ?\()
1850  ("(" ?\))
1851  (")" ?=)
1852  ("_" ??)
1853  ("+" ?\e,A=\e(B)
1854  ("~" ?^)
1855  ("{" ?\e,AE\e(B)
1856  ("}" ?\e,AI\e(B)
1857  (":" ?\e,AV\e(B)
1858  ("\"" ?\e,AD\e(B)
1859  ("|" ?*)
1860  ("<" ?\;)
1861  (">" ?:)
1862  ("?" ?_)
1863  )
1864
1865 ;;
1866 (quail-define-package
1867  "finish-keyboard" "Latin-1" "FI@" t
1868  "Finish input method simulating SUN Finnish/Swedish keyboard"
1869  nil t t t t nil nil nil nil nil t)
1870
1871 ;; 1!  2"  3#  4\e,A$\e(B  5%  6&  7/  8(  9)  0=  +?  \e,A'=\e(B  ~^
1872 ;;  qQ  wW  eE  rR  tT  yY  uU  iI  oO  pP  \e,AeE\e(B  \e,AiI\e(B
1873 ;;   aA  sS  dD  fF  gG  hH  jJ  kK  lL  \e,AvV\e(B  \e,AdD\e(B  '*
1874 ;;    zZ  xX  cC  vV  bB  nN  mM  ,;  .:  -_
1875
1876 (quail-define-rules
1877  ("-" ?+)
1878  ("=" ?\e,A'\e(B)
1879  ("`" ?~)
1880  ("[" ?\e,Ae\e(B)
1881  ("]" ?\e,Ai\e(B)
1882  (";" ?\e,Av\e(B)
1883  ("'" ?\e,Ad\e(B)
1884  ("\\" ?')
1885  ("/" ?-)
1886
1887  ("@" ?\")
1888  ("$" ?\e,A$\e(B)
1889  ("^" ?&)
1890  ("&" ?/)
1891  ("*" ?\()
1892  ("(" ?\))
1893  (")" ?=)
1894  ("_" ??)
1895  ("+" ?\e,A=\e(B)
1896  ("~" ?^)
1897  ("{" ?\e,AE\e(B)
1898  ("}" ?\e,AI\e(B)
1899  (":" ?\e,AV\e(B)
1900  ("\"" ?\e,AD\e(B)
1901  ("|" ?*)
1902  ("<" ?\;)
1903  (">" ?:)
1904  ("?" ?_)
1905  )
1906
1907 ;;
1908 (quail-define-package
1909  "german" "Latin-1" "DE@" t
1910  "German (Deutsch) input method simulating SUN German keyboard"
1911  nil t t t t nil nil nil nil nil t)
1912
1913 ;; 1!  2"  3\e,A'\e(B  4$  5%  6&  7/  8(  9)  0=  \e,A_\e(B?  [{  ]}
1914 ;;  qQ  wW  eE  rR  tT  zZ  uU  iI  oO  pP  \e,A|\\e(B  +*
1915 ;;   aA  sS  dD  fF  gG  hH  jJ  kK  lL  \e,AvV\e(B  \e,AdD\e(B  #^
1916 ;;    yY  xX  cC  vV  bB  nN  mM  ,;  .:  -_
1917
1918 (quail-define-rules
1919  ("-" ?\e,A_\e(B)
1920  ("=" ?\[)
1921  ("`" ?\])
1922  ("y" ?z)
1923  ("[" ?\e,A|\e(B)
1924  ("]" ?+)
1925  (";" ?\e,Av\e(B)
1926  ("'" ?\e,Ad\e(B)
1927  ("\\" ?#)
1928  ("z" ?y)
1929  ("/" ?-)
1930
1931  ("@" ?\")
1932  ("#" ?\e,A'\e(B)
1933  ("^" ?&)
1934  ("&" ?/)
1935  ("*" ?\()
1936  ("Y" ?Z)
1937  ("(" ?\))
1938  (")" ?=)
1939  ("_" ??)
1940  ("+" ?{)
1941  ("~" ?})
1942  ("{" ?\e,A\\e(B)
1943  ("}" ?*)
1944  (":" ?\e,AV\e(B)
1945  ("\"" ?\e,AD\e(B)
1946  ("|" ?^)
1947  ("Z" ?Y)
1948  ("<" ?\;)
1949  (">" ?:)
1950  ("?" ?_)
1951  )
1952
1953 ;;
1954 (quail-define-package
1955  "italian-keyboard" "Latin-1" "IT@" t
1956  "Italian (Italiano) input method simulating SUN Italian keyboard"
1957  nil t t t t nil nil nil nil nil t)
1958
1959 ;; 1!  2"  3\e,A#\e(B  4$  5%  6&  7/  8(  9)  0=  '?  \e,Al\e(B^  `~
1960 ;;  qQ  wW  eE  rR  tT  yY  uU  iI  oO  pP  \e,Ahi\e(B  +*
1961 ;;   aA  sS  dD  fF  gG  hH  jJ  kK  lL  \e,Arg\e(B  \e,A`0\e(B  \e,Ay'\e(B
1962 ;;    zZ  xX  cC  vV  bB  nN  mM  ,;  .:  -_
1963
1964 (quail-define-rules
1965  ("-" ?')
1966  ("=" ?\e,Al\e(B)
1967  ("[" ?\e,Ah\e(B)
1968  ("]" ?+)
1969  (";" ?\e,Ar\e(B)
1970  ("'" ?\e,A`\e(B)
1971  ("\\" ?\e,Ay\e(B)
1972  ("/" ?-)
1973
1974  ("@" ?\")
1975  ("#" ?\e,A#\e(B)
1976  ("^" ?&)
1977  ("&" ?/)
1978  ("*" ?\()
1979  ("(" ?\))
1980  (")" ?=)
1981  ("_" ??)
1982  ("+" ?^)
1983  ("~" ?~)
1984  ("{" ?\e,Ai\e(B)
1985  ("}" ?*)
1986  (":" ?\e,Ag\e(B)
1987  ("\"" ?\e,A0\e(B)
1988  ("|" ?\e,A'\e(B)
1989  ("<" ?\;)
1990  (">" ?:)
1991  ("?" ?_)
1992  )
1993
1994 ;;
1995 (quail-define-package
1996  "spanish-keyboard" "Latin-1" "ES@" t
1997  "Spanish (Espa\e,Aq\e(Bol) input method simulating SUN Spanish keyboard"
1998  nil t t t t nil nil nil nil nil t)
1999
2000 ;; 1!  2"  3\e,A7\e(B  4$  5%  6&  7/  8(  9)  0=  '?  \e,A!?\e(B  \e,AmM\e(B
2001 ;;  qQ  wW  eE  rR  tT  yY  uU  iI  oO  pP  \e,AiI\e(B  \e,AsS\e(B
2002 ;;   aA  sS  dD  fF  gG  hH  jJ  kK  lL  \e,AqQ\e(B  \e,AaA\e(B  \e,AzZ\e(B
2003 ;;    zZ  xX  cC  vV  bB  nN  mM  ,;  .:  -_
2004
2005 (quail-define-rules
2006  ("-" ?')
2007  ("=" ?\e,A!\e(B)
2008  ("`" ?\e,Am\e(B)
2009  ("[" ?\e,Ai\e(B)
2010  ("]" ?\e,As\e(B)
2011  (";" ?\e,Aq\e(B)
2012  ("'" ?\e,Aa\e(B)
2013  ("\\" ?\e,Az\e(B)
2014  ("/" ?-)
2015
2016  ("@" ?\")
2017  ("#" ?\e,A7\e(B)
2018  ("^" ?&)
2019  ("&" ?/)
2020  ("*" ?\()
2021  ("(" ?\))
2022  (")" ?=)
2023  ("_" ??)
2024  ("+" ?\e,A?\e(B)
2025  ("~" ?\e,AM\e(B)
2026  ("{" ?\e,AI\e(B)
2027  ("}" ?\e,AS\e(B)
2028  (":" ?\e,AQ\e(B)
2029  ("\"" ?\e,AA\e(B)
2030  ("|" ?\e,AZ\e(B)
2031  ("<" ?\;)
2032  (">" ?:)
2033  ("?" ?_)
2034  )
2035
2036 ;;
2037 (quail-define-package
2038  "english-dvorak" "English" "DV@" t
2039  "English (ASCII) input method simulating Dvorak keyboard"
2040  nil t t t t nil nil nil nil nil t)
2041
2042 ;; 1!  2@  3#  4$  5%  6^  7&  8*  9(  0)  [{  ]}  `~
2043 ;;  '"  ,<  .>  pP  yY  fF  gG  cC  rR  lL  /?  =+
2044 ;;   aA  oO  eE  uU  iI  dD  hH  tT  nN  sS  -_  \|
2045 ;;    ;:  qQ  jJ  kK  xX  bB  mM  wW  vV  zZ
2046
2047 (quail-define-rules
2048  ("-" ?\[)
2049  ("=" ?\])
2050  ("`" ?`)
2051  ("q" ?')
2052  ("w" ?,)
2053  ("e" ?.)
2054  ("r" ?p)
2055  ("t" ?y)
2056  ("y" ?f)
2057  ("u" ?g)
2058  ("i" ?c)
2059  ("o" ?r)
2060  ("p" ?l)
2061  ("[" ?/)
2062  ("]" ?=)
2063  ("a" ?a)
2064  ("s" ?o)
2065  ("d" ?e)
2066  ("f" ?u)
2067  ("g" ?i)
2068  ("h" ?d)
2069  ("j" ?h)
2070  ("k" ?t)
2071  ("l" ?n)
2072  (";" ?s)
2073  ("'" ?-)
2074  ("\\" ?\\)
2075  ("z" ?\;)
2076  ("x" ?q)
2077  ("c" ?j)
2078  ("v" ?k)
2079  ("b" ?x)
2080  ("n" ?b)
2081  ("m" ?m)
2082  ("," ?w)
2083  ("." ?v)
2084  ("/" ?z)
2085
2086  ("_" ?{)
2087  ("+" ?})
2088  ("~" ?~)
2089  ("Q" ?\")
2090  ("W" ?<)
2091  ("E" ?>)
2092  ("R" ?P)
2093  ("T" ?Y)
2094  ("Y" ?F)
2095  ("U" ?G)
2096  ("I" ?C)
2097  ("O" ?R)
2098  ("P" ?L)
2099  ("{" ??)
2100  ("}" ?+)
2101  ("A" ?A)
2102  ("S" ?O)
2103  ("D" ?E)
2104  ("F" ?U)
2105  ("G" ?I)
2106  ("H" ?D)
2107  ("J" ?H)
2108  ("K" ?T)
2109  ("L" ?N)
2110  (":" ?S)
2111  ("\"" ?_)
2112  ("|" ?|)
2113  ("Z" ?:)
2114  ("X" ?Q)
2115  ("C" ?J)
2116  ("V" ?K)
2117  ("B" ?X)
2118  ("N" ?B)
2119  ("M" ?M)
2120  ("<" ?W)
2121  (">" ?V)
2122  ("?" ?Z)
2123  )