# ***************************************************************************
# *
-# * Copyright (C) 2004-2012, International Business Machines
+# * Copyright (C) 2004-2013, International Business Machines
# * Corporation; Unicode, Inc.; and others. All Rights Reserved.
# *
# ***************************************************************************
Α ($macron?) $rough } $beforeLower → H | α $1;
Ε $rough } $beforeLower → H | ε;
Η $rough } $beforeLower → H | η ;
-Ι ($ddot?) $rough } $beforeLower → H | ι $1;
+Ι ($ddot?) $rough } $beforeLower → H | ι $1;
Ο $rough } $beforeLower → H | ο ;
Υ $rough } $beforeLower → H | υ ;
Ω ($ddot?) $rough } $beforeLower → H | ω $1;
Ι ($glower $ddot?) $rough → H | ι $1 ;
Ο ($glower) $rough → H | ο $1 ;
Υ ($glower) $rough → H | υ $1 ;
-Ω ($glower $ddot?) $rough → H | ω $1 ;
+Ω ($glower $ddot?) $rough → H | ω $1 ;
($lcgvowel + $ddotmac? ) $rough → h | $1 ;
($gvowel + $ddotmac? ) $rough → H | $1 ;
| $1 $rough ← h ($evowel $macron $ddot? $evowel2_i $macron?) ;
| $1 $rough ← H ([AEIOUY] $macron $ddot? $evowel2_i $macron?) ;
| $1 $rough ← H ([AEIOUY] $ddot? $evowel2 $macron?) ;
| $1 $rough ← H ([AEIOUY] $macron? $ddot?) ;
-| A $1 $rough ← H a ($macron $ddot? $evowel2_i $macron?) ;
-| E $1 $rough ← H e ($macron $ddot? $evowel2_i $macron?) ;
-| I $1 $rough ← H i ($macron $ddot? $evowel2_i $macron?) ;
-| O $1 $rough ← H o ($macron $ddot? $evowel2_i $macron?) ;
+| A $1 $rough ← H a ($macron $ddot? $evowel2_i $macron?) ;
+| E $1 $rough ← H e ($macron $ddot? $evowel2_i $macron?) ;
+| I $1 $rough ← H i ($macron $ddot? $evowel2_i $macron?) ;
+| O $1 $rough ← H o ($macron $ddot? $evowel2_i $macron?) ;
| U $1 $rough ← H u ($macron $ddot? $evowel2_i $macron?) ;
| Y $1 $rough ← H y ($macron $ddot? $evowel2_i $macron?) ;
| A $1 $rough ← H a ($ddot? $evowel2 $macron?) ;
Φ ↔ PH ;
ψ ↔ ps ;
ω ↔ o $macron ;
-Ω ↔ O $macron;
+Ω ↔ O $macron;
α ↔ a ;
Α ↔ A ;
β ↔ b ;
Χ } $beforeLower ↔ Ch ;
Χ ↔ CH ;
$ignore = [[:Mark:]''] * ;
-| k ← c ;
+| k ← c ;
| ph ← f ;
-| i ← j ;
+| i ← j ;
| k ← q ;
| b ← v } $vowel ;
| b ← w } $vowel;
| Ph ← F ;
| I ← J ;
| K ← Q ;
-| B ← V } $vowel ;
-| B ← W } $vowel ;
+| B ← V } $vowel ;
+| B ← W } $vowel ;
| U ← V ;
| U ← W ;
$rough } $ignore [:UppercaseLetter:] → H ;