summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--greek-polytonic.el36
1 files changed, 36 insertions, 0 deletions
diff --git a/greek-polytonic.el b/greek-polytonic.el
index 7844212..82c729e 100644
--- a/greek-polytonic.el
+++ b/greek-polytonic.el
@@ -197,6 +197,39 @@
(":wH" ?Ἦ) ;; U+1F2E
("w:H" ?Ἦ) ;; U+1F2E
("wQH" ?Ἧ) ;; U+1F2F
+ (":Wh" ?ᾘ) ;; U+1F98
+ ("W:h" ?ᾘ) ;; U+1F98
+ ("QWh" ?ᾙ) ;; U+1F99
+ ("WQh" ?ᾙ) ;; U+1F99
+ ("QWh" ?ᾙ) ;; U+1F99
+ (":qWh" ?ᾚ) ;; U+1F9A
+ ("q:Wh" ?ᾚ) ;; U+1F9A
+ ("qW:h" ?ᾚ) ;; U+1F9A
+ ("Wq:h" ?ᾚ) ;; U+1F9A
+ ("W:qh" ?ᾚ) ;; U+1F9A
+ ("qQWh" ?ᾛ) ;; U+1F9B
+ ("QqWh" ?ᾛ) ;; U+1F9B
+ ("QWqh" ?ᾛ) ;; U+1F9B
+ ("WQqh" ?ᾛ) ;; U+1F9B
+ ("WqQh" ?ᾛ) ;; U+1F9B
+ (":;Wh" ?ᾜ) ;; U+1F9C
+ (";:Wh" ?ᾜ) ;; U+1F9C
+ (";W:h" ?ᾜ) ;; U+1F9C
+ ("W;:h" ?ᾜ) ;; U+1F9C
+ ("W:;h" ?ᾜ) ;; U+1F9C
+ ("Q;Wh" ?ᾝ) ;; U+1F9D
+ (";QWh" ?ᾝ) ;; U+1F9D
+ (";WQh" ?ᾝ) ;; U+1F9D
+ ("WQ;h" ?ᾝ) ;; U+1F9D
+ (":wWh" ?ᾞ) ;; U+1F9E
+ ("w:Wh" ?ᾞ) ;; U+1F9E
+ ("wW:h" ?ᾞ) ;; U+1F9E
+ ("Ww:h" ?ᾞ) ;; U+1F9E
+ ("W:wh" ?ᾞ) ;; U+1F9E
+ ("QwWh" ?ᾟ) ;; U+1F9F
+ ("wQWh" ?ᾟ) ;; U+1F9F
+ ("WQwh" ?ᾟ) ;; U+1F9F
+ ("QWwh" ?ᾟ) ;; U+1F9F
("h" ?η) ;; U+03B7
("qh" ?ὴ) ;; U+1F74
(";h" ?ή) ;; U+1F75
@@ -287,6 +320,9 @@
;; Kappa
("K" ?Κ)
("k" ?κ)
+ ;; Koppa (archaic)
+ ("Wk" ?Ϟ) ;; U+03DE
+ ("WK" ?ϟ) ;; U+03DF
;; Lambda
("L" ?Λ)
("l" ?λ)