root/trunk/leim/quail/latin-post.el

Revision 4220, 46.8 kB (checked in by miyoshi, 9 months ago)

Sync up with Emacs22.2.

  • Property svn:eol-style set to LF
Line 
1 ;;; latin-post.el --- Quail packages for inputting various European characters  -*-coding: iso-2022-7bit;-*-
2
3 ;; Copyright (C) 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008
4 ;;   Free Software Foundation, Inc.
5 ;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
6 ;;   2006, 2007, 2008
7 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
8 ;;   Registration Number H14PRO021
9
10 ;; Keywords: multilingual, input method, latin
11
12 ;; This file is part of GNU Emacs.
13
14 ;; GNU Emacs is free software; you can redistribute it and/or modify
15 ;; it under the terms of the GNU General Public License as published by
16 ;; the Free Software Foundation; either version 3, or (at your option)
17 ;; any later version.
18
19 ;; GNU Emacs is distributed in the hope that it will be useful,
20 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
21 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22 ;; GNU General Public License for more details.
23
24 ;; You should have received a copy of the GNU General Public License
25 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
26 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
27 ;; Boston, MA 02110-1301, USA.
28
29 ;; Author: TAKAHASHI Naoto <ntakahas@etl.go.jp>
30
31 ;;; Commentary:
32
33 ;;; Code:
34
35 (require 'quail)
36
37 (quail-define-package
38  "latin-1-postfix" "Latin-1" "1<" t
39  "Latin-1 character input method with postfix modifiers
40
41              | postfix | examples
42  ------------+---------+----------
43   acute      |    '    | a' -> ,Aa(B
44   grave      |    `    | a` -> ,A`(B
45   circumflex |    ^    | a^ -> ,Ab(B
46   diaeresis  |    \"    | a\" -> ,Ad(B
47   tilde      |    ~    | a~ -> ,Ac(B
48   cedilla    |    ,    | c, -> ,Ag(B
49   nordic     |    /    | d/ -> ,Ap(B   t/ -> ,A~(B   a/ -> ,Ae(B   e/ -> ,Af(B   o/ -> ,Ax(B
50   others     |    /    | s/ -> ,A_(B   ?/ -> ,A?(B   !/ -> ,A!(B   // -> ,A0(B
51              | various | << -> ,A+(B   >> -> ,A;(B   o_ -> ,A:(B   a_ -> ,A*(B
52
53 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
54 " nil t nil nil nil nil nil nil nil nil t)
55
56 (quail-define-rules
57  ("A`" ?,A@(B)
58  ("A'" ?,AA(B)
59  ("A^" ?,AB(B)
60  ("A~" ?,AC(B)
61  ("A\"" ?,AD(B)
62  ("A/" ?,AE(B)
63  ("a`" ?,A`(B)
64  ("a'" ?,Aa(B)
65  ("a^" ?,Ab(B)
66  ("a~" ?,Ac(B)
67  ("a\"" ?,Ad(B)
68  ("a/" ?,Ae(B)
69  ("E`" ?,AH(B)
70  ("E'" ?,AI(B)
71  ("E^" ?,AJ(B)
72  ("E\"" ?,AK(B)
73  ("E/" ?,AF(B)
74  ("e`" ?,Ah(B)
75  ("e'" ?,Ai(B)
76  ("e^" ?,Aj(B)
77  ("e\"" ?,Ak(B)
78  ("e/" ?,Af(B)
79  ("I`" ?,AL(B)
80  ("i`" ?,Al(B)
81  ("I'" ?,AM(B)
82  ("i'" ?,Am(B)
83  ("I^" ?,AN(B)
84  ("i^" ?,An(B)
85  ("I\"" ?,AO(B)
86  ("i\"" ?,Ao(B)
87  ("O`" ?,AR(B)
88  ("o`" ?,Ar(B)
89  ("O'" ?,AS(B)
90  ("o'" ?,As(B)
91  ("O^" ?,AT(B)
92  ("o^" ?,At(B)
93  ("O~" ?,AU(B)
94  ("o~" ?,Au(B)
95  ("O\"" ?,AV(B)
96  ("o\"" ?,Av(B)
97  ("O/" ?,AX(B)
98  ("o/" ?,Ax(B)
99  ("U`" ?,AY(B)
100  ("u`" ?,Ay(B)
101  ("U'" ?,AZ(B)
102  ("u'" ?,Az(B)
103  ("U^" ?,A[(B)
104  ("u^" ?,A{(B)
105  ("U\"" ?,A\(B)
106  ("u\"" ?,A|(B)
107  ("Y'" ?,A](B)
108  ("y'" ?,A}(B)
109  ("y\"" ?,A(B)
110  ("D/" ?,AP(B)
111  ("d/" ?,Ap(B)
112  ("T/" ?,A^(B)
113  ("t/" ?,A~(B)
114  ("s/" ?,A_(B)
115  ("C," ?,AG(B)
116  ("c," ?,Ag(B)
117  ("N~" ?,AQ(B)
118  ("n~" ?,Aq(B)
119  ("?/" ?,A?(B)
120  ("!/" ?,A!(B)
121  ("<<" ?,A+(B)
122  (">>" ?,A;(B)
123  ("o_" ?,A:(B)
124  ("a_" ?,A*(B)
125  ("//" ?,A0(B)
126
127  ("A``" ["A`"])
128  ("A''" ["A'"])
129  ("A^^" ["A^"])
130  ("A~~" ["A~"])
131  ("A\"\"" ["A\""])
132  ("A//" ["A/"])
133  ("a``" ["a`"])
134  ("a''" ["a'"])
135  ("a^^" ["a^"])
136  ("a~~" ["a~"])
137  ("a\"\"" ["a\""])
138  ("a//" ["a/"])
139  ("E``" ["E`"])
140  ("E''" ["E'"])
141  ("E^^" ["E^"])
142  ("E\"\"" ["E\""])
143  ("E//" ["E/"])
144  ("e``" ["e`"])
145  ("e''" ["e'"])
146  ("e^^" ["e^"])
147  ("e\"\"" ["e\""])
148  ("e//" ["e/"])
149  ("I``" ["I`"])
150  ("i``" ["i`"])
151  ("I''" ["I'"])
152  ("i''" ["i'"])
153  ("I^^" ["I^"])
154  ("i^^" ["i^"])
155  ("I\"\"" ["I\""])
156  ("i\"\"" ["i\""])
157  ("O``" ["O`"])
158  ("o``" ["o`"])
159  ("O''" ["O'"])
160  ("o''" ["o'"])
161  ("O^^" ["O^"])
162  ("o^^" ["o^"])
163  ("O~~" ["O~"])
164  ("o~~" ["o~"])
165  ("O\"\"" ["O\""])
166  ("o\"\"" ["o\""])
167  ("O//" ["O/"])
168  ("o//" ["o/"])
169  ("U``" ["U`"])
170  ("u``" ["u`"])
171  ("U''" ["U'"])
172  ("u''" ["u'"])
173  ("U^^" ["U^"])
174  ("u^^" ["u^"])
175  ("U\"\"" ["U\""])
176  ("u\"\"" ["u\""])
177  ("Y''" ["Y'"])
178  ("y''" ["y'"])
179  ("y\"\"" ["y\""])
180  ("D//" ["D/"])
181  ("d//" ["d/"])
182  ("T//" ["T/"])
183  ("t//" ["t/"])
184  ("s//" ["s/"])
185  ("C,," ["C,"])
186  ("c,," ["c,"])
187  ("N~~" ["N~"])
188  ("n~~" ["n~"])
189  ("?//" ["?/"])
190  ("!//" ["!/"])
191  ("<<<" ["<<"])
192  (">>>" [">>"])
193  ("o__" ["o_"])
194  ("a__" ["a_"])
195  ("///" ["//"])
196  )
197
198 (quail-define-package
199  "latin-2-postfix" "Latin-2" "2<" t
200  "Latin-2 character input method with postfix modifiers
201
202              | postfix | examples
203  ------------+---------+----------
204   acute      |    '    | a' -> ,Ba(B
205   ogonek     |    ,    | a, -> ,B1(B
206   diaeresis  |    \"    | a\" -> ,Bd(B
207   circumflex |    ^    | a^ -> ,Bb(B
208   breve      |    ~    | a~ -> ,Bc(B
209   cedilla    |    ,    | c, -> ,Bg(B
210   caron      |    ~    | c~ -> ,Bh(B
211   dbl. acute |    :    | o: -> ,Bu(B
212   ring       |    .    | u. -> ,By(B
213   dot        |    .    | z. -> ,B?(B
214   stroke     |    /    | d/ -> ,Bp(B
215   others     |    /    | s/ -> ,B_(B
216
217 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
218 " nil t nil nil nil nil nil nil nil nil t)
219
220 (quail-define-rules
221  ("A'" ?,BA(B)
222  ("A," ?,B!(B)
223  ("A\"" ?,BD(B)
224  ("A^" ?,BB(B)
225  ("A~" ?,BC(B)
226  ("C'" ?,BF(B)
227  ("C," ?,BG(B)
228  ("C~" ?,BH(B)
229  ("D/" ?,BP(B)
230  ("D~" ?,BO(B)
231  ("E'" ?,BI(B)
232  ("E," ?,BJ(B)
233  ("E\"" ?,BK(B)
234  ("E~" ?,BL(B)
235  ("I'" ?,BM(B)
236  ("I^" ?,BN(B)
237  ("L'" ?,BE(B)
238  ("L/" ?,B#(B)
239  ("L~" ?,B%(B)
240  ("N'" ?,BQ(B)
241  ("N~" ?,BR(B)
242  ("O'" ?,BS(B)
243  ("O:" ?,BU(B)
244  ("O\"" ?,BV(B)
245  ("O^" ?,BT(B)
246  ("R'" ?,B@(B)
247  ("R~" ?,BX(B)
248  ("S'" ?,B&(B)
249  ("S," ?,B*(B)
250  ("S~" ?,B)(B)
251  ("T," ?,B^(B)
252  ("T~" ?,B+(B)
253  ("U'" ?,BZ(B)
254  ("U:" ?,B[(B)
255  ("U\"" ?,B\(B)
256  ("U." ?,BY(B)
257  ("Y'" ?,B](B)
258  ("Z'" ?,B,(B)
259  ("Z." ?,B/(B)
260  ("Z~" ?,B.(B)
261  ("a'" ?,Ba(B)
262  ("a," ?,B1(B)
263  ("a\"" ?,Bd(B)
264  ("a^" ?,Bb(B)
265  ("a~" ?,Bc(B)
266  ("c'" ?,Bf(B)
267  ("c," ?,Bg(B)
268  ("c~" ?,Bh(B)
269  ("d/" ?,Bp(B)
270  ("d~" ?,Bo(B)
271  ("e'" ?,Bi(B)
272  ("e," ?,Bj(B)
273  ("e\"" ?,Bk(B)
274  ("e~" ?,Bl(B)
275  ("i'" ?,Bm(B)
276  ("i^" ?,Bn(B)
277  ("l'" ?,Be(B)
278  ("l/" ?,B3(B)
279  ("l~" ?,B5(B)
280  ("n'" ?,Bq(B)
281  ("n~" ?,Br(B)
282  ("o'" ?,Bs(B)
283  ("o:" ?,Bu(B)
284  ("o\"" ?,Bv(B)
285  ("o^" ?,Bt(B)
286  ("r'" ?,B`(B)
287  ("r~" ?,Bx(B)
288  ("s'" ?,B6(B)
289  ("s," ?,B:(B)
290  ("s/" ?,B_(B)
291  ("s~" ?,B9(B)
292  ("t," ?,B~(B)
293  ("t~" ?,B;(B)
294  ("u'" ?,Bz(B)
295  ("u:" ?,B{(B)
296  ("u\"" ?,B|(B)
297  ("u." ?,By(B)
298  ("y'" ?,B}(B)
299  ("z'" ?,B<(B)
300  ("z." ?,B?(B)
301  ("z~" ?,B>(B)
302
303  ("A''" ["A'"])
304  ("A,," ["A,"])
305  ("A\"\"" ["A\""])
306  ("A^^" ["A^"])
307  ("A~~" ["A~"])
308  ("C''" ["C'"])
309  ("C,," ["C,"])
310  ("C~~" ["C~"])
311  ("D//" ["D/"])
312  ("D~~" ["D~"])
313  ("E''" ["E'"])
314  ("E,," ["E,"])
315  ("E\"\"" ["E\""])
316  ("E~~" ["E~"])
317  ("I''" ["I'"])
318  ("I^^" ["I^"])
319  ("L''" ["L'"])
320  ("L//" ["L/"])
321  ("L~~" ["L~"])
322  ("N''" ["N'"])
323  ("N~~" ["N~"])
324  ("O''" ["O'"])
325  ("O::" ["O:"])
326  ("O\"\"" ["O\""])
327  ("O^^" ["O^"])
328  ("R''" ["R'"])
329  ("R~~" ["R~"])
330  ("S''" ["S'"])
331  ("S,," ["S,"])
332  ("S~~" ["S~"])
333  ("T,," ["T,"])
334  ("T~~" ["T~"])
335  ("U''" ["U'"])
336  ("U::" ["U:"])
337  ("U\"\"" ["U\""])
338  ("U.." ["U."])
339  ("Y''" ["Y'"])
340  ("Z''" ["Z'"])
341  ("Z.." ["Z."])
342  ("Z~~" ["Z~"])
343  ("a''" ["a'"])
344  ("a,," ["a,"])
345  ("a\"\"" ["a\""])
346  ("a^^" ["a^"])
347  ("a~~" ["a~"])
348  ("c''" ["c'"])
349  ("c,," ["c,"])
350  ("c~~" ["c~"])
351  ("d//" ["d/"])
352  ("d~~" ["d~"])
353  ("e''" ["e'"])
354  ("e,," ["e,"])
355  ("e\"\"" ["e\""])
356  ("e~~" ["e~"])
357  ("i''" ["i'"])
358  ("i^^" ["i^"])
359  ("l''" ["l'"])
360  ("l//" ["l/"])
361  ("l~~" ["l~"])
362  ("n''" ["n'"])
363  ("n~~" ["n~"])
364  ("o''" ["o'"])
365  ("o::" ["o:"])
366  ("o\"\"" ["o\""])
367  ("o^^" ["o^"])
368  ("r''" ["r'"])
369  ("r~~" ["r~"])
370  ("s''" ["s'"])
371  ("s,," ["s,"])
372  ("s//" ["s/"])
373  ("s~~" ["s~"])
374  ("t,," ["t,"])
375  ("t~~" ["t~"])
376  ("u''" ["u'"])
377  ("u::" ["u:"])
378  ("u\"\"" ["u\""])
379  ("u.." ["u."])
380  ("y''" ["y'"])
381  ("z''" ["z'"])
382  ("z.." ["z."])
383  ("z~~" ["z~"])
384  )
385
386 (quail-define-package
387  "latin-3-postfix" "Latin-3" "3<" t
388  "Latin-3 character input method with postfix modifiers
389
390              | postfix | examples
391  ------------+---------+----------
392   acute      |    '    | a' -> ,Ca(B
393   grave      |    `    | a` -> ,C`(B
394   circumflex |    ^    | a^ -> ,Cb(B
395   diaeresis  |    \"    | a\" -> ,Cd(B
396   dot        |    .    | c. -> ,Ce(B   i. -> ,C9(B   I. -> ,C)(B
397   cedilla    |    ,    | c, -> ,Cg(B
398   breve      |    ~    | g~ -> ,C;(B
399   tilde      |    ~    | n~ -> ,Cq(B
400   stroke     |    /    | h/ -> ,C1(B
401   others     |    /    | s/ -> ,C_(B
402
403 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
404 " nil t nil nil nil nil nil nil nil nil t)
405
406 (quail-define-rules
407  ("A`" ?,C@(B)
408  ("A'" ?,CA(B)
409  ("A^" ?,CB(B)
410  ("A\"" ?,CD(B)
411  ("C." ?,CE(B)
412  ("C^" ?,CF(B)
413  ("C," ?,CG(B)
414  ("E`" ?,CH(B)
415  ("E'" ?,CI(B)
416  ("E^" ?,CJ(B)
417  ("E\"" ?,CK(B)
418  ("G~" ?,C+(B)
419  ("G." ?,CU(B)
420  ("G^" ?,CX(B)
421  ("H/" ?,C!(B)
422  ("H^" ?,C&(B)
423  ("I." ?,C)(B)
424  ("I`" ?,CL(B)
425  ("I'" ?,CM(B)
426  ("I^" ?,CN(B)
427  ("I\"" ?,CO(B)
428  ("J^" ?,C,(B)
429  ("N~" ?,CQ(B)
430  ("O`" ?,CR(B)
431  ("O'" ?,CS(B)
432  ("O^" ?,CT(B)
433  ("O\"" ?,CV(B)
434  ("S," ?,C*(B)
435  ("S^" ?,C^(B)
436  ("U`" ?,CY(B)
437  ("U'" ?,CZ(B)
438  ("U^" ?,C[(B)
439  ("U\"" ?,C\(B)
440  ("U~" ?,C](B)
441  ("Z." ?,C/(B)
442  ("a`" ?,C`(B)
443  ("a'" ?,Ca(B)
444  ("a^" ?,Cb(B)
445  ("a\"" ?,Cd(B)
446  ("c." ?,Ce(B)
447  ("c^" ?,Cf(B)
448  ("c," ?,Cg(B)
449  ("e`" ?,Ch(B)
450  ("e'" ?,Ci(B)
451  ("e^" ?,Cj(B)
452  ("e\"" ?,Ck(B)
453  ("g~" ?,C;(B)
454  ("g." ?,Cu(B)
455  ("g^" ?,Cx(B)
456  ("h/" ?,C1(B)
457  ("h^" ?,C6(B)
458  ("i." ?,C9(B)
459  ("i`" ?,Cl(B)
460  ("i'" ?,Cm(B)
461  ("i^" ?,Cn(B)
462  ("i\"" ?,Co(B)
463  ("j^" ?,C<(B)
464  ("n~" ?,Cq(B)
465  ("o`" ?,Cr(B)
466  ("o'" ?,Cs(B)
467  ("o^" ?,Ct(B)
468  ("o\"" ?,Cv(B)
469  ("s," ?,C:(B)
470  ("s/" ?,C_(B)
471  ("s^" ?,C~(B)
472  ("u`" ?,Cy(B)
473  ("u'" ?,Cz(B)
474  ("u^" ?,C{(B)
475  ("u\"" ?,C|(B)
476  ("u~" ?,C}(B)
477  ("z." ?,C?(B)
478
479  ("A``" ["A`"])
480  ("A''" ["A'"])
481  ("A^^" ["A^"])
482  ("A\"\"" ["A\""])
483  ("C.." ["C."])
484  ("C^^" ["C^"])
485  ("C,," ["C,"])
486  ("E``" ["E`"])
487  ("E''" ["E'"])
488  ("E^^" ["E^"])
489  ("E\"\"" ["E\""])
490  ("G~~" ["G~"])
491  ("G.." ["G."])
492  ("G^^" ["G^"])
493  ("H//" ["H/"])
494  ("H^^" ["H^"])
495  ("I.." ["I."])
496  ("I``" ["I`"])
497  ("I''" ["I'"])
498  ("I^^" ["I^"])
499  ("I\"\"" ["I\""])
500  ("J^^" ["J^"])
501  ("N~~" ["N~"])
502  ("O``" ["O`"])
503  ("O''" ["O'"])
504  ("O^^" ["O^"])
505  ("O\"\"" ["O\""])
506  ("S,," ["S,"])
507  ("S^^" ["S^"])
508  ("U``" ["U`"])
509  ("U''" ["U'"])
510  ("U^^" ["U^"])
511  ("U\"\"" ["U\""])
512  ("U~~" ["U~"])
513  ("Z.." ["Z."])
514  ("a``" ["a`"])
515  ("a''" ["a'"])
516  ("a^^" ["a^"])
517  ("a\"\"" ["a\""])
518  ("c.." ["c."])
519  ("c^^" ["c^"])
520  ("c,," ["c,"])
521  ("e``" ["e`"])
522  ("e''" ["e'"])
523  ("e^^" ["e^"])
524  ("e\"\"" ["e\""])
525  ("g~~" ["g~"])
526  ("g.." ["g."])
527  ("g^^" ["g^"])
528  ("h//" ["h/"])
529  ("h^^" ["h^"])
530  ("i.." ["i."])
531  ("i``" ["i`"])
532  ("i''" ["i'"])
533  ("i^^" ["i^"])
534  ("i\"\"" ["i\""])
535  ("j^^" ["j^"])
536  ("n~~" ["n~"])
537  ("o``" ["o`"])
538  ("o''" ["o'"])
539  ("o^^" ["o^"])
540  ("o\"\"" ["o\""])
541  ("s,," ["s,"])
542  ("s//" ["s/"])
543  ("s^^" ["s^"])
544  ("u``" ["u`"])
545  ("u''" ["u'"])
546  ("u^^" ["u^"])
547  ("u\"\"" ["u\""])
548  ("u~~" ["u~"])
549  ("z.." ["z."])
550  )
551
552 (quail-define-package
553  "latin-4-postfix" "Latin-4" "4<" t
554  "Latin-4 characters input method with postfix modifiers
555
556              | postfix | examples
557  ------------+---------+----------
558   acute      |    '    | a' -> ,Da(B
559   circumflex |    ^    | a^ -> ,Db(B
560   diaeresis  |    \"    | a\" -> ,Dd(B
561   ogonek     |    ,    | a, -> ,D1(B
562   macron     |    -    | a- -> ,D`(B
563   tilde      |    ~    | a~ -> ,Dc(B
564   caron      |    ~    | c~ -> ,Dh(B
565   dot        |    .    | e. -> ,Dl(B
566   cedilla    |    ,    | k, -> ,Ds(B   g, -> ,D;(B
567   stroke     |    /    | d/ -> ,Dp(B
568   nordic     |    /    | a/ -> ,De(B   e/ -> ,Df(B   o/ -> ,Dx(B
569   others     |    /    | s/ -> ,D_(B   n/ -> ,D?(B   k/ -> ,D"(B
570
571 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
572 " nil t nil nil nil nil nil nil nil nil t)
573
574 (quail-define-rules
575  ("A," ?,D!(B)
576  ("A-" ?,D@(B)
577  ("A'" ?,DA(B)
578  ("A^" ?,DB(B)
579  ("A~" ?,DC(B)
580  ("A\"" ?,DD(B)
581  ("A/" ?,DE(B)
582  ("C~" ?,DH(B)
583  ("D/" ?,DP(B)
584  ("E/" ?,DF(B)
585  ("E-" ?,D*(B)
586  ("E'" ?,DI(B)
587  ("E," ?,DJ(B)
588  ("E\"" ?,DK(B)
589  ("E." ?,DL(B)
590  ("G," ?,D+(B)
591  ("I~" ?,D%(B)
592  ("I," ?,DG(B)
593  ("I'" ?,DM(B)
594  ("I^" ?,DN(B)
595  ("I-" ?,DO(B)
596  ("K," ?,DS(B)
597  ("L," ?,D&(B)
598  ("N/" ?,D=(B)
599  ("N," ?,DQ(B)
600  ("O-" ?,DR(B)
601  ("O^" ?,DT(B)
602  ("O~" ?,DU(B)
603  ("O\"" ?,DV(B)
604  ("O/" ?,DX(B)
605  ("R," ?,D#(B)
606  ("S~" ?,D)(B)
607  ("T/" ?,D,(B)
608  ("U," ?,DY(B)
609  ("U'" ?,DZ(B)
610  ("U^" ?,D[(B)
611  ("U\"" ?,D\(B)
612  ("U~" ?,D](B)
613  ("U-" ?,D^(B)
614  ("Z~" ?,D.(B)
615  ("a," ?,D1(B)
616  ("a-" ?,D`(B)
617  ("a'" ?,Da(B)
618  ("a^" ?,Db(B)
619  ("a~" ?,Dc(B)
620  ("a\"" ?,Dd(B)
621  ("a/" ?,De(B)
622  ("c~" ?,Dh(B)
623  ("d/" ?,Dp(B)
624  ("e/" ?,Df(B)
625  ("e-" ?,D:(B)
626  ("e'" ?,Di(B)
627  ("e," ?,Dj(B)
628  ("e\"" ?,Dk(B)
629  ("e." ?,Dl(B)
630  ("g," ?,D;(B)
631  ("i~" ?,D5(B)
632  ("i," ?,Dg(B)
633  ("i'" ?,Dm(B)
634  ("i^" ?,Dn(B)
635  ("i-" ?,Do(B)
636  ("k/" ?,D"(B)
637  ("k," ?,Ds(B)
638  ("l," ?,D6(B)
639  ("n/" ?,D?(B)
640  ("n," ?,Dq(B)
641  ("o-" ?,Dr(B)
642  ("o^" ?,Dt(B)
643  ("o~" ?,Du(B)
644  ("o\"" ?,Dv(B)
645  ("o/" ?,Dx(B)
646  ("r," ?,D3(B)
647  ("s/" ?,D_(B)
648  ("s~" ?,D9(B)
649  ("t/" ?,D<(B)
650  ("u," ?,Dy(B)
651  ("u'" ?,Dz(B)
652  ("u^" ?,D{(B)
653  ("u\"" ?,D|(B)
654  ("u~" ?,D}(B)
655  ("u-" ?,D~(B)
656  ("z~" ?,D>(B)
657
658  ("A,," ["A,"])
659  ("A--" ["A-"])
660  ("A''" ["A'"])
661  ("A^^" ["A^"])
662  ("A~~" ["A~"])
663  ("A\"\"" ["A\""])
664  ("A//" ["A/"])
665  ("C~~" ["C~"])
666  ("D//" ["D/"])
667  ("E//" ["E/"])
668  ("E--" ["E-"])
669  ("E''" ["E'"])
670  ("E,," ["E,"])
671  ("E\"\"" ["E\""])
672  ("E.." ["E."])
673  ("G,," ["G,"])
674  ("I~~" ["I~"])
675  ("I,," ["I,"])
676  ("I''" ["I'"])
677  ("I^^" ["I^"])
678  ("I--" ["I-"])
679  ("K,," ["K,"])
680  ("L,," ["L,"])
681  ("N//" ["N/"])
682  ("N,," ["N,"])
683  ("O--" ["O-"])
684  ("O^^" ["O^"])
685  ("O~~" ["O~"])
686  ("O\"\"" ["O\""])
687  ("O//" ["O/"])
688  ("R,," ["R,"])
689  ("S~~" ["S~"])
690  ("T//" ["T/"])
691  ("U,," ["U,"])
692  ("U''" ["U'"])
693  ("U^^" ["U^"])
694  ("U\"\"" ["U\""])
695  ("U~~" ["U~"])
696  ("U--" ["U-"])
697  ("Z~~" ["Z~"])
698  ("a,," ["a,"])
699  ("a--" ["a-"])
700  ("a''" ["a'"])
701  ("a^^" ["a^"])
702  ("a~~" ["a~"])
703  ("a\"\"" ["a\""])
704  ("a//" ["a/"])
705  ("c~~" ["c~"])
706  ("d//" ["d/"])
707  ("e//" ["e/"])
708  ("e--" ["e-"])
709  ("e''" ["e'"])
710  ("e,," ["e,"])
711  ("e\"\"" ["e\""])
712  ("e.." ["e."])
713  ("g,," ["g,"])
714  ("i~~" ["i~"])
715  ("i,," ["i,"])
716  ("i''" ["i'"])
717  ("i^^" ["i^"])
718  ("i--" ["i-"])
719  ("k//" ["k/"])
720  ("k,," ["k,"])
721  ("l,," ["l,"])
722  ("n//" ["n/"])
723  ("n,," ["n,"])
724  ("o--" ["o-"])
725  ("o^^" ["o^"])
726  ("o~~" ["o~"])
727  ("o\"\"" ["o\""])
728  ("o//" ["o/"])
729  ("r,," ["r,"])
730  ("s//" ["s/"])
731  ("s~~" ["s~"])
732  ("t//" ["t/"])
733  ("u,," ["u,"])
734  ("u''" ["u'"])
735  ("u^^" ["u^"])
736  ("u\"\"" ["u\""])
737  ("u~~" ["u~"])
738  ("u--" ["u-"])
739  ("z~~" ["z~"])
740  )
741
742 (quail-define-package
743  "latin-5-postfix" "Latin-5" "5<" t
744  "Latin-5 characters input method with postfix modifiers
745
746              | postfix | examples
747  ------------+---------+----------
748   acute      |    '    | a' -> ,Ma(B
749   grave      |    `    | a` -> ,M`(B
750   circumflex |    ^    | a^ -> ,Mb(B
751   diaeresis  |    \"    | a\" -> ,Md(B
752   tilde      |    ~    | a~ -> ,Mc(B
753   breve      |    ~    | g~ -> ,Mp(B
754   cedilla    |    ,    | c, -> ,Mg(B
755   dot        |    .    | i. -> ,M}(B   I. -> ,M](B
756   nordic     |    /    | a/ -> ,Me(B   e/ -> ,Mf(B   o/ -> ,Mx(B
757   others     |    /    | s/ -> ,M_(B
758
759 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
760 " nil t nil nil nil nil nil nil nil nil t)
761
762 (quail-define-rules
763  ("A'" ?,MA(B)
764  ("A/" ?,ME(B)
765  ("A\"" ?,MD(B)
766  ("A^" ?,MB(B)
767  ("A`" ?,M@(B)
768  ("A~" ?,MC(B)
769  ("C," ?,MG(B)
770  ("E'" ?,MI(B)
771  ("E/" ?,MF(B)
772  ("E\"" ?,MK(B)
773  ("E^" ?,MJ(B)
774  ("E`" ?,MH(B)
775  ("G~" ?,MP(B)
776  ("I'" ?,MM(B)
777  ("I." ?,M](B)
778  ("I\"" ?,MO(B)
779  ("I^" ?,MN(B)
780  ("I`" ?,ML(B)
781  ("N~" ?,MQ(B)
782  ("O'" ?,MS(B)
783  ("O/" ?,MX(B)
784  ("O\"" ?,MV(B)
785  ("O^" ?,MT(B)
786  ("O`" ?