leim/quail/ethiopic.el

   1 ;; quail/ethiopic.el --- Quail package for inputting Ethiopic characters
   2
   3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
   4 ;; Licensed to the Free Software Foundation.
   5
   6 ;; Keywords: multilingual, input method, ethiopic
   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 ;;; Code:
  28
  29 (require 'quail)
  30 (require 'ethio-util)
  31
  32 ;;
  33 ;; Ethiopic word separator vs. ASCII space
  34 ;;
  35
  36 (defvar ethio-prefer-ascii-space t)
  37 (make-variable-buffer-local 'ethio-prefer-ascii-space)
  38
  39 (defun ethio-toggle-space nil
  40   "Toggle ASCII space and Ethiopic separator for keyboard input."
  41   (interactive)
  42   (setq ethio-prefer-ascii-space
  43         (not ethio-prefer-ascii-space))
  44   (force-mode-line-update))
  45
  46 (defun ethio-insert-space (arg)
  47   "Insert ASCII spaces or Ethiopic word separators depending on context.
  48
  49 If the current word separator (indicated in mode-line) is the ASCII space,
  50 insert an ASCII space.  With ARG, insert that many ASCII spaces.
  51
  52 If the current word separator is the colon-like Ethiopic word
  53 separator and the point is preceded by `an Ethiopic punctuation mark
  54 followed by zero or more ASCII spaces', then insert also an ASCII
  55 space.  With ARG, insert that many ASCII spaces.
  56
  57 Otherwise, insert a colon-like Ethiopic word separator.  With ARG, insert that
  58 many Ethiopic word separators."
  59
  60   (interactive "*p")
  61   (cond
  62    (ethio-prefer-ascii-space
  63     (insert-char 32 arg))
  64    ((save-excursion
  65       (skip-chars-backward " ")
  66       (memq (preceding-char)
  67             '(?\e$(3$h\e(B ?\e$(3$i\e(B ?\e$(3$j\e(B ?\e$(3$k\e(B ?\e$(3$l\e(B ?\e$(3$m\e(B ?\e$(3$n\e(B ?\e$(3$o\e(B ?\e$(3%t\e(B ?\e$(3%u\e(B ?\e$(3%v\e(B ?\e$(3%w\e(B ?\e$(3%x\e(B)))
  68     (insert-char 32 arg))
  69    (t
  70     (insert-char ?\e$(3$h\e(B arg))))
  71
  72 (defun ethio-insert-ethio-space (arg)
  73   "Insert the Ethiopic word delimiter (the colon-like character).
  74 With ARG, insert that many delimiters."
  75   (interactive "*p")
  76   (insert-char ?\e$(3$h\e(B arg))
  77
  78 ;;
  79 ;; Ethiopic punctuation vs. ASCII punctuation
  80 ;;
  81
  82 (defvar ethio-prefer-ascii-punctuation nil)
  83 (make-variable-buffer-local 'ethio-prefer-ascii-punctuation)
  84
  85 (defun ethio-toggle-punctuation nil
  86   "Toggle Ethiopic punctuations and ASCII punctuations for keyboard input."
  87   (interactive)
  88   (setq ethio-prefer-ascii-punctuation
  89         (not ethio-prefer-ascii-punctuation))
  90   (let* ((keys '("." ".." "..." "," ",," ";" ";;" ":" "::" ":::" "*" "**"))
  91          (puncs
  92           (if ethio-prefer-ascii-punctuation
  93               '(?. [".."] ["..."] ?, [",,"] ?\; [";;"] ?: ["::"] [":::"] ?* ["**"])
  94             '(?\e$(3$i\e(B ?\e$(3%u\e(B ?. ?\e$(3$j\e(B ?, ?\e$(3$k\e(B ?\; ?\e$(3$h\e(B ?\e$(3$i\e(B ?: ?* ?\e$(3$o\e(B))))
  95     (while keys
  96       (quail-defrule (car keys) (car puncs) "quail-ethio")
  97       (setq keys (cdr keys)
  98             puncs (cdr puncs)))
  99     (force-mode-line-update)))
 100
 101 ;;
 102 ;; Gemination
 103 ;;
 104
 105 (defun ethio-gemination nil
 106   "Compose the character before the point with the Ethiopic gemination mark.
 107 If the characater is already composed, decompose it and remove the gemination
 108 mark."
 109   (interactive "*")
 110   (cond
 111    ((eq (char-charset (preceding-char)) 'ethiopic)
 112     (insert "\e$(3%s\e(B")
 113     (compose-region
 114      (save-excursion (backward-char 2) (point))
 115      (point))
 116     (forward-char 1))
 117    ((eq (char-charset (preceding-char)) 'leading-code-composition)
 118     (decompose-region
 119      (save-excursion (backward-char 1) (point))
 120      (point))
 121     (delete-backward-char 1))
 122    (t
 123     (error ""))))
 124
 125 ;;
 126 ;; The package "quail-ethio"
 127 ;;
 128
 129 (quail-define-package
 130  "ethiopic" "Ethiopic"
 131  '("\e$(3$O#U!.\e(B "
 132    (ethio-prefer-ascii-space "_" "\e$(3$h\e(B")
 133    (ethio-prefer-ascii-punctuation "." "\e$(3$i\e(B"))
 134  t "  KEYS AND FUNCTIONS
 135
 136 [F2] or `M-x ethio-toggle-space'
 137   Toggles space characters for keyboard input.  The current mode is
 138   indicated in mode-line, whether by `_' (ASCII space) or `\e$(3$h\e(B'
 139   (Ethiopic colon-like word separator).  Even in the `\e$(3$h\e(B' mode, an
 140   ASCII space is inserted if the point is preceded by `an Ethiopic
 141   punctuation followed by zero or more ASCII spaces'.
 142
 143 [F3] or `M-x ethio-toggle-punctuation'
 144   Toggles ASCII punctuations and Ethiopic punctuations for keyboard input.
 145   The current mode is indicated by `.' (ASCII) or `\e$(3$i\e(B' (Ethiopic).
 146
 147 C-^ or `M-x ethio-insert-ethio-space
 148   Always insert an Ethiopic word separator `\e$(3$h\e(B'.  With a prefix number,
 149   insert that many word separators.
 150
 151 C-' or ethio-gemination
 152   Compose the character before the point with the Ethiopic gemination mark.
 153   If the characater is already composed, decompose it and remove the
 154   gemination mark."
 155
 156  '(([f2] . ethio-toggle-space)
 157    ([f3] . ethio-toggle-punctuation)
 158    (" " . ethio-insert-space)
 159    ([?\C-^] . ethio-insert-ethio-space)
 160    ([?\C-'] . ethio-gemination))
 161  t t)
 162
 163 ;; These keys should work even if translation region is not active.
 164 (define-key quail-mode-map [f2] 'ethio-toggle-space)
 165 (define-key quail-mode-map [f3] 'ethio-toggle-punctuation)
 166 (define-key quail-mode-map " "  'ethio-insert-space)
 167 (define-key quail-mode-map [?\C-^] 'ethio-insert-ethio-space)
 168 (define-key quail-mode-map [?\C-'] 'ethio-gemination)
 169
 170 (quail-define-rules
 171  ("he" ?\e$(3!!\e(B)
 172  ("hu" ?\e$(3!"\e(B)
 173  ("hi" ?\e$(3!#\e(B)
 174  ("ha" ?\e$(3!$\e(B)
 175  ("hE" ?\e$(3!%\e(B)
 176  ("h" ?\e$(3!&\e(B)
 177  ("ho" ?\e$(3!'\e(B)
 178  ("hW" ?\e$(3"N\e(B)
 179  ("hWa" ?\e$(3"N\e(B)
 180  ("hWe" ?\e$(3"K\e(B)
 181  ("hWu" ?\e$(3"P\e(B)
 182  ("hWi" ?\e$(3"M\e(B)
 183  ("hWE" ?\e$(3"O\e(B)
 184  ("hW'" ?\e$(3"P\e(B)
 185
 186  ("le" ?\e$(3!)\e(B)
 187  ("lu" ?\e$(3!*\e(B)
 188  ("li" ?\e$(3!+\e(B)
 189  ("la" ?\e$(3!,\e(B)
 190  ("lE" ?\e$(3!-\e(B)
 191  ("l" ?\e$(3!.\e(B)
 192  ("lo" ?\e$(3!/\e(B)
 193  ("lW" ?\e$(3!0\e(B)
 194  ("lWa" ?\e$(3!0\e(B)
 195  ("lWe" ["\e$(3!.%n\e(B"])
 196  ("lWu" ["\e$(3!.%r\e(B"])
 197  ("lWi" ["\e$(3!.%o\e(B"])
 198  ("lWE" ["\e$(3!.%q\e(B"])
 199  ("lW'" ["\e$(3!.%r\e(B"])
 200
 201  ("Le" ?\e$(3!)\e(B)
 202  ("Lu" ?\e$(3!*\e(B)
 203  ("Li" ?\e$(3!+\e(B)
 204  ("La" ?\e$(3!,\e(B)
 205  ("LE" ?\e$(3!-\e(B)
 206  ("L" ?\e$(3!.\e(B)
 207  ("Lo" ?\e$(3!/\e(B)
 208  ("LW" ?\e$(3!0\e(B)
 209  ("LWa" ?\e$(3!0\e(B)
 210  ("LWe" ["\e$(3!.%n\e(B"])
 211  ("LWu" ["\e$(3!.%r\e(B"])
 212  ("LWi" ["\e$(3!.%o\e(B"])
 213  ("LWE" ["\e$(3!.%q\e(B"])
 214  ("LW'" ["\e$(3!.%r\e(B"])
 215
 216  ("He" ?\e$(3!1\e(B)
 217  ("Hu" ?\e$(3!2\e(B)
 218  ("Hi" ?\e$(3!3\e(B)
 219  ("Ha" ?\e$(3!4\e(B)
 220  ("HE" ?\e$(3!5\e(B)
 221  ("H" ?\e$(3!6\e(B)
 222  ("Ho" ?\e$(3!7\e(B)
 223  ("HW" ?\e$(3!8\e(B)
 224  ("HWa" ?\e$(3!8\e(B)
 225  ("HWe" ["\e$(3!6%n\e(B"])
 226  ("HWu" ["\e$(3!6%r\e(B"])
 227  ("HWi" ["\e$(3!6%o\e(B"])
 228  ("HWE" ["\e$(3!6%q\e(B"])
 229  ("HW'" ["\e$(3!6%r\e(B"])
 230
 231  ("me" ?\e$(3!9\e(B)
 232  ("mu" ?\e$(3!:\e(B)
 233  ("mi" ?\e$(3!;\e(B)
 234  ("ma" ?\e$(3!<\e(B)
 235  ("mE" ?\e$(3!=\e(B)
 236  ("m" ?\e$(3!>\e(B)
 237  ("mo" ?\e$(3!?\e(B)
 238  ("mWe" ?\e$(3%1\e(B)
 239  ("mWu" ?\e$(3%a\e(B)
 240  ("mWi" ?\e$(3%A\e(B)
 241  ("mW" ?\e$(3!@\e(B)
 242  ("mWa" ?\e$(3!@\e(B)
 243  ("mWE" ?\e$(3%Q\e(B)
 244  ("mW'" ?\e$(3%a\e(B)
 245  ("mY" ?\e$(3$_\e(B)
 246  ("mYa" ?\e$(3$_\e(B)
 247
 248  ("Me" ?\e$(3!9\e(B)
 249  ("Mu" ?\e$(3!:\e(B)
 250  ("Mi" ?\e$(3!;\e(B)
 251  ("Ma" ?\e$(3!<\e(B)
 252  ("ME" ?\e$(3!=\e(B)
 253  ("M" ?\e$(3!>\e(B)
 254  ("Mo" ?\e$(3!?\e(B)
 255  ("MWe" ?\e$(3%1\e(B)
 256  ("MWu" ?\e$(3%a\e(B)
 257  ("MWi" ?\e$(3%A\e(B)
 258  ("MW" ?\e$(3!@\e(B)
 259  ("MWa" ?\e$(3!@\e(B)
 260  ("MWE" ?\e$(3%Q\e(B)
 261  ("MW'" ?\e$(3%a\e(B)
 262  ("MY" ?\e$(3$_\e(B)
 263  ("MYa" ?\e$(3$_\e(B)
 264
 265  ("`se" ?\e$(3!A\e(B)
 266  ("`su" ?\e$(3!B\e(B)
 267  ("`si" ?\e$(3!C\e(B)
 268  ("`sa" ?\e$(3!D\e(B)
 269  ("`sE" ?\e$(3!E\e(B)
 270  ("`s" ?\e$(3!F\e(B)
 271  ("`so" ?\e$(3!G\e(B)
 272  ("`sW" ?\e$(3!H\e(B)
 273  ("`sWa" ?\e$(3!H\e(B)
 274  ("`sWe" ["\e$(3!F%n\e(B"])
 275  ("`sWu" ["\e$(3!F%r\e(B"])
 276  ("`sWi" ["\e$(3!F%o\e(B"])
 277  ("`sWE" ["\e$(3!F%q\e(B"])
 278  ("`sW'" ["\e$(3!F%r\e(B"])
 279
 280  ("s2e" ?\e$(3!A\e(B)
 281  ("s2u" ?\e$(3!B\e(B)
 282  ("s2i" ?\e$(3!C\e(B)
 283  ("s2a" ?\e$(3!D\e(B)
 284  ("s2E" ?\e$(3!E\e(B)
 285  ("s2" ?\e$(3!F\e(B)
 286  ("s2o" ?\e$(3!G\e(B)
 287  ("s2W" ?\e$(3!H\e(B)
 288  ("s2Wa" ?\e$(3!H\e(B)
 289  ("s2We" ["\e$(3!F%n\e(B"])
 290  ("s2Wu" ["\e$(3!F%r\e(B"])
 291  ("s2Wi" ["\e$(3!F%o\e(B"])
 292  ("s2WE" ["\e$(3!F%q\e(B"])
 293  ("s2W'" ["\e$(3!F%r\e(B"])
 294
 295  ("sse" ?\e$(3!A\e(B)
 296  ("ssu" ?\e$(3!B\e(B)
 297  ("ssi" ?\e$(3!C\e(B)
 298  ("ssa" ?\e$(3!D\e(B)
 299  ("ssE" ?\e$(3!E\e(B)
 300  ("ss" ?\e$(3!F\e(B)
 301  ("sso" ?\e$(3!G\e(B)
 302  ("ssW" ?\e$(3!H\e(B)
 303  ("ssWa" ?\e$(3!H\e(B)
 304  ("ssWe" ["\e$(3!F%n\e(B"])
 305  ("ssWu" ["\e$(3!F%r\e(B"])
 306  ("ssWi" ["\e$(3!F%o\e(B"])
 307  ("ssWE" ["\e$(3!F%q\e(B"])
 308  ("ssW'" ["\e$(3!F%r\e(B"])
 309
 310  ("re" ?\e$(3!I\e(B)
 311  ("ru" ?\e$(3!J\e(B)
 312  ("ri" ?\e$(3!K\e(B)
 313  ("ra" ?\e$(3!L\e(B)
 314  ("rE" ?\e$(3!M\e(B)
 315  ("r" ?\e$(3!N\e(B)
 316  ("ro" ?\e$(3!O\e(B)
 317  ("rW" ?\e$(3!P\e(B)
 318  ("rWa" ?\e$(3!P\e(B)
 319  ("rY" ?\e$(3$`\e(B)
 320  ("rYa" ?\e$(3$`\e(B)
 321  ("rWe" ["\e$(3!N%n\e(B"])
 322  ("rWu" ["\e$(3!N%r\e(B"])
 323  ("rWi" ["\e$(3!N%o\e(B"])
 324  ("rWE" ["\e$(3!N%q\e(B"])
 325  ("rW'" ["\e$(3!N%r\e(B"])
 326
 327  ("Re" ?\e$(3!I\e(B)
 328  ("Ru" ?\e$(3!J\e(B)
 329  ("Ri" ?\e$(3!K\e(B)
 330  ("Ra" ?\e$(3!L\e(B)
 331  ("RE" ?\e$(3!M\e(B)
 332  ("R" ?\e$(3!N\e(B)
 333  ("Ro" ?\e$(3!O\e(B)
 334  ("RW" ?\e$(3!P\e(B)
 335  ("RWa" ?\e$(3!P\e(B)
 336  ("RYa" ?\e$(3$`\e(B)
 337  ("RWe" ["\e$(3!N%n\e(B"])
 338  ("RWu" ["\e$(3!N%r\e(B"])
 339  ("RWi" ["\e$(3!N%o\e(B"])
 340  ("RWE" ["\e$(3!N%q\e(B"])
 341  ("RW'" ["\e$(3!N%r\e(B"])
 342
 343  ("se" ?\e$(3!Q\e(B)
 344  ("su" ?\e$(3!R\e(B)
 345  ("si" ?\e$(3!S\e(B)
 346  ("sa" ?\e$(3!T\e(B)
 347  ("sE" ?\e$(3!U\e(B)
 348  ("s" ?\e$(3!V\e(B)
 349  ("so" ?\e$(3!W\e(B)
 350  ("sW" ?\e$(3!X\e(B)
 351  ("sWa" ?\e$(3!X\e(B)
 352  ("sWe" ["\e$(3!V%n\e(B"])
 353  ("sWu" ["\e$(3!V%r\e(B"])
 354  ("sWi" ["\e$(3!V%o\e(B"])
 355  ("sWE" ["\e$(3!V%q\e(B"])
 356  ("sW'" ["\e$(3!V%r\e(B"])
 357
 358  ("xe" ?\e$(3!Y\e(B)
 359  ("xu" ?\e$(3!Z\e(B)
 360  ("xi" ?\e$(3![\e(B)
 361  ("xa" ?\e$(3!\\e(B)
 362  ("xE" ?\e$(3!]\e(B)
 363  ("x" ?\e$(3!^\e(B)
 364  ("xo" ?\e$(3!_\e(B)
 365  ("xW" ?\e$(3!`\e(B)
 366  ("xWa" ?\e$(3!`\e(B)
 367  ("xWe" ["\e$(3!^%n\e(B"])
 368  ("xWu" ["\e$(3!^%r\e(B"])
 369  ("xWi" ["\e$(3!^%o\e(B"])
 370  ("xWE" ["\e$(3!^%q\e(B"])
 371  ("xW'" ["\e$(3!^%r\e(B"])
 372
 373  ("qe" ?\e$(3!a\e(B)
 374  ("qu" ?\e$(3!b\e(B)
 375  ("qi" ?\e$(3!c\e(B)
 376  ("qa" ?\e$(3!d\e(B)
 377  ("qE" ?\e$(3!e\e(B)
 378  ("q" ?\e$(3!f\e(B)
 379  ("qo" ?\e$(3!g\e(B)
 380  ("qWe" ?\e$(3!i\e(B)
 381  ("qWu" ?\e$(3!n\e(B)
 382  ("qWi" ?\e$(3!k\e(B)
 383  ("qW" ?\e$(3!l\e(B)
 384  ("qWa" ?\e$(3!l\e(B)
 385  ("qWE" ?\e$(3!m\e(B)
 386  ("qW'" ?\e$(3!n\e(B)
 387
 388  ("`qe" ?\e$(3%)\e(B)
 389  ("`qu" ?\e$(3%*\e(B)
 390  ("`qi" ?\e$(3%+\e(B)
 391  ("`qa" ?\e$(3%,\e(B)
 392  ("`qE" ?\e$(3%-\e(B)
 393  ("`q" ?\e$(3%.\e(B)
 394  ("`qo" ?\e$(3%/\e(B)
 395
 396  ("q2e" ?\e$(3%)\e(B)
 397  ("q2u" ?\e$(3%*\e(B)
 398  ("q2i" ?\e$(3%+\e(B)
 399  ("q2a" ?\e$(3%,\e(B)
 400  ("q2E" ?\e$(3%-\e(B)
 401  ("q2" ?\e$(3%.\e(B)
 402  ("q2o" ?\e$(3%/\e(B)
 403
 404  ("qqe" ?\e$(3%)\e(B)
 405  ("qqu" ?\e$(3%*\e(B)
 406  ("qqi" ?\e$(3%+\e(B)
 407  ("qqa" ?\e$(3%,\e(B)
 408  ("qqE" ?\e$(3%-\e(B)
 409  ("qq" ?\e$(3%.\e(B)
 410  ("qqo" ?\e$(3%/\e(B)
 411
 412  ("Qe" ?\e$(3!q\e(B)
 413  ("Qu" ?\e$(3!r\e(B)
 414  ("Qi" ?\e$(3!s\e(B)
 415  ("Qa" ?\e$(3!t\e(B)
 416  ("QE" ?\e$(3!u\e(B)
 417  ("Q" ?\e$(3!v\e(B)
 418  ("Qo" ?\e$(3!w\e(B)
 419  ("QWe" ?\e$(3!y\e(B)
 420  ("QWu" ?\e$(3!~\e(B)
 421  ("QWi" ?\e$(3!{\e(B)
 422  ("QW" ?\e$(3!|\e(B)
 423  ("QWa" ?\e$(3!|\e(B)
 424  ("QWE" ?\e$(3!}\e(B)
 425  ("QW'" ?\e$(3!~\e(B)
 426
 427  ("be" ?\e$(3"#\e(B)
 428  ("bu" ?\e$(3"$\e(B)
 429  ("bi" ?\e$(3"%\e(B)
 430  ("ba" ?\e$(3"&\e(B)
 431  ("bE" ?\e$(3"'\e(B)
 432  ("b" ?\e$(3"(\e(B)
 433  ("bo" ?\e$(3")\e(B)
 434  ("bWe" ?\e$(3%2\e(B)
 435  ("bWu" ?\e$(3%b\e(B)
 436  ("bWi" ?\e$(3%B\e(B)
 437  ("bW" ?\e$(3"*\e(B)
 438  ("bWa" ?\e$(3"*\e(B)
 439  ("bWE" ?\e$(3%R\e(B)
 440  ("bW'" ?\e$(3%b\e(B)
 441
 442  ("Be" ?\e$(3"#\e(B)
 443  ("Bu" ?\e$(3"$\e(B)
 444  ("Bi" ?\e$(3"%\e(B)
 445  ("Ba" ?\e$(3"&\e(B)
 446  ("BE" ?\e$(3"'\e(B)
 447  ("B" ?\e$(3"(\e(B)
 448  ("Bo" ?\e$(3")\e(B)
 449  ("BWe" ?\e$(3%2\e(B)
 450  ("BWu" ?\e$(3%b\e(B)
 451  ("BWi" ?\e$(3%B\e(B)
 452  ("BW" ?\e$(3"*\e(B)
 453  ("BWa" ?\e$(3"*\e(B)
 454  ("BWE" ?\e$(3%R\e(B)
 455  ("BW'" ?\e$(3%b\e(B)
 456
 457  ("ve" ?\e$(3"+\e(B)
 458  ("vu" ?\e$(3",\e(B)
 459  ("vi" ?\e$(3"-\e(B)
 460  ("va" ?\e$(3".\e(B)
 461  ("vE" ?\e$(3"/\e(B)
 462  ("v" ?\e$(3"0\e(B)
 463  ("vo" ?\e$(3"1\e(B)
 464  ("vW" ?\e$(3"2\e(B)
 465  ("vWa" ?\e$(3"2\e(B)
 466  ("vWe" ["\e$(3"0%n\e(B"])
 467  ("vWu" ["\e$(3"0%r\e(B"])
 468  ("vWi" ["\e$(3"0%o\e(B"])
 469  ("vWE" ["\e$(3"0%q\e(B"])
 470  ("vW'" ["\e$(3"0%r\e(B"])
 471
 472  ("Ve" ?\e$(3"+\e(B)
 473  ("Vu" ?\e$(3",\e(B)
 474  ("Vi" ?\e$(3"-\e(B)
 475  ("Va" ?\e$(3".\e(B)
 476  ("VE" ?\e$(3"/\e(B)
 477  ("V" ?\e$(3"0\e(B)
 478  ("Vo" ?\e$(3"1\e(B)
 479  ("VW" ?\e$(3"2\e(B)
 480  ("VWa" ?\e$(3"2\e(B)
 481  ("VWe" ["\e$(3"0%n\e(B"])
 482  ("VWu" ["\e$(3"0%r\e(B"])
 483  ("VWi" ["\e$(3"0%o\e(B"])
 484  ("VWE" ["\e$(3"0%q\e(B"])
 485  ("VW'" ["\e$(3"0%r\e(B"])
 486
 487  ("te" ?\e$(3"3\e(B)
 488  ("tu" ?\e$(3"4\e(B)
 489  ("ti" ?\e$(3"5\e(B)
 490  ("ta" ?\e$(3"6\e(B)
 491  ("tE" ?\e$(3"7\e(B)
 492  ("t" ?\e$(3"8\e(B)
 493  ("to" ?\e$(3"9\e(B)
 494  ("tW" ?\e$(3":\e(B)
 495  ("tWa" ?\e$(3":\e(B)
 496  ("tWe" ["\e$(3"8%n\e(B"])
 497  ("tWu" ["\e$(3"8%r\e(B"])
 498  ("tWi" ["\e$(3"8%o\e(B"])
 499  ("tWE" ["\e$(3"8%q\e(B"])
 500  ("tW'" ["\e$(3"8%r\e(B"])
 501
 502  ("ce" ?\e$(3";\e(B)
 503  ("cu" ?\e$(3"<\e(B)
 504  ("ci" ?\e$(3"=\e(B)
 505  ("ca" ?\e$(3">\e(B)
 506  ("cE" ?\e$(3"?\e(B)
 507  ("c" ?\e$(3"@\e(B)
 508  ("co" ?\e$(3"A\e(B)
 509  ("cW" ?\e$(3"B\e(B)
 510  ("cWa" ?\e$(3"B\e(B)
 511  ("cWe" ["\e$(3"@%n\e(B"])
 512  ("cWu" ["\e$(3"@%r\e(B"])
 513  ("cWi" ["\e$(3"@%o\e(B"])
 514  ("cWE" ["\e$(3"@%q\e(B"])
 515  ("cW'" ["\e$(3"@%r\e(B"])
 516
 517  ("`he" ?\e$(3"C\e(B)
 518  ("`hu" ?\e$(3"D\e(B)
 519  ("`hi" ?\e$(3"E\e(B)
 520  ("`ha" ?\e$(3"F\e(B)
 521  ("`hE" ?\e$(3"G\e(B)
 522  ("`h" ?\e$(3"H\e(B)
 523  ("`ho" ?\e$(3"I\e(B)
 524  ("`hWe" ?\e$(3"K\e(B)
 525  ("`hWu" ?\e$(3"P\e(B)
 526  ("`hWi" ?\e$(3"M\e(B)
 527  ("`hW" ?\e$(3"N\e(B)
 528  ("`hWa" ?\e$(3"N\e(B)
 529  ("`hWE" ?\e$(3"O\e(B)
 530  ("`hW'" ?\e$(3"P\e(B)
 531
 532  ("h2e" ?\e$(3"C\e(B)
 533  ("h2u" ?\e$(3"D\e(B)
 534  ("h2i" ?\e$(3"E\e(B)
 535  ("h2a" ?\e$(3"F\e(B)
 536  ("h2E" ?\e$(3"G\e(B)
 537  ("h2" ?\e$(3"H\e(B)
 538  ("h2o" ?\e$(3"I\e(B)
 539  ("h2We" ?\e$(3"K\e(B)
 540  ("h2Wu" ?\e$(3"P\e(B)
 541  ("h2Wi" ?\e$(3"M\e(B)
 542  ("h2W" ?\e$(3"N\e(B)
 543  ("h2Wa" ?\e$(3"N\e(B)
 544  ("h2WE" ?\e$(3"O\e(B)
 545  ("h2W'" ?\e$(3"P\e(B)
 546
 547  ("hhe" ?\e$(3"C\e(B)
 548  ("hhu" ?\e$(3"D\e(B)
 549  ("hhi" ?\e$(3"E\e(B)
 550  ("hha" ?\e$(3"F\e(B)
 551  ("hhE" ?\e$(3"G\e(B)
 552  ("hh" ?\e$(3"H\e(B)
 553  ("hho" ?\e$(3"I\e(B)
 554  ("hhWe" ?\e$(3"K\e(B)
 555  ("hhWu" ?\e$(3"P\e(B)
 556  ("hhWi" ?\e$(3"M\e(B)
 557  ("hhW" ?\e$(3"N\e(B)
 558  ("hhWa" ?\e$(3"N\e(B)
 559  ("hhWE" ?\e$(3"O\e(B)
 560  ("hhW'" ?\e$(3"P\e(B)
 561
 562  ("ne" ?\e$(3"S\e(B)
 563  ("nu" ?\e$(3"T\e(B)
 564  ("ni" ?\e$(3"U\e(B)
 565  ("na" ?\e$(3"V\e(B)
 566  ("nE" ?\e$(3"W\e(B)
 567  ("n" ?\e$(3"X\e(B)
 568  ("no" ?\e$(3"Y\e(B)
 569  ("nW" ?\e$(3"Z\e(B)
 570  ("nWa" ?\e$(3"Z\e(B)
 571  ("nWe" ["\e$(3"X%n\e(B"])
 572  ("nWu" ["\e$(3"X%r\e(B"])
 573  ("nWi" ["\e$(3"X%o\e(B"])
 574  ("nWE" ["\e$(3"X%q\e(B"])
 575  ("nW'" ["\e$(3"X%r\e(B"])
 576
 577  ("Ne" ?\e$(3"[\e(B)
 578  ("Nu" ?\e$(3"\\e(B)
 579  ("Ni" ?\e$(3"]\e(B)
 580  ("Na" ?\e$(3"^\e(B)
 581  ("NE" ?\e$(3"_\e(B)
 582  ("N" ?\e$(3"`\e(B)
 583  ("No" ?\e$(3"a\e(B)
 584  ("NW" ?\e$(3"b\e(B)
 585  ("NWa" ?\e$(3"b\e(B)
 586  ("NWe" ["\e$(3"`%n\e(B"])
 587  ("NWu" ["\e$(3"`%r\e(B"])
 588  ("NWi" ["\e$(3"`%o\e(B"])
 589  ("NWE" ["\e$(3"`%q\e(B"])
 590  ("NW'" ["\e$(3"`%r\e(B"])
 591
 592  ("e" ?\e$(3"c\e(B)
 593  ("u" ?\e$(3"d\e(B)
 594  ("U" ?\e$(3"d\e(B)
 595  ("i" ?\e$(3"e\e(B)
 596  ("a" ?\e$(3"f\e(B)
 597  ("A" ?\e$(3"f\e(B)
 598  ("E" ?\e$(3"g\e(B)
 599  ("I" ?\e$(3"h\e(B)
 600  ("o" ?\e$(3"i\e(B)
 601  ("O" ?\e$(3"i\e(B)
 602  ("ea" ?\e$(3"j\e(B)
 603  ("eee" ?\e$(3"j\e(B)
 604
 605  ("ke" ?\e$(3"k\e(B)
 606  ("ku" ?\e$(3"l\e(B)
 607  ("ki" ?\e$(3"m\e(B)
 608  ("ka" ?\e$(3"n\e(B)
 609  ("kE" ?\e$(3"o\e(B)
 610  ("k" ?\e$(3"p\e(B)
 611  ("ko" ?\e$(3"q\e(B)
 612  ("kWe" ?\e$(3"s\e(B)
 613  ("kWu" ?\e$(3"x\e(B)
 614  ("kWi" ?\e$(3"u\e(B)
 615  ("kW" ?\e$(3"v\e(B)
 616  ("kWa" ?\e$(3"v\e(B)
 617  ("kWE" ?\e$(3"w\e(B)
 618  ("kW'" ?\e$(3"x\e(B)
 619
 620  ("`ke" ?\e$(3%9\e(B)
 621  ("`ku" ?\e$(3%:\e(B)
 622  ("`ki" ?\e$(3%;\e(B)
 623  ("`ka" ?\e$(3%<\e(B)
 624  ("`kE" ?\e$(3%=\e(B)
 625  ("`k" ?\e$(3%>\e(B)
 626  ("`ko" ?\e$(3%?\e(B)
 627
 628  ("k2e" ?\e$(3%9\e(B)
 629  ("k2u" ?\e$(3%:\e(B)
 630  ("k2i" ?\e$(3%;\e(B)
 631  ("k2a" ?\e$(3%<\e(B)
 632  ("k2E" ?\e$(3%=\e(B)
 633  ("k2" ?\e$(3%>\e(B)
 634  ("k2o" ?\e$(3%?\e(B)
 635
 636  ("kke" ?\e$(3%9\e(B)
 637  ("kku" ?\e$(3%:\e(B)
 638  ("kki" ?\e$(3%;\e(B)
 639  ("kka" ?\e$(3%<\e(B)
 640  ("kkE" ?\e$(3%=\e(B)
 641  ("kk" ?\e$(3%>\e(B)
 642  ("kko" ?\e$(3%?\e(B)
 643
 644  ("Ke" ?\e$(3"{\e(B)
 645  ("Ku" ?\e$(3"|\e(B)
 646  ("Ki" ?\e$(3"}\e(B)
 647  ("Ka" ?\e$(3"~\e(B)
 648  ("KE" ?\e$(3#!\e(B)
 649  ("K" ?\e$(3#"\e(B)
 650  ("Ko" ?\e$(3##\e(B)
 651  ("KWe" ?\e$(3#%\e(B)
 652  ("KWu" ?\e$(3#*\e(B)
 653  ("KWi" ?\e$(3#'\e(B)
 654  ("KW" ?\e$(3#(\e(B)
 655  ("KWa" ?\e$(3#(\e(B)
 656  ("KWE" ?\e$(3#)\e(B)
 657  ("KW'" ?\e$(3#*\e(B)
 658
 659  ("Xe" ?\e$(3%I\e(B)
 660  ("Xu" ?\e$(3%J\e(B)
 661  ("Xi" ?\e$(3%K\e(B)
 662  ("Xa" ?\e$(3%L\e(B)
 663  ("XE" ?\e$(3%M\e(B)
 664  ("X" ?\e$(3%N\e(B)
 665  ("Xo" ?\e$(3%O\e(B)
 666
 667  ("we" ?\e$(3#-\e(B)
 668  ("wu" ?\e$(3#.\e(B)
 669  ("wi" ?\e$(3#/\e(B)
 670  ("wa" ?\e$(3#0\e(B)
 671  ("wE" ?\e$(3#1\e(B)
 672  ("w" ?\e$(3#2\e(B)
 673  ("wo" ?\e$(3#3\e(B)
 674
 675  ("`e" ?\e$(3#5\e(B)
 676  ("`u" ?\e$(3#6\e(B)
 677  ("`U" ?\e$(3#6\e(B)
 678  ("`i" ?\e$(3#7\e(B)
 679  ("`a" ?\e$(3#8\e(B)
 680  ("`A" ?\e$(3#8\e(B)
 681  ("`E" ?\e$(3#9\e(B)
 682  ("`I" ?\e$(3#:\e(B)
 683  ("`o" ?\e$(3#;\e(B)
 684  ("`O" ?\e$(3#;\e(B)
 685
 686  ("e2" ?\e$(3#5\e(B)
 687  ("u2" ?\e$(3#6\e(B)
 688  ("U2" ?\e$(3#6\e(B)
 689  ("i2" ?\e$(3#7\e(B)
 690  ("a2" ?\e$(3#8\e(B)
 691  ("A2" ?\e$(3#8\e(B)
 692  ("E2" ?\e$(3#9\e(B)
 693  ("I2" ?\e$(3#:\e(B)
 694  ("o2" ?\e$(3#;\e(B)
 695  ("O2" ?\e$(3#;\e(B)
 696
 697  ("ee" ?\e$(3#5\e(B)
 698  ("uu" ?\e$(3#6\e(B)
 699  ("UU" ?\e$(3#6\e(B)
 700  ("ii" ?\e$(3#7\e(B)
 701  ("aa" ?\e$(3#8\e(B)
 702  ("AA" ?\e$(3#8\e(B)
 703  ("EE" ?\e$(3#9\e(B)
 704  ("II" ?\e$(3#:\e(B)
 705  ("oo" ?\e$(3#;\e(B)
 706  ("OO" ?\e$(3#;\e(B)
 707
 708  ("ze" ?\e$(3#=\e(B)
 709  ("zu" ?\e$(3#>\e(B)
 710  ("zi" ?\e$(3#?\e(B)
 711  ("za" ?\e$(3#@\e(B)
 712  ("zE" ?\e$(3#A\e(B)
 713  ("z" ?\e$(3#B\e(B)
 714  ("zo" ?\e$(3#C\e(B)
 715  ("zW" ?\e$(3#D\e(B)
 716  ("zWa" ?\e$(3#D\e(B)
 717  ("zWe" ["\e$(3#B%n\e(B"])
 718  ("zWu" ["\e$(3#B%r\e(B"])
 719  ("zWi" ["\e$(3#B%o\e(B"])
 720  ("zWE" ["\e$(3#B%q\e(B"])
 721  ("zW'" ["\e$(3#B%r\e(B"])
 722
 723  ("Ze" ?\e$(3#E\e(B)
 724  ("Zu" ?\e$(3#F\e(B)
 725  ("Zi" ?\e$(3#G\e(B)
 726  ("Za" ?\e$(3#H\e(B)
 727  ("ZE" ?\e$(3#I\e(B)
 728  ("Z" ?\e$(3#J\e(B)
 729  ("Zo" ?\e$(3#K\e(B)
 730  ("ZW" ?\e$(3#L\e(B)
 731  ("ZWa" ?\e$(3#L\e(B)
 732  ("ZWe" ["\e$(3#J%n\e(B"])
 733  ("ZWu" ["\e$(3#J%r\e(B"])
 734  ("ZWi" ["\e$(3#J%o\e(B"])
 735  ("ZWE" ["\e$(3#J%q\e(B"])
 736  ("ZW'" ["\e$(3#J%r\e(B"])
 737
 738  ("ye" ?\e$(3#M\e(B)
 739  ("yu" ?\e$(3#N\e(B)
 740  ("yi" ?\e$(3#O\e(B)
 741  ("ya" ?\e$(3#P\e(B)
 742  ("yE" ?\e$(3#Q\e(B)
 743  ("y" ?\e$(3#R\e(B)
 744  ("yo" ?\e$(3#S\e(B)
 745  ("yW" ?\e$(3#T\e(B)
 746  ("yWa" ?\e$(3#T\e(B)
 747  ("yWe" ["\e$(3#R%n\e(B"])
 748  ("yWu" ["\e$(3#R%r\e(B"])
 749  ("yWi" ["\e$(3#R%o\e(B"])
 750  ("yWE" ["\e$(3#R%q\e(B"])
 751  ("yW'" ["\e$(3#R%r\e(B"])
 752
 753  ("Ye" ?\e$(3#M\e(B)
 754  ("Yu" ?\e$(3#N\e(B)
 755  ("Yi" ?\e$(3#O\e(B)
 756  ("Ya" ?\e$(3#P\e(B)
 757  ("YE" ?\e$(3#Q\e(B)
 758  ("Y" ?\e$(3#R\e(B)
 759  ("Yo" ?\e$(3#S\e(B)
 760  ("YW" ?\e$(3#T\e(B)
 761  ("YWa" ?\e$(3#T\e(B)
 762  ("YWe" ["\e$(3#R%n\e(B"])
 763  ("YWu" ["\e$(3#R%r\e(B"])
 764  ("YWi" ["\e$(3#R%o\e(B"])
 765  ("YWE" ["\e$(3#R%q\e(B"])
 766  ("YW'" ["\e$(3#R%r\e(B"])
 767
 768  ("de" ?\e$(3#U\e(B)
 769  ("du" ?\e$(3#V\e(B)
 770  ("di" ?\e$(3#W\e(B)
 771  ("da" ?\e$(3#X\e(B)
 772  ("dE" ?\e$(3#Y\e(B)
 773  ("d" ?\e$(3#Z\e(B)
 774  ("do" ?\e$(3#[\e(B)
 775  ("dW" ?\e$(3#\\e(B)
 776  ("dWa" ?\e$(3#\\e(B)
 777  ("dWe" ["\e$(3#Z%n\e(B"])
 778  ("dWu" ["\e$(3#Z%r\e(B"])
 779  ("dWi" ["\e$(3#Z%o\e(B"])
 780  ("dWE" ["\e$(3#Z%q\e(B"])
 781  ("dW'" ["\e$(3#Z%r\e(B"])
 782
 783  ("De" ?\e$(3#]\e(B)
 784  ("Du" ?\e$(3#^\e(B)
 785  ("Di" ?\e$(3#_\e(B)
 786  ("Da" ?\e$(3#`\e(B)
 787  ("DE" ?\e$(3#a\e(B)
 788  ("D" ?\e$(3#b\e(B)
 789  ("Do" ?\e$(3#c\e(B)
 790  ("DW" ?\e$(3#d\e(B)
 791  ("DWa" ?\e$(3#d\e(B)
 792  ("DWe" ["\e$(3#b%n\e(B"])
 793  ("DWu" ["\e$(3#b%r\e(B"])
 794  ("DWi" ["\e$(3#b%o\e(B"])
 795  ("DWE" ["\e$(3#b%q\e(B"])
 796  ("DW'" ["\e$(3#b%r\e(B"])
 797
 798  ("je" ?\e$(3#e\e(B)
 799  ("ju" ?\e$(3#f\e(B)
 800  ("ji" ?\e$(3#g\e(B)
 801  ("ja" ?\e$(3#h\e(B)
 802  ("jE" ?\e$(3#i\e(B)
 803  ("j" ?\e$(3#j\e(B)
 804  ("jo" ?\e$(3#k\e(B)
 805  ("jW" ?\e$(3#l\e(B)
 806  ("jWa" ?\e$(3#l\e(B)
 807  ("jWe" ["\e$(3#j%n\e(B"])
 808  ("jWu" ["\e$(3#j%r\e(B"])
 809  ("jWi" ["\e$(3#j%o\e(B"])
 810  ("jWE" ["\e$(3#j%q\e(B"])
 811  ("jW'" ["\e$(3#j%r\e(B"])
 812
 813  ("Je" ?\e$(3#e\e(B)
 814  ("Ju" ?\e$(3#f\e(B)
 815  ("Ji" ?\e$(3#g\e(B)
 816  ("Ja" ?\e$(3#h\e(B)
 817  ("JE" ?\e$(3#i\e(B)
 818  ("J" ?\e$(3#j\e(B)
 819  ("Jo" ?\e$(3#k\e(B)
 820  ("JW" ?\e$(3#l\e(B)
 821  ("JWa" ?\e$(3#l\e(B)
 822  ("JWe" ["\e$(3#j%n\e(B"])
 823  ("JWu" ["\e$(3#j%r\e(B"])
 824  ("JWi" ["\e$(3#j%o\e(B"])
 825  ("JWE" ["\e$(3#j%q\e(B"])
 826  ("JW'" ["\e$(3#j%r\e(B"])
 827
 828  ("ge" ?\e$(3#m\e(B)
 829  ("gu" ?\e$(3#n\e(B)
 830  ("gi" ?\e$(3#o\e(B)
 831  ("ga" ?\e$(3#p\e(B)
 832  ("gE" ?\e$(3#q\e(B)
 833  ("g" ?\e$(3#r\e(B)
 834  ("go" ?\e$(3#s\e(B)
 835  ("gWe" ?\e$(3#u\e(B)
 836  ("gWu" ?\e$(3#z\e(B)
 837  ("gWi" ?\e$(3#w\e(B)
 838  ("gW" ?\e$(3#x\e(B)
 839  ("gWa" ?\e$(3#x\e(B)
 840  ("gWE" ?\e$(3#y\e(B)
 841  ("gW'" ?\e$(3#z\e(B)
 842
 843  ("`ge" ?\e$(3%Y\e(B)
 844  ("`gu" ?\e$(3%Z\e(B)
 845  ("`gi" ?\e$(3%[\e(B)
 846  ("`ga" ?\e$(3%\\e(B)
 847  ("`gE" ?\e$(3%]\e(B)
 848  ("`g" ?\e$(3%^\e(B)
 849  ("`go" ?\e$(3%_\e(B)
 850
 851  ("g2e" ?\e$(3%Y\e(B)
 852  ("g2u" ?\e$(3%Z\e(B)
 853  ("g2i" ?\e$(3%[\e(B)
 854  ("g2a" ?\e$(3%\\e(B)
 855  ("g2E" ?\e$(3%]\e(B)
 856  ("g2" ?\e$(3%^\e(B)
 857  ("g2o" ?\e$(3%_\e(B)
 858
 859  ("gge" ?\e$(3%Y\e(B)
 860  ("ggu" ?\e$(3%Z\e(B)
 861  ("ggi" ?\e$(3%[\e(B)
 862  ("gga" ?\e$(3%\\e(B)
 863  ("ggE" ?\e$(3%]\e(B)
 864  ("gg" ?\e$(3%^\e(B)
 865  ("ggo" ?\e$(3%_\e(B)
 866
 867  ("Ge" ?\e$(3#}\e(B)
 868  ("Gu" ?\e$(3#~\e(B)
 869  ("Gi" ?\e$(3$!\e(B)
 870  ("Ga" ?\e$(3$"\e(B)
 871  ("GE" ?\e$(3$#\e(B)
 872  ("G" ?\e$(3$$\e(B)
 873  ("Go" ?\e$(3$%\e(B)
 874  ("GWe" ?\e$(3%3\e(B)
 875  ("GWu" ?\e$(3%c\e(B)
 876  ("GWi" ?\e$(3%C\e(B)
 877  ("GW" ?\e$(3$&\e(B)
 878  ("GWa" ?\e$(3$&\e(B)
 879  ("GWE" ?\e$(3%S\e(B)
 880  ("GW'" ?\e$(3%c\e(B)
 881
 882  ("te" ?\e$(3$'\e(B)
 883  ("tu" ?\e$(3$(\e(B)
 884  ("ti" ?\e$(3$)\e(B)
 885  ("ta" ?\e$(3$*\e(B)
 886  ("tE" ?\e$(3$+\e(B)
 887  ("t" ?\e$(3$,\e(B)
 888  ("to" ?\e$(3$-\e(B)
 889  ("tW" ?\e$(3$.\e(B)
 890  ("tWa" ?\e$(3$.\e(B)
 891  ("tWe" ["\e$(3$,%n\e(B"])
 892  ("tWu" ["\e$(3$,%r\e(B"])
 893  ("tWi" ["\e$(3$,%o\e(B"])
 894  ("tWE" ["\e$(3$,%q\e(B"])
 895  ("tW'" ["\e$(3$,%r\e(B"])
 896
 897  ("Ce" ?\e$(3$/\e(B)
 898  ("Cu" ?\e$(3$0\e(B)
 899  ("Ci" ?\e$(3$1\e(B)
 900  ("Ca" ?\e$(3$2\e(B)
 901  ("CE" ?\e$(3$3\e(B)
 902  ("C" ?\e$(3$4\e(B)
 903  ("Co" ?\e$(3$5\e(B)
 904  ("CW" ?\e$(3$6\e(B)
 905  ("CWa" ?\e$(3$6\e(B)
 906  ("CWe" ["\e$(3$4%n\e(B"])
 907  ("CWu" ["\e$(3$4%r\e(B"])
 908  ("CWi" ["\e$(3$4%o\e(B"])
 909  ("CWE" ["\e$(3$4%q\e(B"])
 910  ("CW'" ["\e$(3$4%r\e(B"])
 911
 912  ("Pe" ?\e$(3$7\e(B)
 913  ("Pu" ?\e$(3$8\e(B)
 914  ("Pi" ?\e$(3$9\e(B)
 915  ("Pa" ?\e$(3$:\e(B)
 916  ("PE" ?\e$(3$;\e(B)
 917  ("P" ?\e$(3$<\e(B)
 918  ("Po" ?\e$(3$=\e(B)
 919  ("PW" ?\e$(3$>\e(B)
 920  ("PWa" ?\e$(3$>\e(B)
 921  ("PWe" ["\e$(3$<%n\e(B"])
 922  ("PWu" ["\e$(3$<%r\e(B"])
 923  ("PWi" ["\e$(3$<%o\e(B"])
 924  ("PWE" ["\e$(3$<%q\e(B"])
 925  ("PW'" ["\e$(3$<%r\e(B"])
 926
 927  ("Se" ?\e$(3$?\e(B)
 928  ("Su" ?\e$(3$@\e(B)
 929  ("Si" ?\e$(3$A\e(B)
 930  ("Sa" ?\e$(3$B\e(B)
 931  ("SE" ?\e$(3$C\e(B)
 932  ("S" ?\e$(3$D\e(B)
 933  ("So" ?\e$(3$E\e(B)
 934  ("SW" ?\e$(3$F\e(B)
 935  ("SWa" ?\e$(3$F\e(B)
 936  ("SWe" ["\e$(3$D%n\e(B"])
 937  ("SWu" ["\e$(3$D%r\e(B"])
 938  ("SWi" ["\e$(3$D%o\e(B"])
 939  ("SWE" ["\e$(3$D%q\e(B"])
 940  ("SW'" ["\e$(3$D%r\e(B"])
 941
 942  ("`Se" ?\e$(3$G\e(B)
 943  ("`Su" ?\e$(3$H\e(B)
 944  ("`Si" ?\e$(3$I\e(B)
 945  ("`Sa" ?\e$(3$J\e(B)
 946  ("`SE" ?\e$(3$K\e(B)
 947  ("`S" ?\e$(3$L\e(B)
 948  ("`So" ?\e$(3$M\e(B)
 949  ("`SW" ?\e$(3$F\e(B)
 950  ("`SWa" ?\e$(3$F\e(B)
 951  ("`SWe" ["\e$(3$L%n\e(B"])
 952  ("`SWu" ["\e$(3$L%r\e(B"])
 953  ("`SWi" ["\e$(3$L%o\e(B"])
 954  ("`SWE" ["\e$(3$L%q\e(B"])
 955  ("`SW'" ["\e$(3$L%r\e(B"])
 956
 957  ("S2e" ?\e$(3$G\e(B)
 958  ("S2u" ?\e$(3$H\e(B)
 959  ("S2i" ?\e$(3$I\e(B)
 960  ("S2a" ?\e$(3$J\e(B)
 961  ("S2E" ?\e$(3$K\e(B)
 962  ("S2" ?\e$(3$L\e(B)
 963  ("S2o" ?\e$(3$M\e(B)
 964  ("S2W" ?\e$(3$F\e(B)
 965  ("S2Wa" ?\e$(3$F\e(B)
 966  ("S2We" ["\e$(3$L%n\e(B"])
 967  ("S2Wu" ["\e$(3$L%r\e(B"])
 968  ("S2Wi" ["\e$(3$L%o\e(B"])
 969  ("S2WE" ["\e$(3$L%q\e(B"])
 970  ("S2W'" ["\e$(3$L%r\e(B"])
 971
 972  ("SSe" ?\e$(3$G\e(B)
 973  ("SSu" ?\e$(3$H\e(B)
 974  ("SSi" ?\e$(3$I\e(B)
 975  ("SSa" ?\e$(3$J\e(B)
 976  ("SSE" ?\e$(3$K\e(B)
 977  ("SS" ?\e$(3$L\e(B)
 978  ("SSo" ?\e$(3$M\e(B)
 979  ("SSW" ?\e$(3$F\e(B)
 980  ("SSWa" ?\e$(3$F\e(B)
 981  ("SSWe" ["\e$(3$L%n\e(B"])
 982  ("SSWu" ["\e$(3$L%r\e(B"])
 983  ("SSWi" ["\e$(3$L%o\e(B"])
 984  ("SSWE" ["\e$(3$L%q\e(B"])
 985  ("SW'" ["\e$(3$L%r\e(B"])
 986
 987  ("fe" ?\e$(3$O\e(B)
 988  ("fu" ?\e$(3$P\e(B)
 989  ("fi" ?\e$(3$Q\e(B)
 990  ("fa" ?\e$(3$R\e(B)
 991  ("fE" ?\e$(3$S\e(B)
 992  ("f" ?\e$(3$T\e(B)
 993  ("fo" ?\e$(3$U\e(B)
 994  ("fWe" ?\e$(3%4\e(B)
 995  ("fWu" ?\e$(3%d\e(B)
 996  ("fWi" ?\e$(3%D\e(B)
 997  ("fW" ?\e$(3$V\e(B)
 998  ("fWa" ?\e$(3$V\e(B)
 999  ("fWE" ?\e$(3%T\e(B)
1000  ("fW'" ?\e$(3%d\e(B)
1001  ("fY" ?\e$(3$a\e(B)
1002  ("fYa" ?\e$(3$a\e(B)
1003
1004  ("Fe" ?\e$(3$O\e(B)
1005  ("Fu" ?\e$(3$P\e(B)
1006  ("Fi" ?\e$(3$Q\e(B)
1007  ("Fa" ?\e$(3$R\e(B)
1008  ("FE" ?\e$(3$S\e(B)
1009  ("F" ?\e$(3$T\e(B)
1010  ("Fo" ?\e$(3$U\e(B)
1011  ("FWe" ?\e$(3%4\e(B)
1012  ("FWu" ?\e$(3%d\e(B)
1013  ("FWi" ?\e$(3%D\e(B)
1014  ("FW" ?\e$(3$V\e(B)
1015  ("FWa" ?\e$(3$V\e(B)
1016  ("FWE" ?\e$(3%T\e(B)
1017  ("FW'" ?\e$(3%d\e(B)
1018  ("FY" ?\e$(3$a\e(B)
1019  ("FYa" ?\e$(3$a\e(B)
1020
1021  ("pe" ?\e$(3$W\e(B)
1022  ("pu" ?\e$(3$X\e(B)
1023  ("pi" ?\e$(3$Y\e(B)
1024  ("pa" ?\e$(3$Z\e(B)
1025  ("pE" ?\e$(3$[\e(B)
1026  ("p" ?\e$(3$\\e(B)
1027  ("po" ?\e$(3$]\e(B)
1028  ("pWe" ?\e$(3%5\e(B)
1029  ("pWu" ?\e$(3%e\e(B)
1030  ("pWi" ?\e$(3%E\e(B)
1031  ("pW" ?\e$(3$^\e(B)
1032  ("pWa" ?\e$(3$^\e(B)
1033  ("pWE" ?\e$(3%U\e(B)
1034  ("pW'" ?\e$(3%e\e(B)
1035
1036  ("'" [""])
1037  ("''" ?')
1038  (":" ?\e$(3$h\e(B)
1039  ("::" ?\e$(3$i\e(B)
1040  (":::" ?:)
1041  ("." ?\e$(3$i\e(B)
1042  (".." ?\e$(3%u\e(B)
1043  ("..." ?.)
1044  ("," ?\e$(3$j\e(B)
1045  (",," ?,)
1046  (";" ?\e$(3$k\e(B)
1047  (";;" ?\;)
1048  ("-:" ?\e$(3$l\e(B)
1049  (":-" ?\e$(3$m\e(B)
1050  ("*" ?*)
1051  ("**" ?\e$(3$o\e(B)
1052  (":|:" ?\e$(3$o\e(B)
1053  ("?" ?\e$(3%x\e(B)
1054  ("??" ?\e$(3$n\e(B)
1055  ("`?" ?\e$(3$n\e(B)
1056  ("???" ??)
1057  ("<<" ?\e$(3%v\e(B)
1058  (">>" ?\e$(3%w\e(B)
1059  ("`!" ?\e$(3%t\e(B)
1060  ("wWe" ?\e$(3%n\e(B)
1061  ("wWu" ?\e$(3%r\e(B)
1062  ("wWi" ?\e$(3%o\e(B)
1063  ("wW" ?\e$(3%p\e(B)
1064  ("wWa" ?\e$(3%p\e(B)
1065  ("wWE" ?\e$(3%q\e(B)
1066  ("wW'" ?\e$(3%r\e(B)
1067  ("We" ?\e$(3%n\e(B)
1068  ("Wu" ?\e$(3%r\e(B)
1069  ("Wi" ?\e$(3%o\e(B)
1070  ("W" ?\e$(3%p\e(B)
1071  ("Wa" ?\e$(3%p\e(B)
1072  ("WE" ?\e$(3%q\e(B)
1073  ("W'" ?\e$(3%r\e(B)
1074  ("`1" ?\e$(3$p\e(B)
1075  ("`2" ?\e$(3$q\e(B)
1076  ("`3" ?\e$(3$r\e(B)
1077  ("`4" ?\e$(3$s\e(B)
1078  ("`5" ?\e$(3$t\e(B)
1079  ("`6" ?\e$(3$u\e(B)
1080  ("`7" ?\e$(3$v\e(B)
1081  ("`8" ?\e$(3$w\e(B)
1082  ("`9" ?\e$(3$x\e(B)
1083  ("`10" ?\e$(3$y\e(B)
1084  ("`20" ?\e$(3$z\e(B)
1085  ("`30" ?\e$(3${\e(B)
1086  ("`40" ?\e$(3$|\e(B)
1087  ("`50" ?\e$(3$}\e(B)
1088  ("`60" ?\e$(3$~\e(B)
1089  ("`70" ?\e$(3%!\e(B)
1090  ("`80" ?\e$(3%"\e(B)
1091  ("`90" ?\e$(3%#\e(B)
1092  ("`100" ?\e$(3%$\e(B)
1093  ("`1000" ["\e$(3$y%$\e(B"])
1094  ("`10000" ?\e$(3%%\e(B)
1095 )
1096
1097 ;; The translation of `a' depends on the language (Tigrigna or Amharic).
1098 (add-hook 'quail-mode-hook
1099           (lambda nil
1100             (quail-defrule "a"
1101                            (if (ethio-prefer-amharic-p) ?\e$(3"c\e(B ?\e$(3"f\e(B)
1102                            "quail-ethio")))
1103
1104 ;;; quail/ethiopic.el ends here