]>
Commit | Line | Data |
---|---|---|
729e4ab9 A |
1 | # *************************************************************************** |
2 | # * | |
2ca993e8 | 3 | # * Copyright (C) 2004-2016, International Business Machines |
729e4ab9 A |
4 | # * Corporation; Unicode, Inc.; and others. All Rights Reserved. |
5 | # * | |
6 | # *************************************************************************** | |
7 | # File: el_Upper.txt | |
51004dcb A |
8 | # Generated from CLDR |
9 | # | |
2ca993e8 A |
10 | |
11 | # Copyright (C) 2011-2013, Apple Inc. and others. All Rights Reserved. | |
12 | # Remove \0301 following Greek, with possible intervening 0308 marks. | |
51004dcb | 13 | ::NFD(); |
2ca993e8 A |
14 | # For uppercasing (not titlecasing!) remove all greek accents from greek letters. |
15 | # This is done in two groups, to account for canonical ordering. | |
51004dcb A |
16 | [:Greek:] [^[:ccc=Not_Reordered:][:ccc=Above:]]*? { [\u0313\u0314\u0301\u0300\u0306\u0342\u0308\u0304] → ; |
17 | [:Greek:] [^[:ccc=Not_Reordered:][:ccc=Iota_Subscript:]]*? { \u0345 → ; | |
18 | ::NFC(); | |
729e4ab9 | 19 | ::Any-Upper(); |
2ca993e8 | 20 |