cec4d76254
Update transrt.cpp to exclude 0970 from roundtrip tests; it was now included because Unicode 6.1 moved it from Common to Devanagari, but it has no mapping from InterIndic to anything else. X-SVN-Rev: 31074
162 lines
3.6 KiB
Plaintext
162 lines
3.6 KiB
Plaintext
# ***************************************************************************
|
||
# *
|
||
# * Copyright (C) 2004-2011, International Business Machines
|
||
# * Corporation; Unicode, Inc.; and others. All Rights Reserved.
|
||
# *
|
||
# ***************************************************************************
|
||
# File: Greek_Latin_UNGEGN.txt
|
||
# Generated from CLDR
|
||
#
|
||
:: [[[:Greek:][:Mn:][:Me:]] [\:-;?·;·]] ;
|
||
::NFD (NFC) ;
|
||
$lower = [[:latin:][:greek:] & [:Ll:]] ;
|
||
$upper = [[:latin:][:greek:] & [:Lu:]] ;
|
||
$accent = [[:Mn:][:Me:]] ;
|
||
$macron = \u0304 ;
|
||
$ddot = \u0308 ;
|
||
$lcgvowel = [αεηιουω] ;
|
||
$ucgvowel = [ΑΕΗΙΟΥΩ] ;
|
||
$gvowel = [$lcgvowel $ucgvowel] ;
|
||
$lcgvowelC = [$lcgvowel $accent] ;
|
||
$evowel = [aeiouyAEIOUY];
|
||
$vowel = [ $evowel $gvowel] ;
|
||
$beforeLower = $accent * $lower ;
|
||
$gammaLike = [ΓΚΞΧγκξχϰ] ;
|
||
$egammaLike = [GKXCgkxc] ;
|
||
$smooth = \u0313 ;
|
||
$rough = \u0314 ;
|
||
$iotasub = \u0345 ;
|
||
$softener = [βΒγΓδΔζΖλΛμΜνΝρΡ$gvowel] ;
|
||
$under = \u0331;
|
||
$caron = \u030C;
|
||
$afterLetter = [:L:] [\'$accent]* ;
|
||
$beforeLetter = [\'$accent]* [:L:] ;
|
||
\: ↔ \: $under ;
|
||
\? ↔ \? $under ;
|
||
\; ↔ \? ;
|
||
· ↔ \: ;
|
||
\u0342 → \u0301 ;
|
||
\u0302 → \u0301 ;
|
||
\u0300 → \u0301 ;
|
||
$smooth → ;
|
||
$rough → ;
|
||
$iotasub → ;
|
||
ͺ → ;
|
||
η ↔ i $under ;
|
||
Η ↔ I $under ;
|
||
Ψ } $beforeLower ↔ Ps ;
|
||
Ψ ↔ PS ;
|
||
ψ ↔ ps ;
|
||
ω ↔ o $under ;
|
||
Ω ↔ O $under;
|
||
[^[:L:]$accent] { μπ → b ;
|
||
μπ } [^[:L:]$accent] → b ;
|
||
[^[:L:]$accent] { [Μμ][Ππ] → B ;
|
||
[Μμ][Ππ] } [^[:L:]$accent] → B ;
|
||
μπ ← b ;
|
||
Μπ ← B } $beforeLower ;
|
||
ΜΠ ← B ;
|
||
ου ↔ ou ;
|
||
ΟΥ ↔ OU ;
|
||
Ου ↔ Ou ;
|
||
οΥ ↔ oU ;
|
||
$fmaker = [aeiAEI] $under ? ;
|
||
$shiftForwardVowels = [[:Mn:]-[\u0308]]; # note: a diaeresis keeps the items separate
|
||
$fmaker { υ ( $shiftForwardVowels )* } $softener → $1 v $under ;
|
||
υ $1 ← ( $shiftForwardVowels )* v $under ;
|
||
$fmaker { υ ( $shiftForwardVowels )* } → $1 f $under;
|
||
υ $1 ← ( $shiftForwardVowels )* f $under ;
|
||
$fmaker { Υ } $softener ↔ V $under ;
|
||
$fmaker { Υ ↔ U $under ;
|
||
υ ↔ y ;
|
||
Υ ↔ Y ;
|
||
α ↔ a ;
|
||
Α ↔ A ;
|
||
β ↔ v ;
|
||
Β ↔ V ;
|
||
γ } $gammaLike ↔ n } $egammaLike ;
|
||
γ ↔ g ;
|
||
Γ } $gammaLike ↔ N } $egammaLike ;
|
||
Γ ↔ G ;
|
||
δ ↔ d ;
|
||
Δ ↔ D ;
|
||
ε ↔ e ;
|
||
Ε ↔ E ;
|
||
ζ ↔ z ;
|
||
Ζ ↔ Z ;
|
||
θ ↔ th ;
|
||
Θ } $beforeLower ↔ Th ;
|
||
Θ ↔ TH ;
|
||
ι ↔ i ;
|
||
Ι ↔ I ;
|
||
κ ↔ k ;
|
||
Κ ↔ K ;
|
||
λ ↔ l ;
|
||
Λ ↔ L ;
|
||
μ ↔ m ;
|
||
Μ ↔ M ;
|
||
ν } $gammaLike → n\' ;
|
||
ν ↔ n ;
|
||
Ν } $gammaLike ↔ N\' ;
|
||
Ν ↔ N ;
|
||
ξ ↔ x ;
|
||
Ξ ↔ X ;
|
||
ο ↔ o ;
|
||
Ο ↔ O ;
|
||
π ↔ p ;
|
||
Π ↔ P ;
|
||
ρ ↔ r ;
|
||
Ρ ↔ R ;
|
||
[Pp] { } [ςσΣϷϸϺϻ] → \' ;
|
||
Ϸ ↔ S\u030C ; # Ϸ GREEK CAPITAL LETTER SHO Uppercase_Letter Grek - L
|
||
ϸ ↔ s\u030C ; #ϸ GREEK SMALL LETTER SHO Lowercase_Letter Grek - L
|
||
Ϻ ↔ S\u0302 ; # Ϻ GREEK CAPITAL LETTER SAN Uppercase_Letter Grek - L
|
||
ϻ ↔ s\u0302 ; # ϻ GREEK SMALL LETTER SAN Lowercase_Letter Grek - L
|
||
ς } $beforeLetter ↔ s $under } $beforeLetter;
|
||
σ } $beforeLetter ↔ s } $beforeLetter;
|
||
$afterLetter { σ ↔ $afterLetter { s $under;
|
||
$afterLetter { ς ↔ $afterLetter { s ;
|
||
ς ↔ s $under;
|
||
σ ↔ s ;
|
||
Σ ↔ S ;
|
||
τ ↔ t ;
|
||
Τ ↔ T ;
|
||
φ ↔ f ;
|
||
Φ ↔ F ;
|
||
χ ↔ ch ;
|
||
Χ } $beforeLower ↔ Ch ;
|
||
Χ ↔ CH ;
|
||
| ch ← h ;
|
||
| k ← c ;
|
||
| i ← j ;
|
||
| k ← q ;
|
||
| b ← u } $vowel ;
|
||
| b ← w } $vowel ;
|
||
| y ← u ;
|
||
| y ← w ;
|
||
| Ch ← H ;
|
||
| K ← C ;
|
||
| I ← J ;
|
||
| K ← Q ;
|
||
| B ← W } $vowel ;
|
||
| B ← U } $vowel ;
|
||
| Y ← W ;
|
||
| Y ← U ;
|
||
ϐ → | β ;
|
||
ϑ → | θ ;
|
||
ϒ → | Υ ;
|
||
ϕ → | φ ;
|
||
ϖ → | π ;
|
||
ϰ → | κ ;
|
||
ϱ → | ρ ;
|
||
ϲ → | σ ;
|
||
Ϲ → | Σ; #U+03F9 GREEK CAPITAL LUNATE SIGMA SYMBOL
|
||
ϳ → j ;
|
||
ϴ → | Θ ;
|
||
ϵ → | ε ;
|
||
µ → | μ ;
|
||
← [Ππ] { \' } [Ss] ;
|
||
← [Νν] { \' } $egammaLike ;
|
||
::NFC (NFD) ;
|
||
:: ([[[:Latin:][:Mn:][:Me:]] ['\:?]]) ;
|