+ (->uppercase
+ ((name . "GREEK CAPITAL LETTER EPSILON WITH VARIA")
+ (ucs . #x1FC8) ; Ὲ
+ ))
+ (ucs . #x1F72) ; ὲ
+ ))
+(define-char
+ '((name . "LATIN SMALL LETTER OPEN E WITH GRAVE")
+ (=>ucs . #x1F72) ; ὲ
+ (general-category letter lowercase) ; Normative Category
+ (bidi-category . "L")
+ (mirrored . nil)
+ (->decomposition #x025B #x0300)
+ (->uppercase
+ ((name . "LATIN CAPITAL LETTER OPEN E WITH GRAVE")))
+ (japanese-jisx0213-1 . #x2B50) ;