code.delx.au - gnu-emacs/blob - leim/quail/greek.el

   1 ;;; greek.el --- Quail package for inputting Greek
   2
   3 ;; Copyright (C) 1997, 2001 Electrotechnical Laboratory, JAPAN.
   4 ;; Licensed to the Free Software Foundation.
   5
   6 ;; Keywords: multilingual, input method, Greek
   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 ;;; Commentary:
  26
  27 ;;; Code:
  28
  29 (require 'quail)
  30
  31 (quail-define-package
  32  "greek-jis" "Greek" "\e$B&8\e(B" nil
  33  "\e$B&%&K&K&G&M&I&J&A\e(B: Greek keyboard layout (JIS X0208.1983)
  34
  35 The layout is same as greek, but uses JIS characters.
  36 Sorry, accents and terminal sigma are not supported in JIS."
  37  nil t t t t nil nil nil nil nil t)
  38
  39 (quail-define-rules
  40  ("1" ?\e$B#1\e(B)
  41  ("2" ?\e$B#2\e(B)
  42  ("3" ?\e$B#3\e(B)
  43  ("4" ?\e$B#4\e(B)
  44  ("5" ?\e$B#5\e(B)
  45  ("6" ?\e$B#6\e(B)
  46  ("7" ?\e$B#7\e(B)
  47  ("8" ?\e$B#8\e(B)
  48  ("9" ?\e$B#9\e(B)
  49  ("0" ?\e$B#0\e(B)
  50  ("-" ?\e$B!]\e(B)
  51  ("=" ?\e$B!a\e(B)
  52  ("`" ?\e$B!F\e(B)
  53  ("q" ?\e$B!&\e(B)
  54  ("w" ?\e$B&R\e(B)
  55  ("e" ?\e$B&E\e(B)
  56  ("r" ?\e$B&Q\e(B)
  57  ("t" ?\e$B&S\e(B)
  58  ("y" ?\e$B&T\e(B)
  59  ("u" ?\e$B&H\e(B)
  60  ("i" ?\e$B&I\e(B)
  61  ("o" ?\e$B&O\e(B)
  62  ("p" ?\e$B&P\e(B)
  63  ("[" ?\\e$B!N\e(B)
  64  ("]" ?\\e$B!O\e(B)
  65  ("a" ?\e$B&A\e(B)
  66  ("s" ?\e$B&R\e(B)
  67  ("d" ?\e$B&D\e(B)
  68  ("f" ?\e$B&U\e(B)
  69  ("g" ?\e$B&C\e(B)
  70  ("h" ?\e$B&G\e(B)
  71  ("j" ?\e$B&N\e(B)
  72  ("k" ?\e$B&J\e(B)
  73  ("l" ?\e$B&K\e(B)
  74  (";" ?\e$B!G\e(B)
  75  ("'" ?\e$B!G\e(B)
  76  ("\\" ?\e$B!@\e(B)
  77  ("z" ?\e$B&F\e(B)
  78  ("x" ?\e$B&V\e(B)
  79  ("c" ?\e$B&W\e(B)
  80  ("v" ?\e$B&X\e(B)
  81  ("b" ?\e$B&B\e(B)
  82  ("n" ?\e$B&M\e(B)
  83  ("m" ?\e$B&L\e(B)
  84  ("," ?, )
  85  ("." ?. )
  86  ("/" ?\e$B!?\e(B)
  87
  88  ("!" ?\e$B!*\e(B)
  89  ("@" ?\e$B!w\e(B)
  90  ("#" ?\e$B!t\e(B)
  91  ("$" ?\e$B!t\e(B)
  92  ("%" ?\e$B!s\e(B)
  93  ("^" ?\e$B!0\e(B)
  94  ("&" ?\e$B!u\e(B)
  95  ("*" ?\e$B!v\e(B)
  96  ("(" ?\\e$B!J\e(B)
  97  (")" ?\\e$B!K\e(B)
  98  ("_" ?\e$B!2\e(B)
  99  ("+" ?\e$B!\\e(B)
 100  ("~" ?\e$B!1\e(B)
 101  ("Q" ?\e$B!]\e(B)
 102  ("W" ?\e$B&2\e(B)
 103  ("E" ?\e$B&%\e(B)
 104  ("R" ?\e$B&1\e(B)
 105  ("T" ?\e$B&3\e(B)
 106  ("Y" ?\e$B&4\e(B)
 107  ("U" ?\e$B&(\e(B)
 108  ("I" ?\e$B&)\e(B)
 109  ("O" ?\e$B&/\e(B)
 110  ("P" ?\e$B&1\e(B)
 111  ("{" ?\\e$B!P\e(B)
 112  ("}" ?\\e$B!Q\e(B)
 113  ("A" ?\e$B&!\e(B)
 114  ("S" ?\e$B&2\e(B)
 115  ("D" ?\e$B&$\e(B)
 116  ("F" ?\e$B&5\e(B)
 117  ("G" ?\e$B&#\e(B)
 118  ("H" ?\e$B&'\e(B)
 119  ("J" ?\e$B&.\e(B)
 120  ("K" ?\e$B&*\e(B)
 121  ("L" ?\e$B&+\e(B)
 122  (":" ?\e$B!I\e(B)
 123  ("\"" ?\e$B!I\e(B)
 124  ("|" ?\e$B!C\e(B)
 125  ("Z" ?\e$B&&\e(B)
 126  ("X" ?\e$B&6\e(B)
 127  ("C" ?\e$B&7\e(B)
 128  ("V" ?\e$B&8\e(B)
 129  ("B" ?\e$B&"\e(B)
 130  ("N" ?\e$B&-\e(B)
 131  ("M" ?\e$B&,\e(B)
 132  ("<" ?\e$B!(\e(B)
 133  (">" ?\e$B!'\e(B)
 134  ("?" ?\e$B!)\e(B))
 135
 136 ;;
 137
 138 (quail-define-package "greek-mizuochi" "Greek" "CG" t "
 139 The Mizuochi input method for Classical Greek using mule-unicode-0100-24ff.
 140
 141 -------------------------------------
 142 character     capital         small
 143 -------------------------------------
 144 alpha           A               a
 145 beta            B               b
 146 gamma           G               g
 147 delta           D               d
 148 epsilon         E               e
 149 zeta            Z               z
 150 eta             H               h
 151 theta           Q               q
 152 iota            I               i
 153 kappa           K               k
 154 lamda           L               l
 155 mu              M               m
 156 nu              N               n
 157 xi              X               x
 158 omicron         O               o
 159 pi              P               p
 160 rho             R               r
 161 sigma           S               s
 162 final sigma                     j
 163 tau             T               t
 164 upsilon         U               u
 165 phi             F               f
 166 chi             C               c
 167 psi             Y               y
 168 omega           W               w
 169 -------------------------------------
 170 sampi                           !
 171 digamma         #
 172 stigma                          $
 173 koppa           &               %
 174 -------------------------------------
 175
 176 ------------------------
 177 mark            key
 178 ------------------------
 179 ypogegrammeni   J
 180 psili           '  or  v
 181 dasia           `  or  V
 182 oxia            /
 183 varia           ?
 184 perispomeni     \\  or  ^
 185 dialytika       \"
 186 ano teleia      :
 187 erotimatiko     ;
 188 ----------------------
 189 "
 190 nil t t nil nil nil nil nil nil nil t)
 191
 192 (quail-define-rules
 193
 194  ("!" ?\e$,1'a\e(B) ; sampi
 195  ("#" ?\e$,1'\\e(B) ; DIGAMMA
 196  ("$" ?\e$,1'[\e(B) ; stigma
 197  ("%" ?\e$,1'_\e(B) ; koppa
 198  ("&" ?\e$,1'^\e(B) ; KOPPA
 199  ("'" ?\e$,1q\7f\e(B) ("v" ?\e$,1q\7f\e(B) ; psili
 200  ("/" ?\e$,1r]\e(B) ; oxia
 201  (":" ?\e$,1&g\e(B) ; ano teleia
 202  (";" ?\e$,1&^\e(B) ; erotimatiko
 203  ("\"" ?\e,A(\e(B) ; dialytika
 204
 205  ("A" ?\e$,1&q\e(B)
 206  ("B" ?\e$,1&r\e(B)
 207  ("C" ?\e$,1''\e(B)
 208  ("D" ?\e$,1&t\e(B)
 209  ("E" ?\e$,1&u\e(B)
 210  ("F" ?\e$,1'&\e(B)
 211  ("G" ?\e$,1&s\e(B)
 212  ("H" ?\e$,1&w\e(B)
 213  ("I" ?\e$,1&y\e(B)
 214  ("wJ" ?\e$,1rS\e(B)
 215  ("K" ?\e$,1&z\e(B)
 216  ("L" ?\e$,1&{\e(B)
 217  ("M" ?\e$,1&|\e(B)
 218  ("N" ?\e$,1&}\e(B)
 219  ("O" ?\e$,1&\7f\e(B)
 220
 221  ("P" ?\e$,1' \e(B)
 222  ("Q" ?\e$,1&x\e(B)
 223  ("R" ?\e$,1'!\e(B)
 224  ("S" ?\e$,1'#\e(B)
 225  ("T" ?\e$,1'$\e(B)
 226  ("U" ?\e$,1'%\e(B)
 227  ("hJ" ?\e$,1r#\e(B)
 228  ("W" ?\e$,1')\e(B)
 229  ("X" ?\e$,1&~\e(B)
 230  ("Y" ?\e$,1'(\e(B)
 231  ("Z" ?\e$,1&v\e(B)
 232  ("?" ?\e$,1rO\e(B) ; varia
 233  ("\\" ?\e$,1r \e(B) ("^" ?\e$,1r \e(B) ; perispomeni
 234
 235  ("`" ?\e$,1r^\e(B) ("V" ?\e$,1r^\e(B) ; dasia
 236  ("a" ?\e$,1'1\e(B)
 237  ("b" ?\e$,1'2\e(B)
 238  ("c" ?\e$,1'G\e(B)
 239  ("d" ?\e$,1'4\e(B)
 240  ("e" ?\e$,1'5\e(B)
 241  ("f" ?\e$,1'F\e(B)
 242  ("g" ?\e$,1'3\e(B)
 243  ("h" ?\e$,1'7\e(B)
 244  ("i" ?\e$,1'9\e(B)
 245  ("j" ?\e$,1'B\e(B)
 246  ("k" ?\e$,1':\e(B)
 247  ("l" ?\e$,1';\e(B)
 248  ("m" ?\e$,1'<\e(B)
 249  ("n" ?\e$,1'=\e(B)
 250  ("o" ?\e$,1'?\e(B)
 251
 252  ("p" ?\e$,1'@\e(B)
 253  ("q" ?\e$,1'8\e(B)
 254  ("r" ?\e$,1'A\e(B)
 255  ("s" ?\e$,1'C\e(B)
 256  ("t" ?\e$,1'D\e(B)
 257  ("u" ?\e$,1'E\e(B)
 258  ("aJ" ?\e$,1qs\e(B)
 259  ("w" ?\e$,1'I\e(B)
 260  ("x" ?\e$,1'>\e(B)
 261  ("y" ?\e$,1'H\e(B)
 262  ("z" ?\e$,1'6\e(B)
 263
 264  ("i`" ?\e$,1pQ\e(B) ("iV" ?\e$,1pQ\e(B)
 265  ("i'" ?\e$,1pP\e(B) ("iv" ?\e$,1pP\e(B)
 266  ("i/" ?\e$,1q7\e(B)
 267  ("i`/" ?\e$,1pU\e(B) ("iV/" ?\e$,1pU\e(B) ("i/`" ?\e$,1pU\e(B) ("i/V" ?\e$,1pU\e(B)
 268  ("i'/" ?\e$,1pT\e(B) ("iv/" ?\e$,1pT\e(B) ("i/'" ?\e$,1pT\e(B) ("i/v" ?\e$,1pT\e(B)
 269  ("i?" ?\e$,1q6\e(B)
 270  ("i`?" ?\e$,1pS\e(B) ("iV?" ?\e$,1pS\e(B) ("i?`" ?\e$,1pS\e(B) ("i?V" ?\e$,1pS\e(B)
 271  ("i'?" ?\e$,1pR\e(B) ("iv?" ?\e$,1pR\e(B) ("i?'" ?\e$,1pR\e(B) ("i?v" ?\e$,1pR\e(B)
 272  ("i^"  ?\e$,1r6\e(B) ("i\\" ?\e$,1r6\e(B)
 273  ("i`^"  ?\e$,1pW\e(B) ("i`\\" ?\e$,1pW\e(B) ("iV^"  ?\e$,1pW\e(B) ("iV\\" ?\e$,1pW\e(B)
 274  ("i^`"  ?\e$,1pW\e(B) ("i\\`" ?\e$,1pW\e(B) ("i^V"  ?\e$,1pW\e(B) ("i\\V" ?\e$,1pW\e(B)
 275  ("i'^"  ?\e$,1pV\e(B) ("i'\\" ?\e$,1pV\e(B) ("iv^"  ?\e$,1pV\e(B) ("iv\\" ?\e$,1pV\e(B)
 276  ("i^'"  ?\e$,1pV\e(B) ("i\\'" ?\e$,1pV\e(B) ("i^v"  ?\e$,1pV\e(B) ("i\\v" ?\e$,1pV\e(B)
 277  ("i\"" ?\e$,1'J\e(B)
 278  ("i/\"" ?\e$,1r3\e(B) ("i\"/" ?\e$,1r3\e(B)
 279  ("i?\"" ?\e$,1r2\e(B) ("i\"?" ?\e$,1r2\e(B)
 280
 281  ("^`"  ?\e$,1r?\e(B) ("^V"  ?\e$,1r?\e(B) ("\\`" ?\e$,1r?\e(B) ("\\V" ?\e$,1r?\e(B)
 282  ("`^"  ?\e$,1r?\e(B) ("V^"  ?\e$,1r?\e(B) ("`\\" ?\e$,1r?\e(B) ("V\\" ?\e$,1r?\e(B)
 283  ("^'"  ?\e$,1r/\e(B) ("^v"  ?\e$,1r/\e(B) ("\\'" ?\e$,1r/\e(B) ("\\v" ?\e$,1r/\e(B)
 284  ("'^"  ?\e$,1r/\e(B) ("v^"  ?\e$,1r/\e(B) ("'\\" ?\e$,1r/\e(B) ("v\\" ?\e$,1r/\e(B)
 285  ("/`" ?\e$,1r>\e(B) ("/V" ?\e$,1r>\e(B) ("`/" ?\e$,1r>\e(B) ("V/" ?\e$,1r>\e(B)
 286  ("/'" ?\e$,1r.\e(B) ("/v" ?\e$,1r.\e(B) ("'/" ?\e$,1r.\e(B) ("v/" ?\e$,1r.\e(B)
 287  ("?`" ?\e$,1r=\e(B) ("?V" ?\e$,1r=\e(B) ("`?" ?\e$,1r=\e(B) ("V?" ?\e$,1r=\e(B)
 288  ("?'" ?\e$,1r-\e(B) ("?v" ?\e$,1r-\e(B) ("'?" ?\e$,1r-\e(B) ("v?" ?\e$,1r-\e(B)
 289  ("\"/" ?\e$,1rN\e(B) ("/\"" ?\e$,1rN\e(B)
 290  ("\"?" ?\e$,1rM\e(B) ("?\"" ?\e$,1rM\e(B)
 291
 292  ("e`" ?\e$,1p1\e(B) ("eV" ?\e$,1p1\e(B)
 293  ("e'" ?\e$,1p0\e(B) ("ev" ?\e$,1p0\e(B)
 294  ("e/" ?\e$,1q3\e(B)
 295  ("e/`" ?\e$,1p5\e(B) ("e/V" ?\e$,1p5\e(B) ("e`/" ?\e$,1p5\e(B) ("eV/" ?\e$,1p5\e(B)
 296  ("e/'" ?\e$,1p4\e(B) ("e/v" ?\e$,1p4\e(B) ("e'/" ?\e$,1p4\e(B) ("ev/" ?\e$,1p4\e(B)
 297  ("e?" ?\e$,1q2\e(B)
 298  ("e?`" ?\e$,1p3\e(B) ("e?V" ?\e$,1p3\e(B) ("e`?" ?\e$,1p3\e(B) ("eV?" ?\e$,1p3\e(B)
 299  ("e?'" ?\e$,1p2\e(B) ("e?v" ?\e$,1p2\e(B) ("e'?" ?\e$,1p2\e(B) ("ev?" ?\e$,1p2\e(B)
 300
 301  ("a`" ?\e$,1p!\e(B) ("aV" ?\e$,1p!\e(B)
 302  ("a'" ?\e$,1p \e(B) ("av" ?\e$,1p \e(B)
 303  ("a/" ?\e$,1q1\e(B)
 304  ("a/`" ?\e$,1p%\e(B) ("a/V" ?\e$,1p%\e(B) ("a`/" ?\e$,1p%\e(B) ("aV/" ?\e$,1p%\e(B)
 305  ("a/'" ?\e$,1p$\e(B) ("a/v" ?\e$,1p$\e(B) ("a'/" ?\e$,1p$\e(B) ("av/" ?\e$,1p$\e(B)
 306  ("a?" ?\e$,1q0\e(B)
 307  ("a?`" ?\e$,1p#\e(B) ("a?V" ?\e$,1p#\e(B) ("a`?" ?\e$,1p#\e(B) ("aV?" ?\e$,1p#\e(B)
 308  ("a?'" ?\e$,1p"\e(B) ("a?v" ?\e$,1p"\e(B) ("a'?" ?\e$,1p"\e(B) ("av?" ?\e$,1p"\e(B)
 309  ("a^"  ?\e$,1qv\e(B) ("a\\" ?\e$,1qv\e(B)
 310  ("a^`"  ?\e$,1p'\e(B) ("a^V"  ?\e$,1p'\e(B) ("a\\`" ?\e$,1p'\e(B) ("a\\V" ?\e$,1p'\e(B)
 311  ("a`^"  ?\e$,1p'\e(B) ("aV^"  ?\e$,1p'\e(B) ("a`\\" ?\e$,1p'\e(B) ("aV\\" ?\e$,1p'\e(B)
 312  ("a^'"  ?\e$,1p&\e(B) ("a^v"  ?\e$,1p&\e(B) ("a\\'" ?\e$,1p&\e(B) ("a\\v" ?\e$,1p&\e(B)
 313  ("a'^"  ?\e$,1p&\e(B) ("av^"  ?\e$,1p&\e(B) ("a'\\" ?\e$,1p&\e(B) ("av\\" ?\e$,1p&\e(B)
 314
 315  ("aJ`" ?\e$,1qA\e(B) ("aJV" ?\e$,1qA\e(B)
 316  ("aJ'" ?\e$,1q@\e(B) ("aJv" ?\e$,1q@\e(B)
 317  ("aJ/" ?\e$,1qt\e(B)
 318  ("aJ/`" ?\e$,1qE\e(B) ("aJ/V" ?\e$,1qE\e(B) ("aJ`/" ?\e$,1qE\e(B) ("aJV/" ?\e$,1qE\e(B)
 319  ("aJ/'" ?\e$,1qD\e(B) ("aJ/v" ?\e$,1qD\e(B) ("aJ'/" ?\e$,1qD\e(B) ("aJv/" ?\e$,1qD\e(B)
 320  ("aJ?" ?\e$,1qr\e(B)
 321  ("aJ?`" ?\e$,1qC\e(B) ("aJ?V" ?\e$,1qC\e(B) ("aJ`?" ?\e$,1qC\e(B) ("aJV?" ?\e$,1qC\e(B)
 322  ("aJ?'" ?\e$,1qB\e(B) ("aJ?v" ?\e$,1qB\e(B) ("aJ'?" ?\e$,1qB\e(B) ("aJv?" ?\e$,1qB\e(B)
 323  ("aJ^"  ?\e$,1qw\e(B) ("aJ\\" ?\e$,1qw\e(B)
 324  ("aJ^`"  ?\e$,1qG\e(B) ("aJ^V"  ?\e$,1qG\e(B) ("aJ\\`" ?\e$,1qG\e(B) ("aJ\\V" ?\e$,1qG\e(B)
 325  ("aJ`^"  ?\e$,1qG\e(B) ("aJV^"  ?\e$,1qG\e(B) ("aJ`\\" ?\e$,1qG\e(B) ("aJV\\" ?\e$,1qG\e(B)
 326  ("aJ^'"  ?\e$,1qF\e(B) ("aJ^v"  ?\e$,1qF\e(B) ("aJ\\'" ?\e$,1qF\e(B) ("aJ\\v" ?\e$,1qF\e(B)
 327  ("aJ'^"  ?\e$,1qF\e(B) ("aJv^"  ?\e$,1qF\e(B) ("aJ'\\" ?\e$,1qF\e(B) ("aJv\\" ?\e$,1qF\e(B)
 328
 329  ("r`" ?\e$,1rE\e(B) ("rV" ?\e$,1rE\e(B)
 330  ("r'" ?\e$,1rD\e(B) ("rv" ?\e$,1rD\e(B)
 331
 332  ("h`" ?\e$,1pA\e(B) ("hV" ?\e$,1pA\e(B)
 333  ("h'" ?\e$,1p@\e(B) ("hv" ?\e$,1p@\e(B)
 334  ("h/" ?\e$,1q5\e(B)
 335  ("h/`" ?\e$,1pE\e(B) ("h/V" ?\e$,1pE\e(B) ("h`/" ?\e$,1pE\e(B) ("hV/" ?\e$,1pE\e(B)
 336  ("h/'" ?\e$,1pD\e(B) ("h/v" ?\e$,1pD\e(B) ("h'/" ?\e$,1pD\e(B) ("hv/" ?\e$,1pD\e(B)
 337  ("h?" ?\e$,1q4\e(B)
 338  ("h?`" ?\e$,1pC\e(B) ("h?V" ?\e$,1pC\e(B) ("h`?" ?\e$,1pC\e(B) ("hV?" ?\e$,1pC\e(B)
 339  ("h?'" ?\e$,1pB\e(B) ("h?v" ?\e$,1pB\e(B) ("h'?" ?\e$,1pB\e(B) ("hv?" ?\e$,1pB\e(B)
 340  ("h^"  ?\e$,1r&\e(B) ("h\\" ?\e$,1r&\e(B)
 341  ("h^`"  ?\e$,1pG\e(B) ("h^V"  ?\e$,1pG\e(B) ("h\\`" ?\e$,1pG\e(B) ("h\\V" ?\e$,1pG\e(B)
 342  ("h`^"  ?\e$,1pG\e(B) ("h`\\" ?\e$,1pG\e(B) ("hV^"  ?\e$,1pG\e(B) ("hV\\" ?\e$,1pG\e(B)
 343  ("h^'"  ?\e$,1pF\e(B) ("h^v"  ?\e$,1pF\e(B) ("h\\'" ?\e$,1pF\e(B) ("h\\v" ?\e$,1pF\e(B)
 344  ("h'^"  ?\e$,1pF\e(B) ("h'\\" ?\e$,1pF\e(B) ("hv^"  ?\e$,1pF\e(B) ("hv\\" ?\e$,1pF\e(B)
 345
 346  ("J" ?\e$,1&Z\e(B) ; ypogegrammeni
 347
 348  ("hJ`" ?\e$,1qQ\e(B) ("hJV" ?\e$,1qQ\e(B)
 349  ("hJ'" ?\e$,1qP\e(B) ("hJv" ?\e$,1qP\e(B)
 350  ("hJ/" ?\e$,1r$\e(B)
 351  ("hJ`/" ?\e$,1qU\e(B) ("hJV/" ?\e$,1qU\e(B) ("hJ/`" ?\e$,1qU\e(B) ("hJ/V" ?\e$,1qU\e(B)
 352  ("hJ'/" ?\e$,1qT\e(B) ("hJv/" ?\e$,1qT\e(B) ("hJ/'" ?\e$,1qT\e(B) ("hJ/v" ?\e$,1qT\e(B)
 353  ("hJ?" ?\e$,1r"\e(B)
 354  ("hJ`?" ?\e$,1qS\e(B) ("hJV?" ?\e$,1qS\e(B) ("hJ?`" ?\e$,1qS\e(B) ("hJ?V" ?\e$,1qS\e(B)
 355  ("hJ'?" ?\e$,1qR\e(B) ("hJv?" ?\e$,1qR\e(B) ("hJ?'" ?\e$,1qR\e(B) ("hJ?v" ?\e$,1qR\e(B)
 356  ("hJ^"  ?\e$,1r'\e(B) ("hJ\\" ?\e$,1r'\e(B)
 357  ("hJ`^"  ?\e$,1qW\e(B) ("hJ`\\" ?\e$,1qW\e(B) ("hJV^"  ?\e$,1qW\e(B) ("hJV\\" ?\e$,1qW\e(B)
 358  ("hJ^`"  ?\e$,1qW\e(B) ("hJ\\`" ?\e$,1qW\e(B) ("hJ^V"  ?\e$,1qW\e(B) ("hJ\\V" ?\e$,1qW\e(B)
 359  ("hJ'^"  ?\e$,1qV\e(B) ("hJ'\\" ?\e$,1qV\e(B) ("hJv^"  ?\e$,1qV\e(B) ("hJv\\" ?\e$,1qV\e(B)
 360  ("hJ^'"  ?\e$,1qV\e(B) ("hJ\\'" ?\e$,1qV\e(B) ("hJ^v"  ?\e$,1qV\e(B) ("hJ\\v" ?\e$,1qV\e(B)
 361
 362  ("o`" ?\e$,1pa\e(B) ("oV" ?\e$,1pa\e(B)
 363  ("o'" ?\e$,1p`\e(B) ("ov" ?\e$,1p`\e(B)
 364  ("o/" ?\e$,1q9\e(B)
 365  ("o/`" ?\e$,1pe\e(B) ("o/V" ?\e$,1pe\e(B) ("o`/" ?\e$,1pe\e(B) ("oV/" ?\e$,1pe\e(B)
 366  ("o/'" ?\e$,1pd\e(B) ("o/v" ?\e$,1pd\e(B) ("o'/" ?\e$,1pd\e(B) ("ov/" ?\e$,1pd\e(B)
 367  ("o?" ?\e$,1q8\e(B)
 368  ("o?`" ?\e$,1pc\e(B) ("o?V" ?\e$,1pc\e(B) ("o`?" ?\e$,1pc\e(B) ("oV?" ?\e$,1pc\e(B)
 369  ("o?'" ?\e$,1pb\e(B) ("o?v" ?\e$,1pb\e(B) ("o'?" ?\e$,1pb\e(B) ("ov?" ?\e$,1pb\e(B)
 370
 371  ("u`" ?\e$,1pq\e(B) ("uV" ?\e$,1pq\e(B)
 372  ("u'" ?\e$,1pp\e(B) ("uv" ?\e$,1pp\e(B)
 373  ("u/" ?\e$,1q;\e(B)
 374  ("u/`" ?\e$,1pu\e(B) ("u/V" ?\e$,1pu\e(B) ("u`/" ?\e$,1pu\e(B) ("uV/" ?\e$,1pu\e(B)
 375  ("u/'" ?\e$,1pt\e(B) ("u/v" ?\e$,1pt\e(B) ("u'/" ?\e$,1pt\e(B) ("uv/" ?\e$,1pt\e(B)
 376  ("u?" ?\e$,1q:\e(B)
 377  ("u?`" ?\e$,1ps\e(B) ("u?V" ?\e$,1ps\e(B) ("u`?" ?\e$,1ps\e(B) ("uV?" ?\e$,1ps\e(B)
 378  ("u?'" ?\e$,1pr\e(B) ("u?v" ?\e$,1pr\e(B) ("u'?" ?\e$,1pr\e(B) ("uv?" ?\e$,1pr\e(B)
 379  ("u^"  ?\e$,1rF\e(B) ("u\\" ?\e$,1rF\e(B)
 380  ("u^`"  ?\e$,1pw\e(B) ("u^V"  ?\e$,1pw\e(B) ("u\\`" ?\e$,1pw\e(B) ("u\\V" ?\e$,1pw\e(B)
 381  ("u`^"  ?\e$,1pw\e(B) ("uV^"  ?\e$,1pw\e(B) ("u`\\" ?\e$,1pw\e(B) ("uV\\" ?\e$,1pw\e(B)
 382  ("u^'"  ?\e$,1pv\e(B) ("u^v"  ?\e$,1pv\e(B) ("u\\'" ?\e$,1pv\e(B) ("u\\v" ?\e$,1pv\e(B)
 383  ("u'^"  ?\e$,1pv\e(B) ("uv^"  ?\e$,1pv\e(B) ("u'\\" ?\e$,1pv\e(B) ("uv\\" ?\e$,1pv\e(B)
 384  ("u\"" ?\e$,1'K\e(B)
 385  ("u\"/" ?\e$,1rC\e(B) ("u/\"" ?\e$,1rC\e(B)
 386  ("u\"?" ?\e$,1rB\e(B) ("u?\"" ?\e$,1rB\e(B)
 387
 388  ("w`" ?\e$,1q!\e(B) ("wV" ?\e$,1q!\e(B)
 389  ("w'" ?\e$,1q \e(B) ("wv" ?\e$,1q \e(B)
 390  ("w/" ?\e$,1q=\e(B)
 391  ("w/`" ?\e$,1q%\e(B) ("w/V" ?\e$,1q%\e(B) ("w`/" ?\e$,1q%\e(B) ("wV/" ?\e$,1q%\e(B)
 392  ("w/'" ?\e$,1q$\e(B) ("w/v" ?\e$,1q$\e(B) ("w'/" ?\e$,1q$\e(B) ("wv/" ?\e$,1q$\e(B)
 393  ("w?" ?\e$,1q<\e(B)
 394  ("w?`" ?\e$,1q#\e(B) ("w?V" ?\e$,1q#\e(B) ("w`?" ?\e$,1q#\e(B) ("wV?" ?\e$,1q#\e(B)
 395  ("w?'" ?\e$,1q"\e(B) ("w?v" ?\e$,1q"\e(B) ("w'?" ?\e$,1q"\e(B) ("wv?" ?\e$,1q"\e(B)
 396  ("w^"  ?\e$,1rV\e(B) ("w\\" ?\e$,1rV\e(B)
 397  ("w^`"  ?\e$,1q'\e(B) ("w^V"  ?\e$,1q'\e(B) ("w\\`" ?\e$,1q'\e(B) ("w\\V" ?\e$,1q'\e(B)
 398  ("w`^"  ?\e$,1q'\e(B) ("wV^"  ?\e$,1q'\e(B) ("w`\\" ?\e$,1q'\e(B) ("wV\\" ?\e$,1q'\e(B)
 399  ("w^'"  ?\e$,1q&\e(B) ("w^v"  ?\e$,1q&\e(B) ("w\\'" ?\e$,1q&\e(B) ("w\\v" ?\e$,1q&\e(B)
 400  ("w'^"  ?\e$,1q&\e(B) ("wv^"  ?\e$,1q&\e(B) ("w'\\" ?\e$,1q&\e(B) ("wv\\" ?\e$,1q&\e(B)
 401
 402  ("wJ`" ?\e$,1qa\e(B) ("wJV" ?\e$,1qa\e(B)
 403  ("wJ'" ?\e$,1q`\e(B) ("wJv" ?\e$,1q`\e(B)
 404  ("wJ/" ?\e$,1rT\e(B)
 405  ("wJ/`" ?\e$,1qe\e(B) ("wJ/V" ?\e$,1qe\e(B) ("wJ`/" ?\e$,1qe\e(B) ("wJV/" ?\e$,1qe\e(B)
 406  ("wJ/'" ?\e$,1qd\e(B) ("wJ/v" ?\e$,1qd\e(B) ("wJ'/" ?\e$,1qd\e(B) ("wJv/" ?\e$,1qd\e(B)
 407  ("wJ?" ?\e$,1rR\e(B)
 408  ("wJ?`" ?\e$,1qc\e(B) ("wJ?V" ?\e$,1qc\e(B) ("wJ`?" ?\e$,1qc\e(B) ("wJV?" ?\e$,1qc\e(B)
 409  ("wJ?'" ?\e$,1qb\e(B) ("wJ?v" ?\e$,1qb\e(B) ("wJ'?" ?\e$,1qb\e(B) ("wJv?" ?\e$,1qb\e(B)
 410  ("wJ^"  ?\e$,1rW\e(B) ("wJ\\" ?\e$,1rW\e(B)
 411  ("wJ^`"  ?\e$,1qg\e(B) ("wJ^V"  ?\e$,1qg\e(B) ("wJ\\`" ?\e$,1qg\e(B) ("wJ\\V" ?\e$,1qg\e(B)
 412  ("wJ`^"  ?\e$,1qg\e(B) ("wJV^"  ?\e$,1qg\e(B) ("wJ`\\" ?\e$,1qg\e(B) ("wJV\\" ?\e$,1qg\e(B)
 413  ("wJ^'"  ?\e$,1qf\e(B) ("wJ^v"  ?\e$,1qf\e(B) ("wJ\\'" ?\e$,1qf\e(B) ("wJ\\v" ?\e$,1qf\e(B)
 414  ("wJ'^"  ?\e$,1qf\e(B) ("wJv^"  ?\e$,1qf\e(B) ("wJ'\\" ?\e$,1qf\e(B) ("wJv\\" ?\e$,1qf\e(B)
 415  )
 416
 417 ;;
 418
 419 (quail-define-package "greek-ibycus4" "Greek" "IB" t
 420 "The Ibycus4 input method for Classical Greek using mule-unicode-0100-24ff."
 421 nil t t nil nil nil nil nil nil nil t)
 422
 423 (quail-define-rules
 424
 425  ("{((}" ?\() ("((" ?\() ; #x0028
 426  ("{))}" ?\)) ("))" ?\)) ; #x0029
 427  ("<<" ?\e,A+\e(B) ; #x00ab
 428  (">>" ?\e,A;\e(B) ; #x00bb
 429
 430  ("-" ?\e$,1rp\e(B) ; #x2010
 431  ("---" ?\e$,1rt\e(B) ; #x2014
 432  ("||" ?\e$,1rv\e(B) ; #x2016
 433  ("{`}" ?\e$,1rx\e(B) ("`" ?\e$,1rx\e(B) ; #x2018
 434  ("{'}" ?\e$,1ry\e(B) ("'" ?\e$,1ry\e(B) ; #x2019
 435  ("{``}" ?\e$,1r|\e(B) ("``" ?\e$,1r|\e(B) ; #x201c
 436  ("{''}" ?\e$,1r}\e(B) ("''" ?\e$,1r}\e(B) ; #x201d
 437  ("{\\dag}" ?\e$,1s \e(B) ("\\dag" ?\e$,1s \e(B) ; #x2020
 438  ("{\\ddag}" ?\e$,1s!\e(B) ("\\ddag" ?\e$,1s!\e(B) ; #x2021
 439  ("<" ?\e$,1s9\e(B) ; #x2039
 440  (">" ?\e$,1s:\e(B) ; #x203a
 441  ("$\\leftarrow$" ?\e$,1vp\e(B) ; #x2190
 442  ("$\\rightarrow$" ?\e$,1vr\e(B) ; #x2192
 443
 444  ("?" ?\e$,1&^\e(B) ; #x037e ; erotimatiko
 445  (";" ?\e$,1&g\e(B) ; #x0387 ; ano teleia
 446  ("|" ?\e$,1&Z\e(B) ; #x037a ; ypogegrammeni
 447
 448  ("A" ?\e$,1&q\e(B)
 449  ("B" ?\e$,1&r\e(B)
 450  ("G" ?\e$,1&s\e(B)
 451  ("D" ?\e$,1&t\e(B)
 452  ("E" ?\e$,1&u\e(B)
 453  ("Z" ?\e$,1&v\e(B)
 454  ("H" ?\e$,1&w\e(B)
 455  ("Q" ?\e$,1&x\e(B)
 456  ("I" ?\e$,1&y\e(B)
 457  ("K" ?\e$,1&z\e(B)
 458  ("L" ?\e$,1&{\e(B)
 459  ("M" ?\e$,1&|\e(B)
 460  ("N" ?\e$,1&}\e(B)
 461  ("C" ?\e$,1&~\e(B)
 462  ("O" ?\e$,1&\7f\e(B)
 463  ("P" ?\e$,1' \e(B)
 464  ("R" ?\e$,1'!\e(B)
 465  ("S" ?\e$,1'#\e(B)
 466  ("T" ?\e$,1'$\e(B)
 467  ("U" ?\e$,1'%\e(B)
 468  ("F" ?\e$,1'&\e(B)
 469  ("X" ?\e$,1''\e(B)
 470  ("Y" ?\e$,1'(\e(B)
 471  ("W" ?\e$,1')\e(B)
 472
 473  ("a" ?\e$,1'1\e(B)
 474  ("b" ?\e$,1'2\e(B)
 475  ("g" ?\e$,1'3\e(B)
 476  ("d" ?\e$,1'4\e(B)
 477  ("e" ?\e$,1'5\e(B)
 478  ("z" ?\e$,1'6\e(B)
 479  ("h" ?\e$,1'7\e(B)
 480  ("q" ?\e$,1'8\e(B)
 481  ("i" ?\e$,1'9\e(B)
 482  ("k" ?\e$,1':\e(B)
 483  ("l" ?\e$,1';\e(B)
 484  ("m" ?\e$,1'<\e(B)
 485  ("n" ?\e$,1'=\e(B)
 486  ("c" ?\e$,1'>\e(B)
 487  ("o" ?\e$,1'?\e(B)
 488  ("p" ?\e$,1'@\e(B)
 489  ("r" ?\e$,1'A\e(B)
 490  ("j" ?\e$,1'B\e(B) ("s " ["\e$,1'B\e(B "]) ("s," ["\e$,1'B\e(B,"]) ("s." ["\e$,1'B\e(B."]) ("s?" ["\e$,1'B&^\e(B"]) ("s;" ["\e$,1'B&g\e(B"])
 491  ("s|" ?\e$,1'C\e(B) ("s" ?\e$,1'C\e(B)
 492  ("t" ?\e$,1'D\e(B)
 493  ("u" ?\e$,1'E\e(B)
 494  ("f" ?\e$,1'F\e(B)
 495  ("x" ?\e$,1'G\e(B)
 496  ("y" ?\e$,1'H\e(B)
 497  ("w" ?\e$,1'I\e(B)
 498
 499  ("i+" ?\e$,1'J\e(B)
 500  ("u+" ?\e$,1'K\e(B)
 501  ("V" ?\e$,1'\\e(B) ; DIGAMMA
 502  ("v" ?\e$,1']\e(B) ; digamma
 503  ("K+" ?\e$,1'^\e(B) ; KOPPA
 504  ("k+" ?\e$,1'_\e(B) ; koppa
 505  ("S+" ?\e$,1'`\e(B) ; SAMPI
 506  ("s+" ?\e$,1'a\e(B) ; sampi
 507  ("c+" ?\e$,1'r\e(B) ; lunate sigma
 508
 509  ("a)" ?\e$,1p \e(B)
 510  ("a(" ?\e$,1p!\e(B)
 511  ("a)`" ?\e$,1p"\e(B)
 512  ("a(`" ?\e$,1p#\e(B)
 513  ("a)'" ?\e$,1p$\e(B)
 514  ("a('" ?\e$,1p%\e(B)
 515  ("a)=" ?\e$,1p&\e(B)
 516  ("a(=" ?\e$,1p'\e(B)
 517
 518  (")A" ?\e$,1p(\e(B)
 519  ("(A" ?\e$,1p)\e(B)
 520  (")`A" ?\e$,1p*\e(B)
 521  ("(`A" ?\e$,1p+\e(B)
 522  (")'A" ?\e$,1p,\e(B)
 523  ("('A" ?\e$,1p-\e(B)
 524  (")=A" ?\e$,1p.\e(B)
 525  ("(=A" ?\e$,1p/\e(B)
 526
 527  ("e)" ?\e$,1p0\e(B)
 528  ("e(" ?\e$,1p1\e(B)
 529  ("e)`" ?\e$,1p2\e(B)
 530  ("e(`" ?\e$,1p3\e(B)
 531  ("e)'" ?\e$,1p4\e(B)
 532  ("e('" ?\e$,1p5\e(B)
 533
 534  (")E" ?\e$,1p8\e(B)
 535  ("(E" ?\e$,1p9\e(B)
 536  (")`E" ?\e$,1p:\e(B)
 537  ("(`E" ?\e$,1p;\e(B)
 538  (")'E" ?\e$,1p<\e(B)
 539  ("('E" ?\e$,1p=\e(B)
 540
 541  ("h)" ?\e$,1p@\e(B)
 542  ("h(" ?\e$,1pA\e(B)
 543  ("h)`" ?\e$,1pB\e(B)
 544  ("h(`" ?\e$,1pC\e(B)
 545  ("h)'" ?\e$,1pD\e(B)
 546  ("h('" ?\e$,1pE\e(B)
 547  ("h)=" ?\e$,1pF\e(B)
 548  ("h(=" ?\e$,1pG\e(B)
 549
 550  (")H" ?\e$,1pH\e(B)
 551  ("(H" ?\e$,1pI\e(B)
 552  (")`H" ?\e$,1pJ\e(B)
 553  ("(`H" ?\e$,1pK\e(B)
 554  (")'H" ?\e$,1pL\e(B)
 555  ("('H" ?\e$,1pM\e(B)
 556  (")=H" ?\e$,1pN\e(B)
 557  ("(=H" ?\e$,1pO\e(B)
 558
 559  ("i)" ?\e$,1pP\e(B)
 560  ("i(" ?\e$,1pQ\e(B)
 561  ("i)`" ?\e$,1pR\e(B)
 562  ("i(`" ?\e$,1pS\e(B)
 563  ("i)'" ?\e$,1pT\e(B)
 564  ("i('" ?\e$,1pU\e(B)
 565  ("i)=" ?\e$,1pV\e(B)
 566  ("i(=" ?\e$,1pW\e(B)
 567
 568  (")I" ?\e$,1pX\e(B)
 569  ("(I" ?\e$,1pY\e(B)
 570  (")`I" ?\e$,1pZ\e(B)
 571  ("(`I" ?\e$,1p[\e(B)
 572  (")'I" ?\e$,1p\\e(B)
 573  ("('I" ?\e$,1p]\e(B)
 574  (")=I" ?\e$,1p^\e(B)
 575  ("(=I" ?\e$,1p_\e(B)
 576
 577  ("o)" ?\e$,1p`\e(B)
 578  ("o(" ?\e$,1pa\e(B)
 579  ("o)`" ?\e$,1pb\e(B)
 580  ("o(`" ?\e$,1pc\e(B)
 581  ("o)'" ?\e$,1pd\e(B)
 582  ("o('" ?\e$,1pe\e(B)
 583
 584  (")O" ?\e$,1ph\e(B)
 585  ("(O" ?\e$,1pi\e(B)
 586  (")`O" ?\e$,1pj\e(B)
 587  ("(`O" ?\e$,1pk\e(B)
 588  (")'O" ?\e$,1pl\e(B)
 589  ("('O" ?\e$,1pm\e(B)
 590
 591  ("u)" ?\e$,1pp\e(B)
 592  ("u(" ?\e$,1pq\e(B)
 593  ("u)`" ?\e$,1pr\e(B)
 594  ("u(`" ?\e$,1ps\e(B)
 595  ("u)'" ?\e$,1pt\e(B)
 596  ("u('" ?\e$,1pu\e(B)
 597  ("u)=" ?\e$,1pv\e(B)
 598  ("u(=" ?\e$,1pw\e(B)
 599
 600  ("(U" ?\e$,1py\e(B)
 601  ("(`U" ?\e$,1p{\e(B)
 602  ("('U" ?\e$,1p}\e(B)
 603  ("(=U" ?\e$,1p\7f\e(B)
 604
 605  ("w)" ?\e$,1q \e(B)
 606  ("w(" ?\e$,1q!\e(B)
 607  ("w)`" ?\e$,1q"\e(B)
 608  ("w(`" ?\e$,1q#\e(B)
 609  ("w)'" ?\e$,1q$\e(B)
 610  ("w('" ?\e$,1q%\e(B)
 611  ("w)=" ?\e$,1q&\e(B)
 612  ("w(=" ?\e$,1q'\e(B)
 613
 614  (")W" ?\e$,1q(\e(B)
 615  ("(W" ?\e$,1q)\e(B)
 616  (")`W" ?\e$,1q*\e(B)
 617  ("(`W" ?\e$,1q+\e(B)
 618  (")'W" ?\e$,1q,\e(B)
 619  ("('W" ?\e$,1q-\e(B)
 620  (")=W" ?\e$,1q.\e(B)
 621  ("(=W" ?\e$,1q/\e(B)
 622
 623  ("a`" ?\e$,1q0\e(B)
 624  ("a'" ?\e$,1q1\e(B)
 625  ("e`" ?\e$,1q2\e(B)
 626  ("e'" ?\e$,1q3\e(B)
 627  ("h`" ?\e$,1q4\e(B)
 628  ("h'" ?\e$,1q5\e(B)
 629  ("i`" ?\e$,1q6\e(B)
 630  ("i'" ?\e$,1q7\e(B)
 631  ("o`" ?\e$,1q8\e(B)
 632  ("o'" ?\e$,1q9\e(B)
 633  ("u`" ?\e$,1q:\e(B)
 634  ("u'" ?\e$,1q;\e(B)
 635  ("w`" ?\e$,1q<\e(B)
 636  ("w'" ?\e$,1q=\e(B)
 637
 638  ("a)|" ?\e$,1q@\e(B)
 639  ("a(|" ?\e$,1qA\e(B)
 640  ("a)`|" ?\e$,1qB\e(B)
 641  ("a(`|" ?\e$,1qC\e(B)
 642  ("a)'|" ?\e$,1qD\e(B)
 643  ("a('|" ?\e$,1qE\e(B)
 644  ("a)=|" ?\e$,1qF\e(B)
 645  ("a(=|" ?\e$,1qG\e(B)
 646
 647  (")Ai" ?\e$,1qH\e(B)
 648  ("(Ai" ?\e$,1qI\e(B)
 649  (")`Ai" ?\e$,1qJ\e(B)
 650  ("(`Ai" ?\e$,1qK\e(B)
 651  (")'Ai" ?\e$,1qL\e(B)
 652  ("('Ai" ?\e$,1qM\e(B)
 653  (")=Ai" ?\e$,1qN\e(B)
 654  ("(=Ai" ?\e$,1qO\e(B)
 655
 656  ("h)|" ?\e$,1qP\e(B)
 657  ("h(|" ?\e$,1qQ\e(B)
 658  ("h)`|" ?\e$,1qR\e(B)
 659  ("h(`|" ?\e$,1qS\e(B)
 660  ("h)'|" ?\e$,1qT\e(B)
 661  ("h('|" ?\e$,1qU\e(B)
 662  ("h)=|" ?\e$,1qV\e(B)
 663  ("h(=|" ?\e$,1qW\e(B)
 664
 665  (")Hi" ?\e$,1qX\e(B)
 666  ("(Hi" ?\e$,1qY\e(B)
 667  (")`Hi" ?\e$,1qZ\e(B)
 668  ("(`Hi" ?\e$,1q[\e(B)
 669  (")'Hi" ?\e$,1q\\e(B)
 670  ("('Hi" ?\e$,1q]\e(B)
 671  (")=Hi" ?\e$,1q^\e(B)
 672  ("(=Hi" ?\e$,1q_\e(B)
 673
 674  ("w)|" ?\e$,1q`\e(B)
 675  ("w(|" ?\e$,1qa\e(B)
 676  ("w)`|" ?\e$,1qb\e(B)
 677  ("w(`|" ?\e$,1qc\e(B)
 678  ("w)'|" ?\e$,1qd\e(B)
 679  ("w('|" ?\e$,1qe\e(B)
 680  ("w)=|" ?\e$,1qf\e(B)
 681  ("w(=|" ?\e$,1qg\e(B)
 682
 683  (")Wi" ?\e$,1qh\e(B)
 684  ("(Wi" ?\e$,1qi\e(B)
 685  (")`Wi" ?\e$,1qj\e(B)
 686  ("(`Wi" ?\e$,1qk\e(B)
 687  (")'Wi" ?\e$,1ql\e(B)
 688  ("('Wi" ?\e$,1qm\e(B)
 689  (")=Wi" ?\e$,1qn\e(B)
 690  ("(=Wi" ?\e$,1qo\e(B)
 691
 692  ("a`|" ?\e$,1qr\e(B)
 693  ("a|" ?\e$,1qs\e(B)
 694  ("a'|" ?\e$,1qt\e(B)
 695  ("a=" ?\e$,1qv\e(B)
 696  ("a=|" ?\e$,1qw\e(B)
 697
 698  ("`A" ?\e$,1qz\e(B)
 699  ("'A" ?\e$,1q{\e(B)
 700  ("Ai" ?\e$,1q|\e(B)
 701
 702  (")" ?\e$,1q\7f\e(B) ; #x1fbf ; psili
 703  ("=" ?\e$,1r \e(B) ; #x1fc0 ; perispomeni
 704  ("+=" ?\e$,1r!\e(B) ; #x1fc1
 705
 706  ("h`|" ?\e$,1r"\e(B)
 707  ("h|" ?\e$,1r#\e(B)
 708  ("h'|" ?\e$,1r$\e(B)
 709  ("h=" ?\e$,1r&\e(B)
 710  ("h=|" ?\e$,1r'\e(B)
 711
 712  ("`E" ?\e$,1r(\e(B)
 713  ("'E" ?\e$,1r)\e(B)
 714
 715  ("`H" ?\e$,1r*\e(B)
 716  ("'H" ?\e$,1r+\e(B)
 717  ("Hi" ?\e$,1r,\e(B)
 718
 719  (")`" ?\e$,1r-\e(B) ; #x1fcd
 720  (")'" ?\e$,1r.\e(B) ; #x1fce
 721  (")=" ?\e$,1r/\e(B) ; #x1fcf
 722
 723  ("i+`" ?\e$,1r2\e(B)
 724  ("i+'" ?\e$,1r3\e(B)
 725  ("i=" ?\e$,1r6\e(B)
 726  ("i+=" ?\e$,1r7\e(B)
 727
 728  ("`I" ?\e$,1r:\e(B)
 729  ("'I" ?\e$,1r;\e(B)
 730
 731  ("(`" ?\e$,1r=\e(B) ; #x1fdd
 732  ("('" ?\e$,1r>\e(B) ; #x1fde
 733  ("(=" ?\e$,1r?\e(B) ; #x1fdf
 734
 735  ("u+`" ?\e$,1rB\e(B)
 736  ("u+'" ?\e$,1rC\e(B)
 737
 738  ("r)" ?\e$,1rD\e(B)
 739  ("r(" ?\e$,1rE\e(B)
 740
 741  ("u=" ?\e$,1rF\e(B)
 742  ("u+=" ?\e$,1rG\e(B)
 743
 744  ("`U" ?\e$,1rJ\e(B)
 745  ("'U" ?\e$,1rK\e(B)
 746
 747  ("`R" ?\e$,1rL\e(B)
 748
 749  ("+`" ?\e$,1rM\e(B) ; #x1fed
 750  ("+'" ?\e$,1rN\e(B) ; #x1fee
 751  ("`" ?\e$,1rO\e(B) ; #x1fef ; varia
 752
 753  ("w`|" ?\e$,1rR\e(B)
 754  ("w|" ?\e$,1rS\e(B)
 755  ("w'|" ?\e$,1rT\e(B)
 756  ("w=" ?\e$,1rV\e(B)
 757  ("w=|" ?\e$,1rW\e(B)
 758
 759  ("`O" ?\e$,1rX\e(B)
 760  ("'O" ?\e$,1rY\e(B)
 761
 762  ("`W" ?\e$,1rZ\e(B)
 763  ("'W" ?\e$,1r[\e(B)
 764  ("Wi" ?\e$,1r\\e(B)
 765
 766  ("'" ?\e$,1r]\e(B) ; #x1ffd ; oxia
 767  ("(" ?\e$,1r^\e(B) ;  #x1ffe ; dasia
 768 )
 769
 770 ;;
 771
 772 (quail-define-package
 773  "greek" "Greek" "\e,FY\e(B" nil
 774  "\e,FEkkgmij\\e(B: Greek keyboard layout (ISO 8859-7)
 775 --------------
 776
 777 In the right of \e,Fk\e(B key is a combination key, where
 778  \e,F4\e(B acute
 779  \e,F(\e(B diaresis
 780
 781 e.g.
 782  \e,Fa\e(B + \e,F4\e(B -> \e,F\\e(B
 783  \e,Fi\e(B + \e,F(\e(B -> \e,Fz\e(B
 784  \e,Fi\e(B + \e,F(\e(B + \e,F4\e(B -> \e,F@\e(B"
 785  nil t t t t nil nil nil nil nil t)
 786
 787 ;; 1!  2@  3#  4$  5%  6^  7&  8*  9(  0)  -_  =+  `~
 788 ;;  \e,F7/\e(B  \e,FrS\e(B  \e,FeE\e(B  \e,FqQ\e(B  \e,FtT\e(B  \e,FuU\e(B  \e,FhH\e(B  \e,FiI\e(B  \e,FoO\e(B  \e,FpP\e(B  [{  ]}
 789 ;;   \e,FaA\e(B  \e,FsS\e(B  \e,FdD\e(B  \e,FvV\e(B  \e,FcC\e(B  \e,FgG\e(B  \e,FnN\e(B  \e,FjJ\e(B  \e,FkK\e(B  \e,F4(\e(B  '"  \|
 790 ;;    \e,FfF\e(B  \e,FwW\e(B  \e,FxX\e(B  \e,FyY\e(B  \e,FbB\e(B  \e,FmM\e(B  \e,FlL\e(B  ,;  .:  /?
 791
 792 (quail-define-rules
 793  ("1" ?1)
 794  ("2" ?2)
 795  ("3" ?3)
 796  ("4" ?4)
 797  ("5" ?5)
 798  ("6" ?6)
 799  ("7" ?7)
 800  ("8" ?8)
 801  ("9" ?9)
 802  ("0" ?0)
 803  ("-" ?-)
 804  ("=" ?=)
 805  ("`" ?`)
 806  ("q" ?\e,F7\e(B)
 807  ("w" ?\e,Fr\e(B)
 808  ("e" ?\e,Fe\e(B)
 809  ("r" ?\e,Fq\e(B)
 810  ("t" ?\e,Ft\e(B)
 811  ("y" ?\e,Fu\e(B)
 812  ("u" ?\e,Fh\e(B)
 813  ("i" ?\e,Fi\e(B)
 814  ("o" ?\e,Fo\e(B)
 815  ("p" ?\e,Fp\e(B)
 816  ("[" ?\[)
 817  ("]" ?\])
 818  ("a" ?\e,Fa\e(B)
 819  ("s" ?\e,Fs\e(B)
 820  ("d" ?\e,Fd\e(B)
 821  ("f" ?\e,Fv\e(B)
 822  ("g" ?\e,Fc\e(B)
 823  ("h" ?\e,Fg\e(B)
 824  ("j" ?\e,Fn\e(B)
 825  ("k" ?\e,Fj\e(B)
 826  ("l" ?\e,Fk\e(B)
 827  (";" ?\e,F4\e(B)
 828  ("'" ?')
 829  ("\\" ?\\)
 830  ("z" ?\e,Ff\e(B)
 831  ("x" ?\e,Fw\e(B)
 832  ("c" ?\e,Fx\e(B)
 833  ("v" ?\e,Fy\e(B)
 834  ("b" ?\e,Fb\e(B)
 835  ("n" ?\e,Fm\e(B)
 836  ("m" ?\e,Fl\e(B)
 837  ("," ?,)
 838  ("." ?.)
 839  ("/" ?/)
 840
 841  ("!" ?!)
 842  ("@" ?@)
 843  ("#" ?#)
 844  ("$" ?$)
 845  ("%" ?%)
 846  ("^" ?^)
 847  ("&" ?&)
 848  ("*" ?*)
 849  ("(" ?\()
 850  (")" ?\))
 851  ("_" ?_)
 852  ("+" ?+)
 853  ("~" ?~)
 854  ("Q" ?\e,F/\e(B)
 855  ("W" ?\e,FS\e(B)
 856  ("E" ?\e,FE\e(B)
 857  ("R" ?\e,FQ\e(B)
 858  ("T" ?\e,FT\e(B)
 859  ("Y" ?\e,FU\e(B)
 860  ("U" ?\e,FH\e(B)
 861  ("I" ?\e,FI\e(B)
 862  ("O" ?\e,FO\e(B)
 863  ("P" ?\e,FP\e(B)
 864  ("{" ?{)
 865  ("}" ?})
 866  ("A" ?\e,FA\e(B)
 867  ("S" ?\e,FS\e(B)
 868  ("D" ?\e,FD\e(B)
 869  ("F" ?\e,FV\e(B)
 870  ("G" ?\e,FC\e(B)
 871  ("H" ?\e,FG\e(B)
 872  ("J" ?\e,FN\e(B)
 873  ("K" ?\e,FJ\e(B)
 874  ("L" ?\e,FK\e(B)
 875  (":" ?\e,F(\e(B)
 876  ("\"" ?\")
 877  ("|" ?|)
 878  ("Z" ?\e,FF\e(B)
 879  ("X" ?\e,FW\e(B)
 880  ("C" ?\e,FX\e(B)
 881  ("V" ?\e,FY\e(B)
 882  ("B" ?\e,FB\e(B)
 883  ("N" ?\e,FM\e(B)
 884  ("M" ?\e,FL\e(B)
 885  ("<" ?\;)
 886  (">" ?:)
 887  ("?" ??)
 888
 889  ("a;" ?\e,F\\e(B)
 890  ("e;" ?\e,F]\e(B)
 891  ("h;" ?\e,F^\e(B)
 892  ("i;" ?\e,F_\e(B)
 893  ("o;" ?\e,F|\e(B)
 894  ("y;" ?\e,F}\e(B)
 895  ("v;" ?\e,F~\e(B)
 896  ("A;" ?\e,F6\e(B)
 897  ("E;" ?\e,F8\e(B)
 898  ("H;" ?\e,F9\e(B)
 899  ("I;" ?\e,F:\e(B)
 900  ("O;" ?\e,F<\e(B)
 901  ("Y;" ?\e,F>\e(B)
 902  ("V;" ?\e,F?\e(B)
 903  ("i:" ?\e,Fz\e(B)
 904  ("y:" ?\e,F{\e(B)
 905  ("I:" ?\e,FZ\e(B)
 906  ("Y:" ?\e,F[\e(B)
 907  ("i:;" ?\e,F@\e(B)
 908  ("y:;" ?\e,F`\e(B))
 909
 910 ;;; greek.el ends here