GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-09 04:59:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

ancient greek ut additions

Browse Source
This commit is contained in:
aarne
2009-08-21 16:13:07 +00:00
parent add4702320
commit c0e55c4bc9
1 changed files with 8 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
src/GF/Text/Transliterations.hs
View File

@@ -179,13 +179,13 @@ transAncientGreek = mkTransliteration "ancient Greek" allTrans allCodes where
"y) y( y)` y(` y)' y(' y)~ y(~ - Y( - Y(` - Y(' - Y(~ " ++
"w) w( w)` w(` w)' w(' w)~ w(~ W) W( W)` W(` W)' W(' W)~ W(~ " ++
"a` a' e` e' h` h' i` i' o` o' y` y' w` w' - - " ++
"- - - - - - - - - - - - - - - - " ++ -- 1f80-
"- - - - - - - - - - - - - - - - " ++ -- 1f90- -- TODO some combinations
"- - - - - - - - - - - - - - - - " ++ -- 1fa0-
"- - - - - - a~ a|~ - - - - - - - - " ++ -- 1fb0-
"- - - - - - h~ h|~ - - - - - - - - " ++ -- 1fc0-
"- - - - - - i~ i=~ - - - - - - - - " ++ -- 1fd0-
"- - - - - - y~ y|~ - - - - - - - - " ++ -- 1fe0-
"- - - - - - w~ w|~ - - - - - - - - " -- 1ff0-
"a|( a|) a|)` a|(` a|)' a|(' a|)~ a|(~ - - - - - - - - " ++ -- 1f80-
"h|( h|) h|)` h|(` h|)' h|(' h|)~ h|(~ - - - - - - - - " ++ -- 1f90-
"w|( w|) w|)` w|(` w|)' w|(' w|)~ w|(~ - - - - - - - - " ++ -- 1fa0-
"a. a_ a|` a| a|' - a~ a|~ - - - - - - - - " ++ -- 1fb0-
"- - h|` h| h|' - h~ h|~ - - - - - - - - " ++ -- 1fc0-
"i. i_ i=` i=' - - i~ i=~ - - - - - - - - " ++ -- 1fd0-
"y. y_ y=` y=' r) r( y~ y|~ - - - - - - - - " ++ -- 1fe0-
"- - w|` w| w|' - w~ w|~ - - - - - - - - " -- 1ff0-
allCodes = [0x0380 .. 0x03cf] ++ [0x1f00 .. 0x1fff]