(U+****): Add `->fullwidth'.
authortomo <tomo>
Tue, 24 Jul 2001 05:51:01 +0000 (05:51 +0000)
committertomo <tomo>
Tue, 24 Jul 2001 05:51:01 +0000 (05:51 +0000)
(fullwidth *): Use `=>ucs' instead of `->ucs'; add `<-fullwidth'.
- Use ``character-reference'' style [alist] instead of UCS code-point
  [hex integer] as the format of `->lowercase' and `->uppercase'.
- Omit `->titlecase' because each value of it has the same value of
  `->uppercase'.

lisp/utf-2000/u00100-Latin-Extended-A.el

index 98191e5..ac33dba 100644 (file)
@@ -4,19 +4,31 @@
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0041 #x0304)
-    (->lowercase       #x0101)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter a with macron")
+      (japanese-jisx0212         . #x2A27)     ; 
+      (japanese-jisx0213-1       . #x2975)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER A WITH MACRON")
+      (ucs               . #x0101)     ; ā
+      ))
     (latin-iso8859-4   . #xC0) ; 
-    (ucs               . #x100)        ; Ā
+    (ucs               . #x0100)       ; Ā
     ))
 (define-char
   '((name              . "fullwidth latin capital letter a with macron")
-    (->ucs             . #x0100)       ; Ā
+    (=>ucs             . #x0100)       ; Ā
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0100)
     (->lowercase
      ((name . "fullwidth latin small letter a with macron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER A WITH MACRON")
+      (ucs               . #x0100)     ; Ā
+      ))
     (japanese-jisx0212         . #x2A27)       ; 
     (japanese-jisx0213-1       . #x2975)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0061 #x0304)
-    (->uppercase       #x0100)
-    (->titlecase       #x0100)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter a with macron")
+      (chinese-gb2312            . #x2821)     ; 
+      (japanese-jisx0212         . #x2B27)     ; 
+      (japanese-jisx0213-1       . #x297A)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER A WITH MACRON")
+      (ucs               . #x0100)     ; Ā
+      ))
     (latin-iso8859-4   . #xE0) ; 
-    (ucs               . #x101)        ; ā
+    (ucs               . #x0101)       ; ā
     ))
 (define-char
   '((name              . "fullwidth latin small letter a with macron")
-    (->ucs             . #x0101)       ; ā
+    (=>ucs             . #x0101)       ; ā
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0101)
     (->uppercase
      ((name . "fullwidth latin capital letter a with macron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter a with macron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER A WITH MACRON")
+      (ucs               . #x0101)     ; ā
+      ))
     (chinese-gb2312            . #x2821)       ; 
     (japanese-jisx0212         . #x2B27)       ; 
     (japanese-jisx0213-1       . #x297A)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0041 #x0306)
-    (->lowercase       #x0103)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter a with breve")
+      (japanese-jisx0212         . #x2A25)     ; 
+      (japanese-jisx0213-1       . #x2A3A)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER A WITH BREVE")
+      (ucs               . #x0103)     ; ă
+      ))
     (latin-iso8859-2           . #xC3) ; 
     (latin-tcvn5712            . #xA1) ; 
     (latin-viscii-upper                . #xE5) ; 
     (latin-viscii              . #xC5) ; 
-    (ucs                       . #x102)        ; Ă
+    (ucs                       . #x0102)       ; Ă
     ))
 (define-char
   '((name              . "fullwidth latin capital letter a with breve")
-    (->ucs             . #x0102)       ; Ă
+    (=>ucs             . #x0102)       ; Ă
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0102)
     (->lowercase
      ((name . "fullwidth latin small letter a with breve")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER A WITH BREVE")
+      (ucs               . #x0102)     ; Ă
+      ))
     (japanese-jisx0212         . #x2A25)       ; 
     (japanese-jisx0213-1       . #x2A3A)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0061 #x0306)
-    (->uppercase       #x0102)
-    (->titlecase       #x0102)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter a with breve")
+      (japanese-jisx0212         . #x2B25)     ; 
+      (japanese-jisx0213-1       . #x2A49)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER A WITH BREVE")
+      (ucs               . #x0102)     ; Ă
+      ))
     (latin-iso8859-2           . #xE3) ; 
     (latin-tcvn5712            . #xA8) ; 
     (latin-viscii-lower                . #xE5) ; 
     (latin-viscii              . #xE5) ; 
-    (ucs                       . #x103)        ; ă
+    (ucs                       . #x0103)       ; ă
     ))
 (define-char
   '((name              . "fullwidth latin small letter a with breve")
-    (->ucs             . #x0103)       ; ă
+    (=>ucs             . #x0103)       ; ă
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0103)
     (->uppercase
      ((name . "fullwidth latin capital letter a with breve")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter a with breve")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER A WITH BREVE")
+      (ucs               . #x0103)     ; ă
+      ))
     (japanese-jisx0212         . #x2B25)       ; 
     (japanese-jisx0213-1       . #x2A49)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0041 #x0328)
-    (->lowercase       #x0105)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter a with ogonek")
+      (japanese-jisx0212         . #x2A28)     ; 
+      (japanese-jisx0213-1       . #x2A21)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER A WITH OGONEK")
+      (ucs               . #x0105)     ; ą
+      ))
     (latin-iso8859-2   . #xA1) ; 
     (latin-iso8859-4   . #xA1) ; 
-    (ucs               . #x104)        ; Ą
+    (ucs               . #x0104)       ; Ą
     ))
 (define-char
   '((name              . "fullwidth latin capital letter a with ogonek")
-    (->ucs             . #x0104)       ; Ą
+    (=>ucs             . #x0104)       ; Ą
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0104)
     (->lowercase
      ((name . "fullwidth latin small letter a with ogonek")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER A WITH OGONEK")
+      (ucs               . #x0104)     ; Ą
+      ))
     (japanese-jisx0212         . #x2A28)       ; 
     (japanese-jisx0213-1       . #x2A21)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0061 #x0328)
-    (->uppercase       #x0104)
-    (->titlecase       #x0104)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter a with ogonek")
+      (japanese-jisx0212         . #x2B28)     ; 
+      (japanese-jisx0213-1       . #x2A2C)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER A WITH OGONEK")
+      (ucs               . #x0104)     ; Ą
+      ))
     (latin-iso8859-2   . #xB1) ; 
     (latin-iso8859-4   . #xB1) ; 
-    (ucs               . #x105)        ; ą
+    (ucs               . #x0105)       ; ą
     ))
 (define-char
   '((name              . "fullwidth latin small letter a with ogonek")
-    (->ucs             . #x0105)       ; ą
+    (=>ucs             . #x0105)       ; ą
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0105)
     (->uppercase
      ((name . "fullwidth latin capital letter a with ogonek")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter a with ogonek")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER A WITH OGONEK")
+      (ucs               . #x0105)     ; ą
+      ))
     (japanese-jisx0212         . #x2B28)       ; 
     (japanese-jisx0213-1       . #x2A2C)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0043 #x0301)
-    (->lowercase       #x0107)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter c with acute")
+      (japanese-jisx0212         . #x2A2B)     ; 
+      (japanese-jisx0213-1       . #x2A3C)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER C WITH ACUTE")
+      (ucs               . #x0107)     ; ć
+      ))
     (latin-iso8859-2   . #xC6) ; 
-    (ucs               . #x106)        ; Ć
+    (ucs               . #x0106)       ; Ć
     ))
 (define-char
   '((name              . "fullwidth latin capital letter c with acute")
-    (->ucs             . #x0106)       ; Ć
+    (=>ucs             . #x0106)       ; Ć
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0106)
     (->lowercase
      ((name . "fullwidth latin small letter c with acute")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER C WITH ACUTE")
+      (ucs               . #x0106)     ; Ć
+      ))
     (japanese-jisx0212         . #x2A2B)       ; 
     (japanese-jisx0213-1       . #x2A3C)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0063 #x0301)
-    (->uppercase       #x0106)
-    (->titlecase       #x0106)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter c with acute")
+      (japanese-jisx0212         . #x2B2B)     ; 
+      (japanese-jisx0213-1       . #x2A4B)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER C WITH ACUTE")
+      (ucs               . #x0106)     ; Ć
+      ))
     (latin-iso8859-2   . #xE6) ; 
-    (ucs               . #x107)        ; ć
+    (ucs               . #x0107)       ; ć
     ))
 (define-char
   '((name              . "fullwidth latin small letter c with acute")
-    (->ucs             . #x0107)       ; ć
+    (=>ucs             . #x0107)       ; ć
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0107)
     (->uppercase
      ((name . "fullwidth latin capital letter c with acute")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter c with acute")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER C WITH ACUTE")
+      (ucs               . #x0107)     ; ć
+      ))
     (japanese-jisx0212         . #x2B2B)       ; 
     (japanese-jisx0213-1       . #x2A4B)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0043 #x0302)
-    (->lowercase       #x0109)
+    (->fullwidth
+     ((name . "fullwidth latin capital letter c with circumflex")
+      (japanese-jisx0212         . #x2A2C)     ; 
+      (japanese-jisx0213-1       . #x2A59)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER C WITH CIRCUMFLEX")
+      (ucs               . #x0109)     ; ĉ
+      ))
     (latin-iso8859-3   . #xC6) ; 
-    (ucs               . #x108)        ; Ĉ
+    (ucs               . #x0108)       ; Ĉ
     ))
 (define-char
   '((name . "fullwidth latin capital letter c with circumflex")
-    (->ucs             . #x0108)       ; Ĉ
+    (=>ucs             . #x0108)       ; Ĉ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0108)
     (->lowercase
      ((name . "fullwidth latin small letter c with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER C WITH CIRCUMFLEX")
+      (ucs               . #x0108)     ; Ĉ
+      ))
     (japanese-jisx0212         . #x2A2C)       ; 
     (japanese-jisx0213-1       . #x2A59)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0063 #x0302)
-    (->uppercase       #x0108)
-    (->titlecase       #x0108)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter c with circumflex")
+      (japanese-jisx0212         . #x2B2C)     ; 
+      (japanese-jisx0213-1       . #x2A5F)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER C WITH CIRCUMFLEX")
+      (ucs               . #x0108)     ; Ĉ
+      ))
     (latin-iso8859-3   . #xE6) ; 
-    (ucs               . #x109)        ; ĉ
+    (ucs               . #x0109)       ; ĉ
     ))
 (define-char
   '((name              . "fullwidth latin small letter c with circumflex")
-    (->ucs             . #x0109)       ; ĉ
+    (=>ucs             . #x0109)       ; ĉ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0109)
     (->uppercase
      ((name . "fullwidth latin capital letter c with circumflex")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter c with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER C WITH CIRCUMFLEX")
+      (ucs               . #x0109)     ; ĉ
+      ))
     (japanese-jisx0212         . #x2B2C)       ; 
     (japanese-jisx0213-1       . #x2A5F)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0043 #x0307)
-    (->lowercase       #x010B)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter c with dot above")
+      (japanese-jisx0212  . #x2A2F)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER C WITH DOT ABOVE")
+      (ucs               . #x010B)     ; ċ
+      ))
     (latin-iso8859-3   . #xC5) ; 
-    (ucs               . #x10A)        ; Ċ
+    (ucs               . #x010A)       ; Ċ
     ))
 (define-char
   '((name              . "fullwidth latin capital letter c with dot above")
-    (->ucs             . #x010A)       ; Ċ
+    (=>ucs             . #x010A)       ; Ċ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x010A)
     (->lowercase
      ((name . "fullwidth latin small letter c with dot above")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER C WITH DOT ABOVE")
+      (ucs               . #x010A)     ; Ċ
+      ))
     (japanese-jisx0212 . #x2A2F)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0063 #x0307)
-    (->uppercase       #x010A)
-    (->titlecase       #x010A)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter c with dot above")
+      (japanese-jisx0212  . #x2B2F)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER C WITH DOT ABOVE")
+      (ucs               . #x010A)     ; Ċ
+      ))
     (latin-iso8859-3   . #xE5) ; 
-    (ucs               . #x10B)        ; ċ
+    (ucs               . #x010B)       ; ċ
     ))
 (define-char
   '((name              . "fullwidth latin small letter c with dot above")
-    (->ucs             . #x010B)       ; ċ
+    (=>ucs             . #x010B)       ; ċ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x010B)
     (->uppercase
      ((name . "fullwidth latin capital letter c with dot above")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter c with dot above")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER C WITH DOT ABOVE")
+      (ucs               . #x010B)     ; ċ
+      ))
     (japanese-jisx0212 . #x2B2F)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0043 #x030C)
-    (->lowercase       #x010D)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter c with caron")
+      (japanese-jisx0212         . #x2A2D)     ; 
+      (japanese-jisx0213-1       . #x2A3D)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER C WITH CARON")
+      (ucs               . #x010D)     ; č
+      ))
     (latin-iso8859-2   . #xC8) ; 
     (latin-iso8859-4   . #xC8) ; 
-    (ucs               . #x10C)        ; Č
+    (ucs               . #x010C)       ; Č
     ))
 (define-char
   '((name              . "fullwidth latin capital letter c with caron")
-    (->ucs             . #x010C)       ; Č
+    (=>ucs             . #x010C)       ; Č
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x010C)
     (->lowercase
      ((name . "fullwidth latin capital letter c with caron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER C WITH CARON")
+      (ucs               . #x010C)     ; Č
+      ))
     (japanese-jisx0212         . #x2A2D)       ; 
     (japanese-jisx0213-1       . #x2A3D)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0063 #x030C)
-    (->uppercase       #x010C)
-    (->titlecase       #x010C)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter c with caron")
+      (japanese-jisx0212         . #x2B2D)     ; 
+      (japanese-jisx0213-1       . #x2A4C)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER C WITH CARON")
+      (ucs               . #x010C)     ; Č
+      ))
     (latin-iso8859-2   . #xE8) ; 
     (latin-iso8859-4   . #xE8) ; 
-    (ucs               . #x10D)        ; č
+    (ucs               . #x010D)       ; č
     ))
 (define-char
   '((name              . "fullwidth latin small letter c with caron")
-    (->ucs             . #x010D)       ; č
+    (=>ucs             . #x010D)       ; č
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x010D)
     (->uppercase
      ((name . "fullwidth latin small letter c with caron")))
-    (->titlecase
-     ((name . "fullwidth latin small letter c with caron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER C WITH CARON")
+      (ucs               . #x010D)     ; č
+      ))
     (japanese-jisx0212         . #x2B2D)       ; 
     (japanese-jisx0213-1       . #x2A4C)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0044 #x030C)
-    (->lowercase       #x010F)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter d with caron")
+      (japanese-jisx0212         . #x2A30)     ; 
+      (japanese-jisx0213-1       . #x2A40)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER D WITH CARON")
+      (ucs               . #x010F)     ; ď
+      ))
     (latin-iso8859-2   . #xCF) ; 
-    (ucs               . #x10E)        ; Ď
+    (ucs               . #x010E)       ; Ď
     ))
 (define-char
   '((name              . "fullwidth latin capital letter d with caron")
-    (->ucs             . #x010E)       ; Ď
+    (=>ucs             . #x010E)       ; Ď
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x010E)
     (->lowercase
      ((name . "fullwidth latin small letter d with caron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER D WITH CARON")
+      (ucs               . #x010E)     ; Ď
+      ))
     (japanese-jisx0212         . #x2A30)       ; 
     (japanese-jisx0213-1       . #x2A40)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0064 #x030C)
-    (->uppercase       #x010E)
-    (->titlecase       #x010E)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter d with caron")
+      (japanese-jisx0212         . #x2B30)     ; 
+      (japanese-jisx0213-1       . #x2A4F)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER D WITH CARON")
+      (ucs               . #x010E)     ; Ď
+      ))
     (latin-iso8859-2   . #xEF) ; 
-    (ucs               . #x10F)        ; ď
+    (ucs               . #x010F)       ; ď
     ))
 (define-char
   '((name              . "fullwidth latin small letter d with caron")
-    (->ucs             . #x010F)       ; ď
+    (=>ucs             . #x010F)       ; ď
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x010F)
     (->uppercase
      ((name . "fullwidth latin capital letter d with caron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter d with caron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER D WITH CARON")
+      (ucs               . #x010F)     ; ď
+      ))
     (japanese-jisx0212         . #x2B30)       ; 
     (japanese-jisx0213-1       . #x2A4F)       ; 
     ))
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->lowercase       #x0111)
+    (->fullwidth
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER D WITH STROKE")
+      (japanese-jisx0212  . #x2922)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER D WITH STROKE")
+      (ucs               . #x0111)     ; đ
+      ))
     (latin-iso8859-2           . #xD0) ; 
     (latin-iso8859-4           . #xD0) ; 
     (latin-tcvn5712            . #xA7) ; 
     (latin-viscii-upper                . #xF0) ; 
     (latin-viscii              . #xD0) ; 
-    (ucs                       . #x110)        ; Đ
+    (ucs                       . #x0110)       ; Đ
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER D WITH STROKE")
-    (->ucs             . #x0110)       ; Đ
+    (=>ucs             . #x0110)       ; Đ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0110)
     (->lowercase
      ((name . "FULLWIDTH LATIN SMALL LETTER D WITH STROKE")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER D WITH STROKE")
+      (ucs               . #x0110)     ; Đ
+      ))
     (japanese-jisx0212 . #x2922)       ; 
     ))
 (define-char
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->uppercase       #x0110)
-    (->titlecase       #x0110)
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER D WITH STROKE")
+      (ucs               . #x0110)     ; Đ
+      ))
     (latin-iso8859-2           . #xF0) ; 
     (latin-iso8859-4           . #xF0) ; 
     (latin-tcvn5712            . #xAE) ; 
     (latin-viscii-lower                . #xF0) ; 
     (latin-viscii              . #xF0) ; 
-    (ucs                       . #x111)        ; đ
+    (ucs                       . #x0111)       ; đ
     ))
 (define-char
   '((name              . "fullwidth latin small letter d with stroke")
-    (->ucs             . #x0111)       ; đ
+    (=>ucs             . #x0111)       ; đ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->uppercase
      ((name . "fullwidth latin capital letter d with stroke")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter d with stroke")))
     (korean-ksc5601            . #x2922)       ; 
     (japanese-jisx0212         . #x2942)       ; 
     (japanese-jisx0213-1       . #x2A50)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0045 #x0304)
-    (->lowercase       #x0113)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter e with macron")
+      (japanese-jisx0212         . #x2A37)     ; 
+      (japanese-jisx0213-1       . #x2978)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER E WITH MACRON")
+      (ucs               . #x0113)     ; ē
+      ))
     (latin-iso8859-4   . #xAA) ; 
-    (ucs               . #x112)        ; Ē
+    (ucs               . #x0112)       ; Ē
     ))
 (define-char
   '((name              . "fullwidth latin capital letter e with macron")
-    (->ucs             . #x0112)       ; Ē
+    (=>ucs             . #x0112)       ; Ē
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0112)
     (->lowercase
      ((name . "fullwidth latin small letter e with macron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER E WITH MACRON")
+      (ucs               . #x0112)     ; Ē
+      ))
     (japanese-jisx0212         . #x2A37)       ; 
     (japanese-jisx0213-1       . #x2978)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0065 #x0304)
-    (->uppercase       #x0112)
-    (->titlecase       #x0112)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter e with macron")
+      (chinese-gb2312            . #x2825)     ; 
+      (japanese-jisx0212         . #x2B37)     ; 
+      (japanese-jisx0213-1       . #x297D)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER E WITH MACRON")
+      (ucs               . #x0112)     ; Ē
+      ))
     (latin-iso8859-4   . #xBA) ; 
-    (ucs               . #x113)        ; ē
+    (ucs               . #x0113)       ; ē
     ))
 (define-char
   '((name              . "fullwidth latin small letter e with macron")
-    (->ucs             . #x0113)       ; ē
+    (=>ucs             . #x0113)       ; ē
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0113)
     (->uppercase
      ((name . "fullwidth latin capital letter e with macron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter e with macron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER E WITH MACRON")
+      (ucs               . #x0113)     ; ē
+      ))
     (chinese-gb2312            . #x2825)       ; 
     (japanese-jisx0212         . #x2B37)       ; 
     (japanese-jisx0213-1       . #x297D)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0045 #x0306)
-    (->lowercase       #x0115)
-    (ucs               . #x114)        ; Ĕ
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER E WITH BREVE")
+      (ucs               . #x0115)     ; ĕ
+      ))
+    (ucs               . #x0114)       ; Ĕ
     ))
 (define-char
   '((name              . "LATIN SMALL LETTER E WITH BREVE")
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0065 #x0306)
-    (->uppercase       #x0114)
-    (->titlecase       #x0114)
-    (ucs               . #x115)        ; ĕ
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER E WITH BREVE")
+      (ucs               . #x0114)     ; Ĕ
+      ))
+    (ucs               . #x0115)       ; ĕ
     ))
 (define-char
   '((name              . "LATIN CAPITAL LETTER E WITH DOT ABOVE")
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0045 #x0307)
-    (->lowercase       #x0117)
+    (->fullwidth
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER E WITH DOT ABOVE")
+      (japanese-jisx0212  . #x2A36)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER E WITH DOT ABOVE")
+      (ucs               . #x0117)     ; ė
+      ))
     (latin-iso8859-4   . #xCC) ; 
-    (ucs               . #x116)        ; Ė
+    (ucs               . #x0116)       ; Ė
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER E WITH DOT ABOVE")
-    (->ucs             . #x0116)       ; Ė
+    (=>ucs             . #x0116)       ; Ė
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0116)
     (->lowercase
      ((name . "FULLWIDTH LATIN SMALL LETTER E WITH DOT ABOVE")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER E WITH DOT ABOVE")
+      (ucs               . #x0116)     ; Ė
+      ))
     (japanese-jisx0212 . #x2A36)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0065 #x0307)
-    (->uppercase       #x0116)
-    (->titlecase       #x0116)
+    (->fullwidth
+     ((name              . "FULLWIDTH LATIN SMALL LETTER E WITH DOT ABOVE")
+      (japanese-jisx0212  . #x2B36)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER E WITH DOT ABOVE")
+      (ucs               . #x0116)     ; Ė
+      ))
     (latin-iso8859-4   . #xEC) ; 
-    (ucs               . #x117)        ; ė
+    (ucs               . #x0117)       ; ė
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER E WITH DOT ABOVE")
-    (->ucs             . #x0117)       ; ė
+    (=>ucs             . #x0117)       ; ė
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0117)
     (->uppercase
      ((name . "FULLWIDTH LATIN CAPITAL LETTER E WITH DOT ABOVE")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER E WITH DOT ABOVE")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER E WITH DOT ABOVE")
+      (ucs               . #x0117)     ; ė
+      ))
     (japanese-jisx0212 . #x2B36)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0045 #x0328)
-    (->lowercase       #x0119)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter e with ogonek")
+      (japanese-jisx0212         . #x2A38)     ; 
+      (japanese-jisx0213-1       . #x2A3E)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER E WITH OGONEK")
+      (ucs               . #x0119)     ; ę
+      ))
     (latin-iso8859-2   . #xCA) ; 
     (latin-iso8859-4   . #xCA) ; 
-    (ucs               . #x118)        ; Ę
+    (ucs               . #x0118)       ; Ę
     ))
 (define-char
   '((name              . "fullwidth latin capital letter e with ogonek")
-    (->ucs             . #x0118)       ; Ę
+    (=>ucs             . #x0118)       ; Ę
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0118)
     (->lowercase
      ((name . "fullwidth latin small letter e with ogonek")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER E WITH OGONEK")
+      (ucs               . #x0118)     ; Ę
+      ))
     (japanese-jisx0212         . #x2A38)       ; 
     (japanese-jisx0213-1       . #x2A3E)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0065 #x0328)
-    (->uppercase       #x0118)
-    (->titlecase       #x0118)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter e with ogonek")
+      (japanese-jisx0212         . #x2B38)     ; 
+      (japanese-jisx0213-1       . #x2A4D)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER E WITH OGONEK")
+      (ucs               . #x0118)     ; Ę
+      ))
     (latin-iso8859-2   . #xEA) ; 
     (latin-iso8859-4   . #xEA) ; 
-    (ucs               . #x119)        ; ę
+    (ucs               . #x0119)       ; ę
     ))
 (define-char
   '((name              . "fullwidth latin small letter e with ogonek")
-    (->ucs             . #x0119)       ; ę
+    (=>ucs             . #x0119)       ; ę
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0119)
     (->uppercase
      ((name . "fullwidth latin capital letter e with ogonek")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter e with ogonek")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER E WITH OGONEK")
+      (ucs               . #x0119)     ; ę
+      ))
     (japanese-jisx0212         . #x2B38)       ; 
     (japanese-jisx0213-1       . #x2A4D)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0045 #x030C)
-    (->lowercase       #x011B)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter e with caron")
+      (japanese-jisx0212         . #x2A35)     ; 
+      (japanese-jisx0213-1       . #x2A3F)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER E WITH CARON")
+      (ucs               . #x011B)     ; ě
+      ))
     (latin-iso8859-2   . #xCC) ; 
-    (ucs               . #x11A)        ; Ě
+    (ucs               . #x011A)       ; Ě
     ))
 (define-char
   '((name              . "fullwidth latin capital letter e with caron")
-    (->ucs             . #x011A)       ; Ě
+    (=>ucs             . #x011A)       ; Ě
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x011A)
     (->lowercase
      ((name . "fullwidth latin small letter e with caron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER E WITH CARON")
+      (ucs               . #x011A)     ; Ě
+      ))
     (japanese-jisx0212         . #x2A35)       ; 
     (japanese-jisx0213-1       . #x2A3F)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0065 #x030C)
-    (->uppercase       #x011A)
-    (->titlecase       #x011A)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter e with caron")
+      (chinese-gb2312            . #x2827)     ; 
+      (japanese-jisx0212         . #x2B35)     ; 
+      (japanese-jisx0213-1       . #x2A4E)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER E WITH CARON")
+      (ucs               . #x011A)     ; Ě
+      ))
     (latin-iso8859-2   . #xEC) ; 
-    (ucs               . #x11B)        ; ě
+    (ucs               . #x011B)       ; ě
     ))
 (define-char
   '((name              . "fullwidth latin small letter e with caron")
-    (->ucs             . #x011B)       ; ě
+    (=>ucs             . #x011B)       ; ě
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x011B)
     (->uppercase
      ((name . "fullwidth latin capital letter e with caron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter e with caron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER E WITH CARON")
+      (ucs               . #x011B)     ; ě
+      ))
     (chinese-gb2312            . #x2827)       ; 
     (japanese-jisx0212         . #x2B35)       ; 
     (japanese-jisx0213-1       . #x2A4E)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0047 #x0302)
-    (->lowercase       #x011D)
+    (->fullwidth
+     ((name . "fullwidth latin capital letter g with circumflex")
+      (japanese-jisx0212         . #x2A3A)     ; 
+      (japanese-jisx0213-1       . #x2A5A)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER G WITH CIRCUMFLEX")
+      (ucs               . #x011D)     ; ĝ
+      ))
     (latin-iso8859-3   . #xD8) ; 
-    (ucs               . #x11C)        ; Ĝ
+    (ucs               . #x011C)       ; Ĝ
     ))
 (define-char
   '((name . "fullwidth latin capital letter g with circumflex")
-    (->ucs             . #x011C)       ; Ĝ
+    (=>ucs             . #x011C)       ; Ĝ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x011C)
     (->lowercase
      ((name . "fullwidth latin small letter g with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER G WITH CIRCUMFLEX")
+      (ucs               . #x011C)     ; Ĝ
+      ))
     (japanese-jisx0212         . #x2A3A)       ; 
     (japanese-jisx0213-1       . #x2A5A)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0067 #x0302)
-    (->uppercase       #x011C)
-    (->titlecase       #x011C)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter g with circumflex")
+      (japanese-jisx0212         . #x2B3A)     ; 
+      (japanese-jisx0213-1       . #x2A60)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER G WITH CIRCUMFLEX")
+      (ucs               . #x011C)     ; Ĝ
+      ))
     (latin-iso8859-3   . #xF8) ; 
-    (ucs               . #x11D)        ; ĝ
+    (ucs               . #x011D)       ; ĝ
     ))
 (define-char
   '((name              . "fullwidth latin small letter g with circumflex")
-    (->ucs             . #x011D)       ; ĝ
+    (=>ucs             . #x011D)       ; ĝ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x011D)
     (->uppercase
      ((name . "fullwidth latin small letter g with circumflex")))
-    (->titlecase
-     ((name . "fullwidth latin small letter g with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER G WITH CIRCUMFLEX")
+      (ucs               . #x011D)     ; ĝ
+      ))
     (japanese-jisx0212         . #x2B3A)       ; 
     (japanese-jisx0213-1       . #x2A60)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0047 #x0306)
-    (->lowercase       #x011F)
+    (->fullwidth
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER G WITH BREVE")
+      (japanese-jisx0212  . #x2A3B)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER G WITH BREVE")
+      (ucs               . #x011F)     ; ğ
+      ))
     (latin-iso8859-3   . #xAB) ; 
     (latin-iso8859-9   . #xD0) ; 
-    (ucs               . #x11E)        ; Ğ
+    (ucs               . #x011E)       ; Ğ
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER G WITH BREVE")
-    (->ucs             . #x011E)       ; Ğ
+    (=>ucs             . #x011E)       ; Ğ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x011E)
     (->lowercase
      ((name . "FULLWIDTH LATIN SMALL LETTER G WITH BREVE")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER G WITH BREVE")
+      (ucs               . #x011E)     ; Ğ
+      ))
     (japanese-jisx0212 . #x2A3B)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0067 #x0306)
-    (->uppercase       #x011E)
-    (->titlecase       #x011E)
+    (->fullwidth
+     ((name              . "FULLWIDTH LATIN SMALL LETTER G WITH BREVE")
+      (japanese-jisx0212  . #x2B3B)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER G WITH BREVE")
+      (ucs               . #x011E)     ; Ğ
+      ))
     (latin-iso8859-3   . #xBB) ; 
     (latin-iso8859-9   . #xF0) ; 
-    (ucs               . #x11F)        ; ğ
+    (ucs               . #x011F)       ; ğ
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER G WITH BREVE")
-    (->ucs             . #x011F)       ; ğ
+    (=>ucs             . #x011F)       ; ğ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x011F)
     (->uppercase
      ((name . "FULLWIDTH LATIN CAPITAL LETTER G WITH BREVE")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER G WITH BREVE")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER G WITH BREVE")
+      (ucs               . #x011F)     ; ğ
+      ))
     (japanese-jisx0212 . #x2B3B)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0047 #x0307)
-    (->lowercase       #x0121)
+    (->fullwidth
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER G WITH DOT ABOVE")
+      (japanese-jisx0212  . #x2A3D)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER G WITH DOT ABOVE")
+      (ucs               . #x0121)     ; ġ
+      ))
     (latin-iso8859-3   . #xD5) ; 
-    (ucs               . #x120)        ; Ġ
+    (ucs               . #x0120)       ; Ġ
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER G WITH DOT ABOVE")
-    (->ucs             . #x0120)       ; Ġ
+    (=>ucs             . #x0120)       ; Ġ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0120)
     (->lowercase
      ((name . "FULLWIDTH LATIN SMALL LETTER G WITH DOT ABOVE")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER G WITH DOT ABOVE")
+      (ucs               . #x0120)     ; Ġ
+      ))
     (japanese-jisx0212 . #x2A3D)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0067 #x0307)
-    (->uppercase       #x0120)
-    (->titlecase       #x0120)
+    (->fullwidth
+     ((name              . "FULLWIDTH LATIN SMALL LETTER G WITH DOT ABOVE")
+      (japanese-jisx0212  . #x2B3D)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER G WITH DOT ABOVE")
+      (ucs               . #x0120)     ; Ġ
+      ))
     (latin-iso8859-3   . #xF5) ; 
-    (ucs               . #x121)        ; ġ
+    (ucs               . #x0121)       ; ġ
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER G WITH DOT ABOVE")
-    (->ucs             . #x0121)       ; ġ
+    (=>ucs             . #x0121)       ; ġ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0121)
     (->uppercase
      ((name . "FULLWIDTH LATIN CAPITAL LETTER G WITH DOT ABOVE")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER G WITH DOT ABOVE")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER G WITH DOT ABOVE")
+      (ucs               . #x0121)     ; ġ
+      ))
     (japanese-jisx0212 . #x2B3D)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0047 #x0327)
-    (->lowercase       #x0123)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter g with cedilla")
+      (japanese-jisx0212  . #x2A3C)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER G WITH CEDILLA")
+      (ucs               . #x0123)     ; ģ
+      ))
     (latin-iso8859-4   . #xAB) ; 
-    (ucs               . #x122)        ; Ģ
+    (ucs               . #x0122)       ; Ģ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER G WITH CEDILLA")
-    (->ucs             . #x0122)       ; Ģ
+  '((name              . "fullwidth latin capital letter g with cedilla")
+    (=>ucs             . #x0122)       ; Ģ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0122)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER G WITH CEDILLA")))
+     ((name . "fullwidth latin small letter g with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER G WITH CEDILLA")
+      (ucs               . #x0122)     ; Ģ
+      ))
     (japanese-jisx0212 . #x2A3C)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0067 #x0327)
-    (->uppercase       #x0122)
-    (->titlecase       #x0122)
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER G WITH CEDILLA")
+      (ucs               . #x0122)     ; Ģ
+      ))
     (latin-iso8859-4   . #xBB) ; 
-    (ucs               . #x123)        ; ģ
+    (ucs               . #x0123)       ; ģ
     ))
 (define-char
   '((name              . "LATIN CAPITAL LETTER H WITH CIRCUMFLEX")
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0048 #x0302)
-    (->lowercase       #x0125)
+    (->fullwidth
+     ((name . "fullwidth latin capital letter h with circumflex")
+      (japanese-jisx0212         . #x2A3E)     ; 
+      (japanese-jisx0213-1       . #x2A5B)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER H WITH CIRCUMFLEX")
+      (ucs               . #x0125)     ; ĥ
+      ))
     (latin-iso8859-3   . #xA6) ; 
-    (ucs               . #x124)        ; Ĥ
+    (ucs               . #x0124)       ; Ĥ
     ))
 (define-char
   '((name . "fullwidth latin capital letter h with circumflex")
-    (->ucs             . #x0124)       ; Ĥ
+    (=>ucs             . #x0124)       ; Ĥ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0124)
     (->lowercase
      ((name . "fullwidth latin small letter h with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER H WITH CIRCUMFLEX")
+      (ucs               . #x0124)     ; Ĥ
+      ))
     (japanese-jisx0212         . #x2A3E)       ; 
     (japanese-jisx0213-1       . #x2A5B)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0068 #x0302)
-    (->uppercase       #x0124)
-    (->titlecase       #x0124)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter h with circumflex")
+      (japanese-jisx0212         . #x2B3E)     ; 
+      (japanese-jisx0213-1       . #x2A61)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER H WITH CIRCUMFLEX")
+      (ucs               . #x0124)     ; Ĥ
+      ))
     (latin-iso8859-3   . #xB6) ; 
-    (ucs               . #x125)        ; ĥ
+    (ucs               . #x0125)       ; ĥ
     ))
 (define-char
   '((name              . "fullwidth latin small letter h with circumflex")
-    (->ucs             . #x0125)       ; ĥ
+    (=>ucs             . #x0125)       ; ĥ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0125)
     (->uppercase
      ((name . "fullwidth latin capital letter h with circumflex")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter h with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER H WITH CIRCUMFLEX")
+      (ucs               . #x0125)     ; ĥ
+      ))
     (japanese-jisx0212         . #x2B3E)       ; 
     (japanese-jisx0213-1       . #x2A61)       ; 
     ))
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->lowercase       #x0127)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter h with stroke")
+      (korean-ksc5601    . #x2824)     ; 
+      (japanese-jisx0212  . #x2924)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER H WITH STROKE")
+      (ucs               . #x0127)     ; ħ
+      ))
     (latin-iso8859-3   . #xA1) ; 
-    (ucs               . #x126)        ; Ħ
+    (ucs               . #x0126)       ; Ħ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER H WITH STROKE")
-    (->ucs             . #x0126)       ; Ħ
+  '((name              . "fullwidth latin capital letter h with stroke")
+    (=>ucs             . #x0126)       ; Ħ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0126)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER H WITH STROKE")))
+     ((name . "fullwidth latin small letter h with stroke")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER H WITH STROKE")
+      (ucs               . #x0126)     ; Ħ
+      ))
     (korean-ksc5601    . #x2824)       ; 
     (japanese-jisx0212 . #x2924)       ; 
     ))
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->uppercase       #x0126)
-    (->titlecase       #x0126)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter h with stroke")
+      (korean-ksc5601            . #x2924)     ; 
+      (japanese-jisx0212         . #x2944)     ; 
+      (japanese-jisx0213-1       . #x2A7D)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER H WITH STROKE")
+      (ucs               . #x0126)     ; Ħ
+      ))
     (latin-iso8859-3   . #xB1) ; 
-    (ucs               . #x127)        ; ħ
+    (ucs               . #x0127)       ; ħ
     ))
 (define-char
   '((name              . "fullwidth latin small letter h with stroke")
-    (->ucs             . #x0127)       ; ħ
+    (=>ucs             . #x0127)       ; ħ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0127)
     (->uppercase
      ((name . "fullwidth latin capital letter h with stroke")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter h with stroke")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER H WITH STROKE")
+      (ucs               . #x0127)     ; ħ
+      ))
     (korean-ksc5601            . #x2924)       ; 
     (japanese-jisx0212         . #x2944)       ; 
     (japanese-jisx0213-1       . #x2A7D)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0049 #x0303)
-    (->lowercase       #x0129)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter i with tilde")
+      (japanese-jisx0212  . #x2A47)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER I WITH TILDE")
+      (ucs               . #x0129)     ; ĩ
+      ))
     (latin-iso8859-4           . #xA5) ; 
     (latin-viscii-upper                . #xEE) ; 
     (latin-viscii              . #xCE) ; 
-    (ucs                       . #x128)        ; Ĩ
+    (ucs                       . #x0128)       ; Ĩ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER I WITH TILDE")
-    (->ucs             . #x0128)       ; Ĩ
+  '((name              . "fullwidth latin capital letter i with tilde")
+    (=>ucs             . #x0128)       ; Ĩ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0128)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER I WITH TILDE")))
+     ((name . "fullwidth latin small letter i with tilde")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER I WITH TILDE")
+      (ucs               . #x0128)     ; Ĩ
+      ))
     (japanese-jisx0212 . #x2A47)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0069 #x0303)
-    (->uppercase       #x0128)
-    (->titlecase       #x0128)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter i with tilde")
+      (japanese-jisx0212  . #x2B47)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER I WITH TILDE")
+      (ucs               . #x0128)     ; Ĩ
+      ))
     (latin-iso8859-4           . #xB5) ; 
     (latin-tcvn5712            . #xDC) ; 
     (latin-viscii-lower                . #xEE) ; 
     (latin-viscii              . #xEE) ; 
-    (ucs                       . #x129)        ; ĩ
+    (ucs                       . #x0129)       ; ĩ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER I WITH TILDE")
-    (->ucs             . #x0129)       ; ĩ
+  '((name              . "fullwidth latin small letter i with tilde")
+    (=>ucs             . #x0129)       ; ĩ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0129)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER I WITH TILDE")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER I WITH TILDE")))
+     ((name . "fullwidth latin capital letter i with tilde")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER I WITH TILDE")
+      (ucs               . #x0129)     ; ĩ
+      ))
     (japanese-jisx0212 . #x2B47)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0049 #x0304)
-    (->lowercase       #x012B)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter i with macron")
+      (japanese-jisx0212         . #x2A45)     ; 
+      (japanese-jisx0213-1       . #x2976)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER I WITH MACRON")
+      (ucs               . #x012B)     ; ī
+      ))
     (latin-iso8859-4   . #xCF) ; 
-    (ucs               . #x12A)        ; Ī
+    (ucs               . #x012A)       ; Ī
     ))
 (define-char
   '((name              . "fullwidth latin capital letter i with macron")
-    (->ucs             . #x012A)       ; Ī
+    (=>ucs             . #x012A)       ; Ī
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x012A)
     (->lowercase
      ((name . "fullwidth latin small letter i with macron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER I WITH MACRON")
+      (ucs               . #x012A)     ; Ī
+      ))
     (japanese-jisx0212         . #x2A45)       ; 
     (japanese-jisx0213-1       . #x2976)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0069 #x0304)
-    (->uppercase       #x012A)
-    (->titlecase       #x012A)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter i with macron")
+      (chinese-gb2312            . #x2829)     ; 
+      (japanese-jisx0212         . #x2B45)     ; 
+      (japanese-jisx0213-1       . #x297B)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER I WITH MACRON")
+      (ucs               . #x012A)     ; Ī
+      ))
     (latin-iso8859-4   . #xEF) ; 
-    (ucs               . #x12B)        ; ī
+    (ucs               . #x012B)       ; ī
     ))
 (define-char
   '((name              . "fullwidth latin small letter i with macron")
-    (->ucs             . #x012B)       ; ī
+    (=>ucs             . #x012B)       ; ī
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x012B)
     (->uppercase
      ((name . "fullwidth latin capital letter i with macron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter i with macron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER I WITH MACRON")
+      (ucs               . #x012B)     ; ī
+      ))
     (chinese-gb2312            . #x2829)       ; 
     (japanese-jisx0212         . #x2B45)       ; 
     (japanese-jisx0213-1       . #x297B)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0049 #x0306)
-    (->lowercase       #x012D)
-    (ucs               . #x12C)        ; Ĭ
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER I WITH BREVE")
+      (ucs               . #x012D)     ; ĭ
+      ))
+    (ucs               . #x012C)       ; Ĭ
     ))
 (define-char
   '((name              . "LATIN SMALL LETTER I WITH BREVE")
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0069 #x0306)
-    (->uppercase       #x012C)
-    (->titlecase       #x012C)
-    (ucs               . #x12D)        ; ĭ
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER I WITH BREVE")
+      (ucs               . #x012C)     ; Ĭ
+      ))
+    (ucs               . #x012D)       ; ĭ
     ))
 (define-char
   '((name              . "LATIN CAPITAL LETTER I WITH OGONEK")
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0049 #x0328)
-    (->lowercase       #x012F)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter i with ogonek")
+      (japanese-jisx0212  . #x2A46)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER I WITH OGONEK")
+      (ucs               . #x012F)     ; į
+      ))
     (latin-iso8859-4   . #xC7) ; 
-    (ucs               . #x12E)        ; Į
+    (ucs               . #x012E)       ; Į
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER I WITH OGONEK")
-    (->ucs             . #x012E)       ; Į
+  '((name              . "fullwidth latin capital letter i with ogonek")
+    (=>ucs             . #x012E)       ; Į
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x012E)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER I WITH OGONEK")))
+     ((name . "fullwidth latin small letter i with ogonek")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER I WITH OGONEK")
+      (ucs               . #x012E)     ; Į
+      ))
     (japanese-jisx0212 . #x2A46)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0069 #x0328)
-    (->uppercase       #x012E)
-    (->titlecase       #x012E)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter i with ogonek")
+      (japanese-jisx0212  . #x2B46)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER I WITH OGONEK")
+      (ucs               . #x012E)     ; Į
+      ))
     (latin-iso8859-4   . #xE7) ; 
-    (ucs               . #x12F)        ; į
+    (ucs               . #x012F)       ; į
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER I WITH OGONEK")
-    (->ucs             . #x012F)       ; į
+  '((name              . "fullwidth latin small letter i with ogonek")
+    (=>ucs             . #x012F)       ; į
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x012F)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER I WITH OGONEK")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER I WITH OGONEK")))
+     ((name . "fullwidth latin capital letter i with ogonek")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER I WITH OGONEK")
+      (ucs               . #x012F)     ; į
+      ))
     (japanese-jisx0212 . #x2B46)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0049 #x0307)
-    (->lowercase       #x0069)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter i with dot above")
+      (japanese-jisx0212  . #x2A44)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER I")
+      (ucs               . #x0069)     ; i
+      ))
     (latin-iso8859-3   . #xA9) ; 
     (latin-iso8859-9   . #xDD) ; 
-    (ucs               . #x130)        ; İ
+    (ucs               . #x0130)       ; İ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER I WITH DOT ABOVE")
-    (->ucs             . #x0130)       ; İ
+  '((name              . "fullwidth latin capital letter i with dot above")
+    (=>ucs             . #x0130)       ; İ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0130)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER I WITH DOT ABOVE")))
+     ((name . "fullwidth latin small letter i with dot above")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER I WITH DOT ABOVE")
+      (ucs               . #x0130)     ; İ
+      ))
     (japanese-jisx0212 . #x2A44)       ; 
     ))
 (define-char
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->uppercase       #x0049)
-    (->titlecase       #x0049)
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER I")
+      (ucs               . #x0049)     ; I
+      ))
     (latin-iso8859-3   . #xB9) ; 
     (latin-iso8859-9   . #xFD) ; 
-    (ucs               . #x131)        ; ı
+    (ucs               . #x0131)       ; ı
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER DOTLESS I")
-    (->ucs             . #x0131)       ; ı
+  '((name              . "fullwidth latin small letter dotless i")
+    (=>ucs             . #x0131)       ; ı
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER DOTLESS I")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER DOTLESS I")))
+     ((name . "fullwidth latin capital letter dotless i")))
     (korean-ksc5601    . #x2925)       ; 
     (japanese-jisx0212 . #x2945)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   compat #x0049 #x004A)
-    (->lowercase       #x0133)
+    (->lowercase
+     ((name              . "LATIN SMALL LIGATURE IJ")
+      (ucs               . #x0133)     ; ij
+      ))
     (korean-ksc5601    . #x2826)       ; 
     (japanese-jisx0212 . #x2926)       ; 
-    (ucs               . #x132)        ; IJ
+    (ucs               . #x0132)       ; IJ
     ))
 (define-char
   '((name              . "LATIN SMALL LIGATURE IJ")
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   compat #x0069 #x006A)
-    (->uppercase       #x0132)
-    (->titlecase       #x0132)
-    (ucs               . #x133)        ; ij
+    (->fullwidth
+     ((name              . "fullwidth latin small ligature ij")
+      (korean-ksc5601    . #x2926)     ; 
+      (japanese-jisx0212  . #x2946)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LIGATURE IJ")
+      (ucs               . #x0132)     ; IJ
+      ))
+    (ucs               . #x0133)       ; ij
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LIGATURE IJ")
-    (->ucs             . #x0133)       ; ij
+  '((name              . "fullwidth latin small ligature ij")
+    (=>ucs             . #x0133)       ; ij
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0133)
-    (->uppercase       #x0132)
-    (->titlecase       #x0132)
+    (->uppercase
+     ((name              . "LATIN CAPITAL LIGATURE IJ")
+      (ucs               . #x0132)     ; IJ
+      ))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LIGATURE IJ")
+      (ucs               . #x0133)     ; ij
+      ))
     (korean-ksc5601    . #x2926)       ; 
     (japanese-jisx0212 . #x2946)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004A #x0302)
-    (->lowercase       #x0135)
+    (->fullwidth
+     ((name . "fullwidth latin capital letter j with circumflex")
+      (japanese-jisx0212         . #x2A48)     ; 
+      (japanese-jisx0213-1       . #x2A5C)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER J WITH CIRCUMFLEX")
+      (ucs               . #x0135)     ; ĵ
+      ))
     (latin-iso8859-3   . #xAC) ; 
-    (ucs               . #x134)        ; Ĵ
+    (ucs               . #x0134)       ; Ĵ
     ))
 (define-char
   '((name . "fullwidth latin capital letter j with circumflex")
-    (->ucs             . #x0134)       ; Ĵ
+    (=>ucs             . #x0134)       ; Ĵ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0134)
     (->lowercase
      ((name . "fullwidth latin small letter j with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER J WITH CIRCUMFLEX")
+      (ucs               . #x0134)     ; Ĵ
+      ))
     (japanese-jisx0212         . #x2A48)       ; 
     (japanese-jisx0213-1       . #x2A5C)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006A #x0302)
-    (->uppercase       #x0134)
-    (->titlecase       #x0134)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter j with circumflex")
+      (japanese-jisx0212         . #x2B48)     ; 
+      (japanese-jisx0213-1       . #x2A62)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER J WITH CIRCUMFLEX")
+      (ucs               . #x0134)     ; Ĵ
+      ))
     (latin-iso8859-3   . #xBC) ; 
-    (ucs               . #x135)        ; ĵ
+    (ucs               . #x0135)       ; ĵ
     ))
 (define-char
   '((name              . "fullwidth latin small letter j with circumflex")
-    (->ucs             . #x0135)       ; ĵ
+    (=>ucs             . #x0135)       ; ĵ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0135)
     (->uppercase
      ((name . "fullwidth latin capital letter j with circumflex")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter j with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER J WITH CIRCUMFLEX")
+      (ucs               . #x0135)     ; ĵ
+      ))
     (japanese-jisx0212         . #x2B48)       ; 
     (japanese-jisx0213-1       . #x2A62)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004B #x0327)
-    (->lowercase       #x0137)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter k with cedilla")
+      (japanese-jisx0212  . #x2A49)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER K WITH CEDILLA")
+      (ucs               . #x0137)     ; ķ
+      ))
     (latin-iso8859-4   . #xD3) ; 
-    (ucs               . #x136)        ; Ķ
+    (ucs               . #x0136)       ; Ķ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER K WITH CEDILLA")
-    (->ucs             . #x0136)       ; Ķ
+  '((name              . "fullwidth latin capital letter k with cedilla")
+    (=>ucs             . #x0136)       ; Ķ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0136)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER K WITH CEDILLA")))
+     ((name . "fullwidth latin small letter k with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER K WITH CEDILLA")
+      (ucs               . #x0136)     ; Ķ
+      ))
     (japanese-jisx0212 . #x2A49)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006B #x0327)
-    (->uppercase       #x0136)
-    (->titlecase       #x0136)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter k with cedilla")
+      (japanese-jisx0212  . #x2B49)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER K WITH CEDILLA")
+      (ucs               . #x0136)     ; Ķ
+      ))
     (latin-iso8859-4   . #xF3) ; 
-    (ucs               . #x137)        ; ķ
+    (ucs               . #x0137)       ; ķ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER K WITH CEDILLA")
-    (->ucs             . #x0137)       ; ķ
+  '((name              . "fullwidth latin small letter k with cedilla")
+    (=>ucs             . #x0137)       ; ķ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0137)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER K WITH CEDILLA")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER K WITH CEDILLA")))
+     ((name . "fullwidth latin capital letter k with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER K WITH CEDILLA")
+      (ucs               . #x0137)     ; ķ
+      ))
     (japanese-jisx0212 . #x2B49)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (iso-10646-comment . "Greenlandic")
+    (->fullwidth
+     ((name              . "fullwidth latin small letter kra")
+      (korean-ksc5601    . #x2927)     ; 
+      (japanese-jisx0212  . #x2947)    ; 
+      ))
     (latin-iso8859-4   . #xA2) ; 
-    (ucs               . #x138)        ; ĸ
+    (ucs               . #x0138)       ; ĸ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER KRA")
-    (->ucs             . #x0138)       ; ĸ
+  '((name              . "fullwidth latin small letter kra")
+    (=>ucs             . #x0138)       ; ĸ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (iso-10646-comment . "Greenlandic")
     (->decomposition   wide #x0138)
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER KRA")
+      (ucs               . #x0138)     ; ĸ
+      ))
     (korean-ksc5601    . #x2927)       ; 
     (japanese-jisx0212 . #x2947)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004C #x0301)
-    (->lowercase       #x013A)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter l with acute")
+      (japanese-jisx0212         . #x2A4A)     ; 
+      (japanese-jisx0213-1       . #x2A3B)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER L WITH ACUTE")
+      (ucs               . #x013A)     ; ĺ
+      ))
     (latin-iso8859-2   . #xC5) ; 
-    (ucs               . #x139)        ; Ĺ
+    (ucs               . #x0139)       ; Ĺ
     ))
 (define-char
   '((name              . "fullwidth latin capital letter l with acute")
-    (->ucs             . #x0139)       ; Ĺ
+    (=>ucs             . #x0139)       ; Ĺ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0139)
     (->lowercase
      ((name . "fullwidth latin small letter l with acute")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER L WITH ACUTE")
+      (ucs               . #x0139)     ; Ĺ
+      ))
     (japanese-jisx0212         . #x2A4A)       ; 
     (japanese-jisx0213-1       . #x2A3B)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006C #x0301)
-    (->uppercase       #x0139)
-    (->titlecase       #x0139)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter l with acute")
+      (japanese-jisx0212         . #x2B4A)     ; 
+      (japanese-jisx0213-1       . #x2A4A)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER L WITH ACUTE")
+      (ucs               . #x0139)     ; Ĺ
+      ))
     (latin-iso8859-2   . #xE5) ; 
-    (ucs               . #x13A)        ; ĺ
+    (ucs               . #x013A)       ; ĺ
     ))
 (define-char
   '((name              . "fullwidth latin small letter l with acute")
-    (->ucs             . #x013A)       ; ĺ
+    (=>ucs             . #x013A)       ; ĺ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x013A)
     (->uppercase
      ((name . "fullwidth latin capital letter l with acute")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter l with acute")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER L WITH ACUTE")
+      (ucs               . #x013A)     ; ĺ
+      ))
     (japanese-jisx0212         . #x2B4A)       ; 
     (japanese-jisx0213-1       . #x2A4A)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004C #x0327)
-    (->lowercase       #x013C)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter l with cedilla")
+      (japanese-jisx0212  . #x2A4C)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER L WITH CEDILLA")
+      (ucs               . #x013C)     ; ļ
+      ))
     (latin-iso8859-4   . #xA6) ; 
-    (ucs               . #x13B)        ; Ļ
+    (ucs               . #x013B)       ; Ļ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER L WITH CEDILLA")
-    (->ucs             . #x013B)       ; Ļ
+  '((name              . "fullwidth latin capital letter l with cedilla")
+    (=>ucs             . #x013B)       ; Ļ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x013B)
     (->lowercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER L WITH CEDILLA")))
+     ((name . "fullwidth latin capital letter l with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER L WITH CEDILLA")
+      (ucs               . #x013B)     ; Ļ
+      ))
     (japanese-jisx0212 . #x2A4C)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006C #x0327)
-    (->uppercase       #x013B)
-    (->titlecase       #x013B)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter l with cedilla")
+      (japanese-jisx0212  . #x2B4C)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER L WITH CEDILLA")
+      (ucs               . #x013B)     ; Ļ
+      ))
     (latin-iso8859-4   . #xB6) ; 
-    (ucs               . #x13C)        ; ļ
+    (ucs               . #x013C)       ; ļ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER L WITH CEDILLA")
-    (->ucs             . #x013C)       ; ļ
+  '((name              . "fullwidth latin small letter l with cedilla")
+    (=>ucs             . #x013C)       ; ļ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x013C)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER L WITH CEDILLA")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER L WITH CEDILLA")))
+     ((name . "fullwidth latin capital letter l with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER L WITH CEDILLA")
+      (ucs               . #x013C)     ; ļ
+      ))
     (japanese-jisx0212 . #x2B4C)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004C #x030C)
-    (->lowercase       #x013E)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter l with caron")
+      (japanese-jisx0212         . #x2A4B)     ; 
+      (japanese-jisx0213-1       . #x2A24)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER L WITH CARON")
+      (ucs               . #x013E)     ; ľ
+      ))
     (latin-iso8859-2   . #xA5) ; 
-    (ucs               . #x13D)        ; Ľ
+    (ucs               . #x013D)       ; Ľ
     ))
 (define-char
   '((name              . "fullwidth latin capital letter l with caron")
-    (->ucs             . #x013D)       ; Ľ
+    (=>ucs             . #x013D)       ; Ľ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x013D)
     (->lowercase
      ((name . "fullwidth latin small letter l with caron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER L WITH CARON")
+      (ucs               . #x013D)     ; Ľ
+      ))
     (japanese-jisx0212         . #x2A4B)       ; 
     (japanese-jisx0213-1       . #x2A24)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006C #x030C)
-    (->uppercase       #x013D)
-    (->titlecase       #x013D)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter l with caron")
+      (japanese-jisx0212         . #x2B4B)     ; 
+      (japanese-jisx0213-1       . #x2A2F)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER L WITH CARON")
+      (ucs               . #x013D)     ; Ľ
+      ))
     (latin-iso8859-2   . #xB5) ; 
-    (ucs               . #x13E)        ; ľ
+    (ucs               . #x013E)       ; ľ
     ))
 (define-char
   '((name              . "fullwidth latin small letter l with caron")
-    (->ucs             . #x013E)       ; ľ
+    (=>ucs             . #x013E)       ; ľ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x013E)
     (->uppercase
      ((name . "fullwidth latin capital letter l with caron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter l with caron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER L WITH CARON")
+      (ucs               . #x013E)     ; ľ
+      ))
     (japanese-jisx0212         . #x2B4B)       ; 
     (japanese-jisx0213-1       . #x2A2F)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   compat #x004C #x00B7)
-    (->lowercase       #x0140)
-    (ucs               . #x13F)        ; Ŀ
+    (->fullwidth
+     ((name . "fullwidth latin capital letter l with middle dot")
+      (korean-ksc5601    . #x2828)     ; 
+      (japanese-jisx0212  . #x2929)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER L WITH MIDDLE DOT")
+      (ucs               . #x0140)     ; ŀ
+      ))
+    (ucs               . #x013F)       ; Ŀ
     ))
 (define-char
-  '((name . "FULLWIDTH LATIN CAPITAL LETTER L WITH MIDDLE DOT")
-    (->ucs             . #x013F)       ; Ŀ
+  '((name . "fullwidth latin capital letter l with middle dot")
+    (=>ucs             . #x013F)       ; Ŀ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x013F)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER L WITH MIDDLE DOT")))
+     ((name . "fullwidth latin small letter l with middle dot")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER L WITH MIDDLE DOT")
+      (ucs               . #x013F)     ; Ŀ
+      ))
     (korean-ksc5601    . #x2828)       ; 
     (japanese-jisx0212 . #x2929)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   compat #x006C #x00B7)
-    (->uppercase       #x013F)
-    (->titlecase       #x013F)
-    (ucs               . #x140)        ; ŀ
+    (->fullwidth
+     ((name              . "fullwidth latin small letter l with middle dot")
+      (korean-ksc5601    . #x2928)     ; 
+      (japanese-jisx0212  . #x2949)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER L WITH MIDDLE DOT")
+      (ucs               . #x013F)     ; Ŀ
+      ))
+    (ucs               . #x0140)       ; ŀ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER L WITH MIDDLE DOT")
-    (->ucs             . #x0140)       ; ŀ
+  '((name              . "fullwidth latin small letter l with middle dot")
+    (=>ucs             . #x0140)       ; ŀ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0140)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER L WITH MIDDLE DOT")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER L WITH MIDDLE DOT")))
+     ((name . "fullwidth latin capital letter l with middle dot")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER L WITH MIDDLE DOT")
+      (ucs               . #x0140)     ; ŀ
+      ))
     (korean-ksc5601    . #x2928)       ; 
     (japanese-jisx0212 . #x2949)       ; 
     ))
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->lowercase       #x0142)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter l with stroke")
+      (korean-ksc5601            . #x2829)     ; 
+      (japanese-jisx0212         . #x2928)     ; 
+      (japanese-jisx0213-1       . #x2A23)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER L WITH STROKE")
+      (ucs               . #x0142)     ; ł
+      ))
     (latin-iso8859-2   . #xA3) ; 
-    (ucs               . #x141)        ; Ł
+    (ucs               . #x0141)       ; Ł
     ))
 (define-char
   '((name              . "fullwidth latin capital letter l with stroke")
-    (->ucs             . #x0141)       ; Ł
+    (=>ucs             . #x0141)       ; Ł
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0141)
     (->lowercase
      ((name . "fullwidth latin small letter l with stroke")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER L WITH STROKE")
+      (ucs               . #x0141)     ; Ł
+      ))
     (korean-ksc5601            . #x2829)       ; 
     (japanese-jisx0212         . #x2928)       ; 
     (japanese-jisx0213-1       . #x2A23)       ; 
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->uppercase       #x0141)
-    (->titlecase       #x0141)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter l with stroke")
+      (korean-ksc5601            . #x2929)     ; 
+      (japanese-jisx0212         . #x2948)     ; 
+      (japanese-jisx0213-1       . #x2A2E)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER L WITH STROKE")
+      (ucs               . #x0141)     ; Ł
+      ))
     (latin-iso8859-2   . #xB3) ; 
-    (ucs               . #x142)        ; ł
+    (ucs               . #x0142)       ; ł
     ))
 (define-char
   '((name              . "fullwidth latin small letter l with stroke")
-    (->ucs             . #x0142)       ; ł
+    (=>ucs             . #x0142)       ; ł
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0142)
     (->uppercase
      ((name . "fullwidth latin capital letter l with stroke")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter l with stroke")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER L WITH STROKE")
+      (ucs               . #x0142)     ; ł
+      ))
     (korean-ksc5601            . #x2929)       ; 
     (japanese-jisx0212         . #x2948)       ; 
     (japanese-jisx0213-1       . #x2A2E)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004E #x0301)
-    (->lowercase       #x0144)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter n with acute")
+      (japanese-jisx0212         . #x2A4D)     ; 
+      (japanese-jisx0213-1       . #x2A41)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER N WITH ACUTE")
+      (ucs               . #x0144)     ; ń
+      ))
     (latin-iso8859-2   . #xD1) ; 
-    (ucs               . #x143)        ; Ń
+    (ucs               . #x0143)       ; Ń
     ))
 (define-char
   '((name              . "fullwidth latin capital letter n with acute")
-    (->ucs             . #x0143)       ; Ń
+    (=>ucs             . #x0143)       ; Ń
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0143)
     (->lowercase
      ((name . "fullwidth latin small letter n with acute")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER N WITH ACUTE")
+      (ucs               . #x0143)     ; Ń
+      ))
     (japanese-jisx0212         . #x2A4D)       ; 
     (japanese-jisx0213-1       . #x2A41)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006E #x0301)
-    (->uppercase       #x0143)
-    (->titlecase       #x0143)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter n with acute")
+      (japanese-jisx0212         . #x2B4D)     ; 
+      (japanese-jisx0213-1       . #x2A51)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER N WITH ACUTE")
+      (ucs               . #x0143)     ; Ń
+      ))
     (latin-iso8859-2   . #xF1) ; 
-    (ucs               . #x144)        ; ń
+    (ucs               . #x0144)       ; ń
     ))
 (define-char
   '((name              . "fullwidth latin small letter n with acute")
-    (->ucs             . #x0144)       ; ń
+    (=>ucs             . #x0144)       ; ń
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0144)
     (->uppercase
      ((name . "fullwidth latin capital letter n with acute")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter n with acute")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER N WITH ACUTE")
+      (ucs               . #x0144)     ; ń
+      ))
     (japanese-jisx0212         . #x2B4D)       ; 
     (japanese-jisx0213-1       . #x2A51)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004E #x0327)
-    (->lowercase       #x0146)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter n with cedilla")
+      (japanese-jisx0212  . #x2A4F)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER N WITH CEDILLA")
+      (ucs               . #x0146)     ; ņ
+      ))
     (latin-iso8859-4   . #xD1) ; 
-    (ucs               . #x145)        ; Ņ
+    (ucs               . #x0145)       ; Ņ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER N WITH CEDILLA")
-    (->ucs             . #x0145)       ; Ņ
+  '((name              . "fullwidth latin capital letter n with cedilla")
+    (=>ucs             . #x0145)       ; Ņ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0145)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER N WITH CEDILLA")))
+     ((name . "fullwidth latin small letter n with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER N WITH CEDILLA")
+      (ucs               . #x0145)     ; Ņ
+      ))
     (japanese-jisx0212 . #x2A4F)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006E #x0327)
-    (->uppercase       #x0145)
-    (->titlecase       #x0145)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter n with cedilla")
+      (japanese-jisx0212  . #x2B4F)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER N WITH CEDILLA")
+      (ucs               . #x0145)     ; Ņ
+      ))
     (latin-iso8859-4   . #xF1) ; 
-    (ucs               . #x146)        ; ņ
+    (ucs               . #x0146)       ; ņ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER N WITH CEDILLA")
-    (->ucs             . #x0146)       ; ņ
+  '((name              . "fullwidth latin small letter n with cedilla")
+    (=>ucs             . #x0146)       ; ņ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0146)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER N WITH CEDILLA")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER N WITH CEDILLA")))
+     ((name . "fullwidth latin capital letter n with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER N WITH CEDILLA")
+      (ucs               . #x0146)     ; ņ
+      ))
     (japanese-jisx0212 . #x2B4F)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004E #x030C)
-    (->lowercase       #x0148)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter n with caron")
+      (japanese-jisx0212         . #x2A4E)     ; 
+      (japanese-jisx0213-1       . #x2A42)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER N WITH CARON")
+      (ucs               . #x0148)     ; ň
+      ))
     (latin-iso8859-2   . #xD2) ; 
-    (ucs               . #x147)        ; Ň
+    (ucs               . #x0147)       ; Ň
     ))
 (define-char
   '((name              . "fullwidth latin capital letter n with caron")
-    (->ucs             . #x0147)       ; Ň
+    (=>ucs             . #x0147)       ; Ň
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0147)
     (->lowercase
      ((name . "fullwidth latin small letter n with caron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER N WITH CARON")
+      (ucs               . #x0147)     ; Ň
+      ))
     (japanese-jisx0212         . #x2A4E)       ; 
     (japanese-jisx0213-1       . #x2A42)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006E #x030C)
-    (->uppercase       #x0147)
-    (->titlecase       #x0147)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter n with caron")
+      (japanese-jisx0212         . #x2B4E)     ; 
+      (japanese-jisx0213-1       . #x2A52)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER N WITH CARON")
+      (ucs               . #x0147)     ; Ň
+      ))
     (latin-iso8859-2   . #xF2) ; 
-    (ucs               . #x148)        ; ň
+    (ucs               . #x0148)       ; ň
     ))
 (define-char
   '((name              . "fullwidth latin small letter n with caron")
-    (->ucs             . #x0148)       ; ň
+    (=>ucs             . #x0148)       ; ň
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0148)
     (->uppercase
      ((name . "fullwidth latin capital letter n with caron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter n with caron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER N WITH CARON")
+      (ucs               . #x0148)     ; ň
+      ))
     (japanese-jisx0212         . #x2B4E)       ; 
     (japanese-jisx0213-1       . #x2A52)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   compat #x02BC #x006E)
-    (ucs               . #x149)        ; ʼn
+    (->fullwidth
+     ((name . "fullwidth latin small letter n preceded by apostrophe")
+      (korean-ksc5601    . #x2930)     ; 
+      (japanese-jisx0212  . #x294A)    ; 
+      ))
+    (ucs               . #x0149)       ; ʼn
     ))
 (define-char
-  '((name . "FULLWIDTH LATIN SMALL LETTER N PRECEDED BY APOSTROPHE")
-    (->ucs             . #x0149)       ; ʼn
+  '((name . "fullwidth latin small letter n preceded by apostrophe")
+    (=>ucs             . #x0149)       ; ʼn
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0149)
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER N PRECEDED BY APOSTROPHE")
+      (ucs               . #x0149)     ; ʼn
+      ))
     (korean-ksc5601    . #x2930)       ; 
     (japanese-jisx0212 . #x294A)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (iso-10646-comment . "Sami")
-    (->lowercase       #x014B)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter eng")
+      (korean-ksc5601    . #x282F)     ; 
+      (japanese-jisx0212  . #x292B)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER ENG")
+      (ucs               . #x014B)     ; ŋ
+      ))
     (latin-iso8859-4   . #xBD) ; 
-    (ucs               . #x14A)        ; Ŋ
+    (ucs               . #x014A)       ; Ŋ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER ENG")
-    (->ucs             . #x014A)       ; Ŋ
+  '((name              . "fullwidth latin capital letter eng")
+    (=>ucs             . #x014A)       ; Ŋ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x014A)
     (->lowercase
      ((name . "FULLWIDTH LATIN SMALL LETTER ENG")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER ENG")
+      (ucs               . #x014A)     ; Ŋ
+      ))
     (korean-ksc5601    . #x282F)       ; 
     (japanese-jisx0212 . #x292B)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (iso-10646-comment . "Sami")
-    (->uppercase       #x014A)
-    (->titlecase       #x014A)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter eng")
+      (korean-ksc5601            . #x292F)     ; 
+      (japanese-jisx0212         . #x294B)     ; 
+      (japanese-jisx0213-1       . #x2A7A)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER ENG")
+      (ucs               . #x014A)     ; Ŋ
+      ))
     (latin-iso8859-4   . #xBF) ; 
     (ipa               . #xD5) ; 
-    (ucs               . #x14B)        ; ŋ
+    (ucs               . #x014B)       ; ŋ
     ))
 (define-char
   '((name              . "fullwidth latin small letter eng")
-    (->ucs             . #x014B)       ; ŋ
+    (=>ucs             . #x014B)       ; ŋ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x014B)
     (->uppercase
      ((name . "fullwidth latin capital letter eng")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter eng")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER ENG")
+      (ucs               . #x014B)     ; ŋ
+      ))
     (korean-ksc5601            . #x292F)       ; 
     (japanese-jisx0212         . #x294B)       ; 
     (japanese-jisx0213-1       . #x2A7A)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004F #x0304)
-    (->lowercase       #x014D)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter o with macron")
+      (japanese-jisx0212         . #x2A57)     ; 
+      (japanese-jisx0213-1       . #x2979)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER O WITH MACRON")
+      (ucs               . #x014D)     ; ō
+      ))
     (latin-iso8859-4   . #xD2) ; 
-    (ucs               . #x14C)        ; Ō
+    (ucs               . #x014C)       ; Ō
     ))
 (define-char
   '((name              . "fullwidth latin capital letter o with macron")
-    (->ucs             . #x014C)       ; Ō
+    (=>ucs             . #x014C)       ; Ō
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x014C)
     (->lowercase
      ((name . "fullwidth latin small letter o with macron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER O WITH MACRON")
+      (ucs               . #x014C)     ; Ō
+      ))
     (japanese-jisx0212         . #x2A57)       ; 
     (japanese-jisx0213-1       . #x2979)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006F #x0304)
-    (->uppercase       #x014C)
-    (->titlecase       #x014C)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter o with macron")
+      (chinese-gb2312            . #x282D)     ; 
+      (japanese-jisx0212         . #x2B57)     ; 
+      (japanese-jisx0213-1       . #x297E)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER O WITH MACRON")
+      (ucs               . #x014C)     ; Ō
+      ))
     (latin-iso8859-4   . #xF2) ; 
-    (ucs               . #x14D)        ; ō
+    (ucs               . #x014D)       ; ō
     ))
 (define-char
   '((name              . "fullwidth latin small letter o with macron")
-    (->ucs             . #x014D)       ; ō
+    (=>ucs             . #x014D)       ; ō
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x014D)
     (->uppercase
      ((name . "fullwidth latin capital letter o with macron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter o with macron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER O WITH MACRON")
+      (ucs               . #x014D)     ; ō
+      ))
     (chinese-gb2312            . #x282D)       ; 
     (japanese-jisx0212         . #x2B57)       ; 
     (japanese-jisx0213-1       . #x297E)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004F #x0306)
-    (->lowercase       #x014F)
-    (ucs               . #x14E)        ; Ŏ
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER O WITH BREVE")
+      (ucs               . #x014F)     ; ŏ
+      ))
+    (ucs               . #x014E)       ; Ŏ
     ))
 (define-char
   '((name              . "LATIN SMALL LETTER O WITH BREVE")
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006F #x0306)
-    (->uppercase       #x014E)
-    (->titlecase       #x014E)
-    (ucs               . #x14F)        ; ŏ
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER O WITH BREVE")
+      (ucs               . #x014E)     ; Ŏ
+      ))
+    (ucs               . #x014F)       ; ŏ
     ))
 (define-char
   '((name              . "LATIN CAPITAL LETTER O WITH DOUBLE ACUTE")
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x004F #x030B)
-    (->lowercase       #x0151)
+    (->fullwidth
+     ((name . "fullwidth latin capital letter o with double acute")
+      (japanese-jisx0212         . #x2A56)     ; 
+      (japanese-jisx0213-1       . #x2A43)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER O WITH DOUBLE ACUTE")
+      (ucs               . #x0151)     ; ő
+      ))
     (latin-iso8859-2   . #xD5) ; 
-    (ucs               . #x150)        ; Ő
+    (ucs               . #x0150)       ; Ő
     ))
 (define-char
   '((name . "fullwidth latin capital letter o with double acute")
-    (->ucs             . #x0150)       ; Ő
+    (=>ucs             . #x0150)       ; Ő
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0150)
     (->lowercase
      ((name . "fullwidth latin small letter o with double acute")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER O WITH DOUBLE ACUTE")
+      (ucs               . #x0150)     ; Ő
+      ))
     (japanese-jisx0212         . #x2A56)       ; 
     (japanese-jisx0213-1       . #x2A43)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x006F #x030B)
-    (->uppercase       #x0150)
-    (->titlecase       #x0150)
+    (->fullwidth
+     ((name . "fullwidth latin small letter o with double acute")
+      (japanese-jisx0212         . #x2B56)     ; 
+      (japanese-jisx0213-1       . #x2A53)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER O WITH DOUBLE ACUTE")
+      (ucs               . #x0150)     ; Ő
+      ))
     (latin-iso8859-2   . #xF5) ; 
-    (ucs               . #x151)        ; ő
+    (ucs               . #x0151)       ; ő
     ))
 (define-char
   '((name . "fullwidth latin small letter o with double acute")
-    (->ucs             . #x0151)       ; ő
+    (=>ucs             . #x0151)       ; ő
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0151)
     (->uppercase
      ((name . "fullwidth latin capital letter o with double acute")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter o with double acute")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER O WITH DOUBLE ACUTE")
+      (ucs               . #x0151)     ; ő
+      ))
     (japanese-jisx0212         . #x2B56)       ; 
     (japanese-jisx0213-1       . #x2A53)       ; 
     ))
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->lowercase       #x0153)
+    (->lowercase
+     ((name              . "LATIN SMALL LIGATURE OE")
+      (ucs               . #x0153)     ; œ
+      ))
     (korean-ksc5601            . #x282B)       ; 
     (japanese-jisx0212         . #x292D)       ; 
     (japanese-jisx0213-1       . #x2B2B)       ; 
-    (ucs                       . #x152)        ; Œ
+    (ucs                       . #x0152)       ; Œ
     ))
 (define-char
   '((name              . "LATIN SMALL LIGATURE OE")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->uppercase       #x0152)
-    (->titlecase       #x0152)
+    (->fullwidth
+     ((name              . "fullwidth latin small ligature oe")
+      (korean-ksc5601            . #x292B)     ; 
+      (japanese-jisx0212         . #x294D)     ; 
+      (japanese-jisx0213-1       . #x2B2A)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LIGATURE OE")
+      (ucs               . #x0152)     ; Œ
+      ))
     (ipa               . #xB0) ; 
-    (ucs               . #x153)        ; œ
+    (ucs               . #x0153)       ; œ
     ))
 (define-char
   '((name              . "fullwidth latin small ligature oe")
-    (->ucs             . #x0153)       ; œ
+    (=>ucs             . #x0153)       ; œ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0153)
     (->uppercase
      ((name . "fullwidth latin capital ligature oe")))
-    (->titlecase
-     ((name . "fullwidth latin capital ligature oe")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LIGATURE OE")
+      (ucs               . #x0153)     ; œ
+      ))
     (korean-ksc5601            . #x292B)       ; 
     (japanese-jisx0212         . #x294D)       ; 
     (japanese-jisx0213-1       . #x2B2A)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0052 #x0301)
-    (->lowercase       #x0155)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter r with acute")
+      (japanese-jisx0212         . #x2A59)     ; 
+      (japanese-jisx0213-1       . #x2A39)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER R WITH ACUTE")
+      (ucs               . #x0155)     ; ŕ
+      ))
     (latin-iso8859-2   . #xC0) ; 
-    (ucs               . #x154)        ; Ŕ
+    (ucs               . #x0154)       ; Ŕ
     ))
 (define-char
   '((name              . "fullwidth latin capital letter r with acute")
-    (->ucs             . #x0154)       ; Ŕ
+    (=>ucs             . #x0154)       ; Ŕ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0154)
     (->lowercase
      ((name . "fullwidth latin small letter r with acute")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER R WITH ACUTE")
+      (ucs               . #x0154)     ; Ŕ
+      ))
     (japanese-jisx0212         . #x2A59)       ; 
     (japanese-jisx0213-1       . #x2A39)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0072 #x0301)
-    (->uppercase       #x0154)
-    (->titlecase       #x0154)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter r with acute")
+      (japanese-jisx0212         . #x2B59)     ; 
+      (japanese-jisx0213-1       . #x2A48)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER R WITH ACUTE")
+      (ucs               . #x0154)     ; Ŕ
+      ))
     (latin-iso8859-2   . #xE0) ; 
-    (ucs               . #x155)        ; ŕ
+    (ucs               . #x0155)       ; ŕ
     ))
 (define-char
   '((name              . "fullwidth latin small letter r with acute")
-    (->ucs             . #x0155)       ; ŕ
+    (=>ucs             . #x0155)       ; ŕ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0155)
     (->uppercase
      ((name . "fullwidth latin capital letter r with acute")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter r with acute")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER R WITH ACUTE")
+      (ucs               . #x0155)     ; ŕ
+      ))
     (japanese-jisx0212         . #x2B59)       ; 
     (japanese-jisx0213-1       . #x2A48)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0052 #x0327)
-    (->lowercase       #x0157)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter r with cedilla")
+      (japanese-jisx0212  . #x2A5B)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER R WITH CEDILLA")
+      (ucs               . #x0157)     ; ŗ
+      ))
     (latin-iso8859-4   . #xA3) ; 
-    (ucs               . #x156)        ; Ŗ
+    (ucs               . #x0156)       ; Ŗ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER R WITH CEDILLA")
-    (->ucs             . #x0156)       ; Ŗ
+  '((name              . "fullwidth latin capital letter r with cedilla")
+    (=>ucs             . #x0156)       ; Ŗ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0156)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER R WITH CEDILLA")))
+     ((name . "fullwidth latin small letter r with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER R WITH CEDILLA")
+      (ucs               . #x0156)     ; Ŗ
+      ))
     (japanese-jisx0212 . #x2A5B)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0072 #x0327)
-    (->uppercase       #x0156)
-    (->titlecase       #x0156)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter r with cedilla")
+      (japanese-jisx0212  . #x2B5B)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER R WITH CEDILLA")
+      (ucs               . #x0156)     ; Ŗ
+      ))
     (latin-iso8859-4   . #xB3) ; 
-    (ucs               . #x157)        ; ŗ
+    (ucs               . #x0157)       ; ŗ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER R WITH CEDILLA")
-    (->ucs             . #x0157)       ; ŗ
+  '((name              . "fullwidth latin small letter r with cedilla")
+    (=>ucs             . #x0157)       ; ŗ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0157)
     (->uppercase
      ((name . "FULLWIDTH LATIN CAPITAL LETTER R WITH CEDILLA")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER R WITH CEDILLA")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER R WITH CEDILLA")
+      (ucs               . #x0157)     ; ŗ
+      ))
     (japanese-jisx0212 . #x2B5B)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0052 #x030C)
-    (->lowercase       #x0159)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter r with caron")
+      (japanese-jisx0212         . #x2A5A)     ; 
+      (japanese-jisx0213-1       . #x2A44)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER R WITH CARON")
+      (ucs               . #x0159)     ; ř
+      ))
     (latin-iso8859-2   . #xD8) ; 
-    (ucs               . #x158)        ; Ř
+    (ucs               . #x0158)       ; Ř
     ))
 (define-char
   '((name              . "fullwidth latin capital letter r with caron")
-    (->ucs             . #x0158)       ; Ř
+    (=>ucs             . #x0158)       ; Ř
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0158)
     (->lowercase
      ((name . "fullwidth latin small letter r with caron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER R WITH CARON")
+      (ucs               . #x0158)     ; Ř
+      ))
     (japanese-jisx0212         . #x2A5A)       ; 
     (japanese-jisx0213-1       . #x2A44)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0072 #x030C)
-    (->uppercase       #x0158)
-    (->titlecase       #x0158)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter r with caron")
+      (japanese-jisx0212         . #x2B5A)     ; 
+      (japanese-jisx0213-1       . #x2A54)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER R WITH CARON")
+      (ucs               . #x0158)     ; Ř
+      ))
     (latin-iso8859-2   . #xF8) ; 
-    (ucs               . #x159)        ; ř
+    (ucs               . #x0159)       ; ř
     ))
 (define-char
   '((name              . "fullwidth latin small letter r with caron")
-    (->ucs             . #x0159)       ; ř
+    (=>ucs             . #x0159)       ; ř
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0159)
     (->uppercase
      ((name . "fullwidth latin capital letter r with caron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter r with caron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER R WITH CARON")
+      (ucs               . #x0159)     ; ř
+      ))
     (japanese-jisx0212         . #x2B5A)       ; 
     (japanese-jisx0213-1       . #x2A54)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0053 #x0301)
-    (->lowercase       #x015B)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter s with acute")
+      (japanese-jisx0212         . #x2A5C)     ; 
+      (japanese-jisx0213-1       . #x2A25)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER S WITH ACUTE")
+      (ucs               . #x015B)     ; ś
+      ))
     (latin-iso8859-2   . #xA6) ; 
-    (ucs               . #x15A)        ; Ś
+    (ucs               . #x015A)       ; Ś
     ))
 (define-char
   '((name              . "fullwidth latin capital letter s with acute")
-    (->ucs             . #x015A)       ; Ś
+    (=>ucs             . #x015A)       ; Ś
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x015A)
     (->lowercase
      ((name . "fullwidth latin small letter s with acute")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER S WITH ACUTE")
+      (ucs               . #x015A)     ; Ś
+      ))
     (japanese-jisx0212         . #x2A5C)       ; 
     (japanese-jisx0213-1       . #x2A25)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0073 #x0301)
-    (->uppercase       #x015A)
-    (->titlecase       #x015A)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter s with acute")
+      (japanese-jisx0212  . #x2B5C)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER S WITH ACUTE")
+      (ucs               . #x015A)     ; Ś
+      ))
     (latin-iso8859-2           . #xB6) ; 
     (japanese-jisx0213-1       . #x2A30)       ; 
-    (ucs                       . #x15B)        ; ś
+    (ucs                       . #x015B)       ; ś
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER S WITH ACUTE")
-    (->ucs             . #x015B)       ; ś
+  '((name              . "fullwidth latin small letter s with acute")
+    (=>ucs             . #x015B)       ; ś
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x015B)
     (->uppercase
      ((name . "FULLWIDTH LATIN CAPITAL LETTER S WITH ACUTE")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER S WITH ACUTE")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER S WITH ACUTE")
+      (ucs               . #x015B)     ; ś
+      ))
     (japanese-jisx0212 . #x2B5C)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0053 #x0302)
-    (->lowercase       #x015D)
+    (->fullwidth
+     ((name . "fullwidth latin capital letter s with circumflex")
+      (japanese-jisx0212         . #x2A5D)     ; 
+      (japanese-jisx0213-1       . #x2A5D)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER S WITH CIRCUMFLEX")
+      (ucs               . #x015D)     ; ŝ
+      ))
     (latin-iso8859-3   . #xDE) ; 
-    (ucs               . #x15C)        ; Ŝ
+    (ucs               . #x015C)       ; Ŝ
     ))
 (define-char
   '((name . "fullwidth latin capital letter s with circumflex")
-    (->ucs             . #x015C)       ; Ŝ
+    (=>ucs             . #x015C)       ; Ŝ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x015C)
     (->lowercase
      ((name . "fullwidth latin small letter s with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER S WITH CIRCUMFLEX")
+      (ucs               . #x015C)     ; Ŝ
+      ))
     (japanese-jisx0212         . #x2A5D)       ; 
     (japanese-jisx0213-1       . #x2A5D)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0073 #x0302)
-    (->uppercase       #x015C)
-    (->titlecase       #x015C)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter s with circumflex")
+      (japanese-jisx0212         . #x2B5D)     ; 
+      (japanese-jisx0213-1       . #x2A63)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER S WITH CIRCUMFLEX")
+      (ucs               . #x015C)     ; Ŝ
+      ))
     (latin-iso8859-3   . #xFE) ; 
-    (ucs               . #x15D)        ; ŝ
+    (ucs               . #x015D)       ; ŝ
     ))
 (define-char
   '((name              . "fullwidth latin small letter s with circumflex")
-    (->ucs             . #x015D)       ; ŝ
+    (=>ucs             . #x015D)       ; ŝ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x015D)
     (->uppercase
      ((name . "fullwidth latin capital letter s with circumflex")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter s with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER S WITH CIRCUMFLEX")
+      (ucs               . #x015D)     ; ŝ
+      ))
     (japanese-jisx0212         . #x2B5D)       ; 
     (japanese-jisx0213-1       . #x2A63)       ; 
     ))
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (iso-10646-comment . "*")
     (->decomposition   #x0053 #x0327)
-    (->lowercase       #x015F)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter s with cedilla")
+      (japanese-jisx0212         . #x2A5F)     ; 
+      (japanese-jisx0213-1       . #x2A27)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER S WITH CEDILLA")
+      (ucs               . #x015F)     ; ş
+      ))
     (latin-iso8859-2   . #xAA) ; 
     (latin-iso8859-3   . #xAA) ; 
     (latin-iso8859-9   . #xDE) ; 
-    (ucs               . #x15E)        ; Ş
+    (ucs               . #x015E)       ; Ş
     ))
 (define-char
   '((name              . "fullwidth latin capital letter s with cedilla")
-    (->ucs             . #x015E)       ; Ş
+    (=>ucs             . #x015E)       ; Ş
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (iso-10646-comment . "*")
     (->decomposition   wide #x015E)
     (->lowercase
      ((name . "fullwidth latin small letter s with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER S WITH CEDILLA")
+      (ucs               . #x015E)     ; Ş
+      ))
     (japanese-jisx0212         . #x2A5F)       ; 
     (japanese-jisx0213-1       . #x2A27)       ; 
     ))
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (iso-10646-comment . "*")
     (->decomposition   #x0073 #x0327)
-    (->uppercase       #x015E)
-    (->titlecase       #x015E)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter s with cedilla")
+      (japanese-jisx0212         . #x2B5F)     ; 
+      (japanese-jisx0213-1       . #x2A33)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER S WITH CEDILLA")
+      (ucs               . #x015E)     ; Ş
+      ))
     (latin-iso8859-2   . #xBA) ; 
     (latin-iso8859-3   . #xBA) ; 
     (latin-iso8859-9   . #xFE) ; 
-    (ucs               . #x15F)        ; ş
+    (ucs               . #x015F)       ; ş
     ))
 (define-char
   '((name              . "fullwidth latin small letter s with cedilla")
-    (->ucs             . #x015F)       ; ş
+    (=>ucs             . #x015F)       ; ş
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (iso-10646-comment . "*")
     (->decomposition   wide #x015F)
     (->uppercase
      ((name . "fullwidth latin capital letter s with cedilla")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter s with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER S WITH CEDILLA")
+      (ucs               . #x015F)     ; ş
+      ))
     (japanese-jisx0212         . #x2B5F)       ; 
     (japanese-jisx0213-1       . #x2A33)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0053 #x030C)
-    (->lowercase       #x0161)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter s with caron")
+      (japanese-jisx0212         . #x2A5E)     ; 
+      (japanese-jisx0213-1       . #x2A26)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER S WITH CARON")
+      (ucs               . #x0161)     ; š
+      ))
     (latin-iso8859-2   . #xA9) ; 
     (latin-iso8859-4   . #xA9) ; 
-    (ucs               . #x160)        ; Š
+    (ucs               . #x0160)       ; Š
     ))
 (define-char
   '((name              . "fullwidth latin capital letter s with caron")
-    (->ucs             . #x0160)       ; Š
+    (=>ucs             . #x0160)       ; Š
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0160)
     (->lowercase
      ((name . "fullwidth latin small letter s with caron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER S WITH CARON")
+      (ucs               . #x0160)     ; Š
+      ))
     (japanese-jisx0212         . #x2A5E)       ; 
     (japanese-jisx0213-1       . #x2A26)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0073 #x030C)
-    (->uppercase       #x0160)
-    (->titlecase       #x0160)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter s with caron")
+      (japanese-jisx0212         . #x2B5E)     ; 
+      (japanese-jisx0213-1       . #x2A32)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER S WITH CARON")
+      (ucs               . #x0160)     ; Š
+      ))
     (latin-iso8859-2   . #xB9) ; 
     (latin-iso8859-4   . #xB9) ; 
-    (ucs               . #x161)        ; š
+    (ucs               . #x0161)       ; š
     ))
 (define-char
   '((name              . "fullwidth latin small letter s with caron")
-    (->ucs             . #x0161)       ; š
+    (=>ucs             . #x0161)       ; š
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0161)
     (->uppercase
      ((name . "fullwidth latin capital letter s with caron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter s with caron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER S WITH CARON")
+      (ucs               . #x0161)     ; š
+      ))
     (japanese-jisx0212         . #x2B5E)       ; 
     (japanese-jisx0213-1       . #x2A32)       ; 
     ))
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (iso-10646-comment . "*")
     (->decomposition   #x0054 #x0327)
-    (->lowercase       #x0163)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter t with cedilla")
+      (japanese-jisx0212         . #x2A61)     ; 
+      (japanese-jisx0213-1       . #x2A47)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER T WITH CEDILLA")
+      (ucs               . #x0163)     ; ţ
+      ))
     (latin-iso8859-2   . #xDE) ; 
-    (ucs               . #x162)        ; Ţ
+    (ucs               . #x0162)       ; Ţ
     ))
 (define-char
   '((name              . "fullwidth latin capital letter t with cedilla")
-    (->ucs             . #x0162)       ; Ţ
+    (=>ucs             . #x0162)       ; Ţ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (iso-10646-comment . "*")
     (->decomposition   wide #x0162)
     (->lowercase
      ((name . "fullwidth latin small letter t with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER T WITH CEDILLA")
+      (ucs               . #x0162)     ; Ţ
+      ))
     (japanese-jisx0212         . #x2A61)       ; 
     (japanese-jisx0213-1       . #x2A47)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0074 #x0327)
-    (->uppercase       #x0162)
-    (->titlecase       #x0162)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter t with cedilla")
+      (japanese-jisx0212         . #x2B61)     ; 
+      (japanese-jisx0213-1       . #x2A57)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER T WITH CEDILLA")
+      (ucs               . #x0162)     ; Ţ
+      ))
     (latin-iso8859-2   . #xFE) ; 
-    (ucs               . #x163)        ; ţ
+    (ucs               . #x0163)       ; ţ
     ))
 (define-char
   '((name              . "fullwidth latin small letter t with cedilla")
-    (->ucs             . #x0163)       ; ţ
+    (=>ucs             . #x0163)       ; ţ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0163)
     (->uppercase
      ((name . "fullwidth latin capital letter t with cedilla")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter t with cedilla")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER T WITH CEDILLA")
+      (ucs               . #x0163)     ; ţ
+      ))
     (japanese-jisx0212         . #x2B61)       ; 
     (japanese-jisx0213-1       . #x2A57)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0054 #x030C)
-    (->lowercase       #x0165)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter t with caron")
+      (japanese-jisx0212         . #x2A60)     ; 
+      (japanese-jisx0213-1       . #x2A28)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER T WITH CARON")
+      (ucs               . #x0165)     ; ť
+      ))
     (latin-iso8859-2   . #xAB) ; 
-    (ucs               . #x164)        ; Ť
+    (ucs               . #x0164)       ; Ť
     ))
 (define-char
   '((name              . "fullwidth latin capital letter t with caron")
-    (->ucs             . #x0164)       ; Ť
+    (=>ucs             . #x0164)       ; Ť
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0164)
     (->lowercase
      ((name . "fullwidth latin capital letter t with caron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER T WITH CARON")
+      (ucs               . #x0164)     ; Ť
+      ))
     (japanese-jisx0212         . #x2A60)       ; 
     (japanese-jisx0213-1       . #x2A28)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0074 #x030C)
-    (->uppercase       #x0164)
-    (->titlecase       #x0164)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter t with caron")
+      (japanese-jisx0212         . #x2B60)     ; 
+      (japanese-jisx0213-1       . #x2A34)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER T WITH CARON")
+      (ucs               . #x0164)     ; Ť
+      ))
     (latin-iso8859-2   . #xBB) ; 
-    (ucs               . #x165)        ; ť
+    (ucs               . #x0165)       ; ť
     ))
 (define-char
   '((name              . "fullwidth latin small letter t with caron")
-    (->ucs             . #x0165)       ; ť
+    (=>ucs             . #x0165)       ; ť
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0165)
     (->uppercase
      ((name . "fullwidth latin capital letter t with caron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter t with caron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER T WITH CARON")
+      (ucs               . #x0165)     ; ť
+      ))
     (japanese-jisx0212         . #x2B60)       ; 
     (japanese-jisx0213-1       . #x2A34)       ; 
     ))
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->lowercase       #x0167)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter t with stroke")
+      (korean-ksc5601    . #x282E)     ; 
+      (japanese-jisx0212  . #x292F)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER T WITH STROKE")
+      (ucs               . #x0167)     ; ŧ
+      ))
     (latin-iso8859-4   . #xAC) ; 
-    (ucs               . #x166)        ; Ŧ
+    (ucs               . #x0166)       ; Ŧ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER T WITH STROKE")
-    (->ucs             . #x0166)       ; Ŧ
+  '((name              . "fullwidth latin capital letter t with stroke")
+    (=>ucs             . #x0166)       ; Ŧ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0166)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER T WITH STROKE")))
+     ((name . "fullwidth latin small letter t with stroke")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER T WITH STROKE")
+      (ucs               . #x0166)     ; Ŧ
+      ))
     (korean-ksc5601    . #x282E)       ; 
     (japanese-jisx0212 . #x292F)       ; 
     ))
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->uppercase       #x0166)
-    (->titlecase       #x0166)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter t with stroke")
+      (korean-ksc5601    . #x292E)     ; 
+      (japanese-jisx0212  . #x294F)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER T WITH STROKE")
+      (ucs               . #x0166)     ; Ŧ
+      ))
     (latin-iso8859-4   . #xBC) ; 
-    (ucs               . #x167)        ; ŧ
+    (ucs               . #x0167)       ; ŧ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER T WITH STROKE")
-    (->ucs             . #x0167)       ; ŧ
+  '((name              . "fullwidth latin small letter t with stroke")
+    (=>ucs             . #x0167)       ; ŧ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0167)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER T WITH STROKE")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER T WITH STROKE")))
+     ((name . "fullwidth latin capital letter t with stroke")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER T WITH STROKE")
+      (ucs               . #x0167)     ; ŧ
+      ))
     (korean-ksc5601    . #x292E)       ; 
     (japanese-jisx0212 . #x294F)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0055 #x0303)
-    (->lowercase       #x0169)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter u with tilde")
+      (japanese-jisx0212  . #x2A6C)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER U WITH TILDE")
+      (ucs               . #x0169)     ; ũ
+      ))
     (latin-iso8859-4           . #xDD) ; 
     (latin-viscii-upper                . #xFB) ; 
     (latin-viscii              . #x9D) ; 
-    (ucs                       . #x168)        ; Ũ
+    (ucs                       . #x0168)       ; Ũ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER U WITH TILDE")
-    (->ucs             . #x0168)       ; Ũ
+  '((name              . "fullwidth latin capital letter u with tilde")
+    (=>ucs             . #x0168)       ; Ũ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0168)
     (->lowercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER U WITH TILDE")))
+     ((name . "fullwidth latin capital letter u with tilde")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER U WITH TILDE")
+      (ucs               . #x0168)     ; Ũ
+      ))
     (japanese-jisx0212 . #x2A6C)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0075 #x0303)
-    (->uppercase       #x0168)
-    (->titlecase       #x0168)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter u with tilde")
+      (japanese-jisx0212  . #x2B6C)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER U WITH TILDE")
+      (ucs               . #x0168)     ; Ũ
+      ))
     (latin-iso8859-4           . #xFD) ; 
     (latin-tcvn5712            . #xF2) ; 
     (latin-viscii-lower                . #xFB) ; 
     (latin-viscii              . #xFB) ; 
-    (ucs                       . #x169)        ; ũ
+    (ucs                       . #x0169)       ; ũ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER U WITH TILDE")
-    (->ucs             . #x0169)       ; ũ
+  '((name              . "fullwidth latin small letter u with tilde")
+    (=>ucs             . #x0169)       ; ũ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0169)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER U WITH TILDE")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER U WITH TILDE")))
+     ((name . "fullwidth latin capital letter u with tilde")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER U WITH TILDE")
+      (ucs               . #x0169)     ; ũ
+      ))
     (japanese-jisx0212 . #x2B6C)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0055 #x0304)
-    (->lowercase       #x016B)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter u with macron")
+      (japanese-jisx0212  . #x2A69)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER U WITH MACRON")
+      (ucs               . #x016B)     ; ū
+      ))
     (latin-iso8859-4   . #xDE) ; 
-    (ucs               . #x16A)        ; Ū
+    (ucs               . #x016A)       ; Ū
     ))
 (define-char
   '((name              . "fullwidth latin capital letter u with macron")
-    (->ucs             . #x016A)       ; Ū
+    (=>ucs             . #x016A)       ; Ū
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x016A)
     (->lowercase
      ((name . "fullwidth latin small letter u with macron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER U WITH MACRON")
+      (ucs               . #x016A)     ; Ū
+      ))
     (japanese-jisx0213 . 10615)
     (japanese-jisx0212 . #x2A69)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0075 #x0304)
-    (->uppercase       #x016A)
-    (->titlecase       #x016A)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter u with macron")
+      (chinese-gb2312            . #x2831)     ; 
+      (japanese-jisx0212         . #x2B69)     ; 
+      (japanese-jisx0213-1       . #x297C)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER U WITH MACRON")
+      (ucs               . #x016A)     ; Ū
+      ))
     (latin-iso8859-4   . #xFE) ; 
-    (ucs               . #x16B)        ; ū
+    (ucs               . #x016B)       ; ū
     ))
 (define-char
   '((name              . "fullwidth latin small letter u with macron")
-    (->ucs             . #x016B)       ; ū
+    (=>ucs             . #x016B)       ; ū
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x016B)
     (->uppercase
      ((name . "fullwidth latin capital letter u with macron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter u with macron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER U WITH MACRON")
+      (ucs               . #x016B)     ; ū
+      ))
     (chinese-gb2312            . #x2831)       ; 
     (japanese-jisx0212         . #x2B69)       ; 
     (japanese-jisx0213-1       . #x297C)       ; 
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0055 #x0306)
-    (->lowercase       #x016D)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter u with breve")
+      (japanese-jisx0212         . #x2A66)     ; 
+      (japanese-jisx0213-1       . #x2A5E)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER U WITH BREVE")
+      (ucs               . #x016D)     ; ŭ
+      ))
     (latin-iso8859-3   . #xDD) ; 
-    (ucs               . #x16C)        ; Ŭ
+    (ucs               . #x016C)       ; Ŭ
     ))
 (define-char
   '((name              . "fullwidth latin capital letter u with breve")
-    (->ucs             . #x016C)       ; Ŭ
+    (=>ucs             . #x016C)       ; Ŭ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x016C)
     (->lowercase
      ((name . "fullwidth latin small letter u with breve")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER U WITH BREVE")
+      (ucs               . #x016C)     ; Ŭ
+      ))
     (japanese-jisx0212         . #x2A66)       ; 
     (japanese-jisx0213-1       . #x2A5E)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0075 #x0306)
-    (->uppercase       #x016C)
-    (->titlecase       #x016C)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter u with breve")
+      (japanese-jisx0212         . #x2B66)     ; 
+      (japanese-jisx0213-1       . #x2A64)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER U WITH BREVE")
+      (ucs               . #x016C)     ; Ŭ
+      ))
     (latin-iso8859-3   . #xFD) ; 
-    (ucs               . #x16D)        ; ŭ
+    (ucs               . #x016D)       ; ŭ
     ))
 (define-char
   '((name              . "fullwidth latin small letter u with breve")
-    (->ucs             . #x016D)       ; ŭ
+    (=>ucs             . #x016D)       ; ŭ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x016D)
     (->uppercase
      ((name . "fullwidth latin capital letter u with breve")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter u with breve")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER U WITH BREVE")
+      (ucs               . #x016D)     ; ŭ
+      ))
     (japanese-jisx0212         . #x2B66)       ; 
     (japanese-jisx0213-1       . #x2A64)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0055 #x030A)
-    (->lowercase       #x016F)
+    (->fullwidth
+     ((name . "fullwidth latin capital letter u with ring above")
+      (japanese-jisx0212         . #x2A6B)     ; 
+      (japanese-jisx0213-1       . #x2A45)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER U WITH RING ABOVE")
+      (ucs               . #x016F)     ; ů
+      ))
     (latin-iso8859-2   . #xD9) ; 
-    (ucs               . #x16E)        ; Ů
+    (ucs               . #x016E)       ; Ů
     ))
 (define-char
   '((name . "fullwidth latin capital letter u with ring above")
-    (->ucs             . #x016E)       ; Ů
+    (=>ucs             . #x016E)       ; Ů
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x016E)
     (->lowercase
      ((name . "fullwidth latin small letter u with ring above")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER U WITH RING ABOVE")
+      (ucs               . #x016E)     ; Ů
+      ))
     (japanese-jisx0212         . #x2A6B)       ; 
     (japanese-jisx0213-1       . #x2A45)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0075 #x030A)
-    (->uppercase       #x016E)
-    (->titlecase       #x016E)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter u with ring above")
+      (japanese-jisx0212         . #x2B6B)     ; 
+      (japanese-jisx0213-1       . #x2A55)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER U WITH RING ABOVE")
+      (ucs               . #x016E)     ; Ů
+      ))
     (latin-iso8859-2   . #xF9) ; 
-    (ucs               . #x16F)        ; ů
+    (ucs               . #x016F)       ; ů
     ))
 (define-char
   '((name              . "fullwidth latin small letter u with ring above")
-    (->ucs             . #x016F)       ; ů
+    (=>ucs             . #x016F)       ; ů
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x016F)
     (->uppercase
      ((name . "fullwidth latin capital letter u with ring above")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter u with ring above")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER U WITH RING ABOVE")
+      (ucs               . #x016F)     ; ů
+      ))
     (japanese-jisx0212         . #x2B6B)       ; 
     (japanese-jisx0213-1       . #x2A55)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0055 #x030B)
-    (->lowercase       #x0171)
+    (->fullwidth
+     ((name . "fullwidth latin capital letter u with double acute")
+      (japanese-jisx0212         . #x2A68)     ; 
+      (japanese-jisx0213-1       . #x2A46)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER U WITH DOUBLE ACUTE")
+      (ucs               . #x0171)     ; ű
+      ))
     (latin-iso8859-2   . #xDB) ; 
-    (ucs               . #x170)        ; Ű
+    (ucs               . #x0170)       ; Ű
     ))
 (define-char
   '((name . "fullwidth latin capital letter u with double acute")
-    (->ucs             . #x0170)       ; Ű
+    (=>ucs             . #x0170)       ; Ű
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0170)
     (->lowercase
      ((name . "fullwidth latin small letter u with double acute")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER U WITH DOUBLE ACUTE")
+      (ucs               . #x0170)     ; Ű
+      ))
     (japanese-jisx0212         . #x2A68)       ; 
     (japanese-jisx0213-1       . #x2A46)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0075 #x030B)
-    (->uppercase       #x0170)
-    (->titlecase       #x0170)
+    (->fullwidth
+     ((name . "fullwidth latin small letter u with double acute")
+      (japanese-jisx0212         . #x2B68)     ; 
+      (japanese-jisx0213-1       . #x2A56)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER U WITH DOUBLE ACUTE")
+      (ucs               . #x0170)     ; Ű
+      ))
     (latin-iso8859-2   . #xFB) ; 
-    (ucs               . #x171)        ; ű
+    (ucs               . #x0171)       ; ű
     ))
 (define-char
   '((name . "fullwidth latin small letter u with double acute")
-    (->ucs             . #x0171)       ; ű
+    (=>ucs             . #x0171)       ; ű
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0171)
     (->uppercase
      ((name . "fullwidth latin capital letter u with double acute")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter u with double acute")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER U WITH DOUBLE ACUTE")
+      (ucs               . #x0171)     ; ű
+      ))
     (japanese-jisx0212         . #x2B68)       ; 
     (japanese-jisx0213-1       . #x2A56)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0055 #x0328)
-    (->lowercase       #x0173)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter u with ogonek")
+      (japanese-jisx0212  . #x2A6A)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER U WITH OGONEK")
+      (ucs               . #x0173)     ; ų
+      ))
     (latin-iso8859-4   . #xD9) ; 
-    (ucs               . #x172)        ; Ų
+    (ucs               . #x0172)       ; Ų
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER U WITH OGONEK")
-    (->ucs             . #x0172)       ; Ų
+  '((name              . "fullwidth latin capital letter u with ogonek")
+    (=>ucs             . #x0172)       ; Ų
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0172)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER U WITH OGONEK")))
+     ((name . "fullwidth latin small letter u with ogonek")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER U WITH OGONEK")
+      (ucs               . #x0172)     ; Ų
+      ))
     (japanese-jisx0212 . #x2A6A)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0075 #x0328)
-    (->uppercase       #x0172)
-    (->titlecase       #x0172)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter u with ogonek")
+      (japanese-jisx0212  . #x2B6A)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER U WITH OGONEK")
+      (ucs               . #x0172)     ; Ų
+      ))
     (latin-iso8859-4   . #xF9) ; 
-    (ucs               . #x173)        ; ų
+    (ucs               . #x0173)       ; ų
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER U WITH OGONEK")
-    (->ucs             . #x0173)       ; ų
+  '((name              . "fullwidth latin small letter u with ogonek")
+    (=>ucs             . #x0173)       ; ų
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0173)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER U WITH OGONEK")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER U WITH OGONEK")))
+     ((name . "fullwidth latin capital letter u with ogonek")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER U WITH OGONEK")
+      (ucs               . #x0173)     ; ų
+      ))
     (japanese-jisx0212 . #x2B6A)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0057 #x0302)
-    (->lowercase       #x0175)
-    (ucs               . #x174)        ; Ŵ
+    (->fullwidth
+     ((name . "fullwidth latin capital letter w with circumflex")
+      (japanese-jisx0212  . #x2A71)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER W WITH CIRCUMFLEX")
+      (ucs               . #x0175)     ; ŵ
+      ))
+    (ucs               . #x0174)       ; Ŵ
     ))
 (define-char
-  '((name . "FULLWIDTH LATIN CAPITAL LETTER W WITH CIRCUMFLEX")
-    (->ucs             . #x0174)       ; Ŵ
+  '((name . "fullwidth latin capital letter w with circumflex")
+    (=>ucs             . #x0174)       ; Ŵ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0174)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER W WITH CIRCUMFLEX")))
+     ((name . "fullwidth latin small letter w with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER W WITH CIRCUMFLEX")
+      (ucs               . #x0174)     ; Ŵ
+      ))
     (japanese-jisx0212 . #x2A71)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0077 #x0302)
-    (->uppercase       #x0174)
-    (->titlecase       #x0174)
-    (ucs               . #x175)        ; ŵ
+    (->fullwidth
+     ((name              . "fullwidth latin small letter w with circumflex")
+      (japanese-jisx0212  . #x2B71)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER W WITH CIRCUMFLEX")
+      (ucs               . #x0174)     ; Ŵ
+      ))
+    (ucs               . #x0175)       ; ŵ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER W WITH CIRCUMFLEX")
-    (->ucs             . #x0175)       ; ŵ
+  '((name              . "fullwidth latin small letter w with circumflex")
+    (=>ucs             . #x0175)       ; ŵ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0175)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER W WITH CIRCUMFLEX")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER W WITH CIRCUMFLEX")))
+     ((name . "fullwidth latin capital letter w with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER W WITH CIRCUMFLEX")
+      (ucs               . #x0175)     ; ŵ
+      ))
     (japanese-jisx0212 . #x2B71)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0059 #x0302)
-    (->lowercase       #x0177)
-    (ucs               . #x176)        ; Ŷ
+    (->fullwidth
+     ((name . "fullwidth latin capital letter y with circumflex")
+      (japanese-jisx0212  . #x2A74)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER Y WITH CIRCUMFLEX")
+      (ucs               . #x0177)     ; ŷ
+      ))
+    (ucs               . #x0176)       ; Ŷ
     ))
 (define-char
-  '((name . "FULLWIDTH LATIN CAPITAL LETTER Y WITH CIRCUMFLEX")
-    (->ucs             . #x0176)       ; Ŷ
+  '((name . "fullwidth latin capital letter y with circumflex")
+    (=>ucs             . #x0176)       ; Ŷ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0176)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER Y WITH CIRCUMFLEX")))
+     ((name . "fullwidth latin small letter y with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER Y WITH CIRCUMFLEX")
+      (ucs               . #x0176)     ; Ŷ
+      ))
     (japanese-jisx0212 . #x2A74)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0079 #x0302)
-    (->uppercase       #x0176)
-    (->titlecase       #x0176)
-    (ucs               . #x177)        ; ŷ
+    (->fullwidth
+     ((name              . "fullwidth latin small letter y with circumflex")
+      (japanese-jisx0212  . #x2B74)    ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER Y WITH CIRCUMFLEX")
+      (ucs               . #x0176)     ; Ŷ
+      ))
+    (ucs               . #x0177)       ; ŷ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN SMALL LETTER Y WITH CIRCUMFLEX")
-    (->ucs             . #x0177)       ; ŷ
+  '((name              . "fullwidth latin small letter y with circumflex")
+    (=>ucs             . #x0177)       ; ŷ
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0177)
     (->uppercase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER Y WITH CIRCUMFLEX")))
-    (->titlecase
-     ((name . "FULLWIDTH LATIN CAPITAL LETTER Y WITH CIRCUMFLEX")))
+     ((name . "fullwidth latin capital letter y with circumflex")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER Y WITH CIRCUMFLEX")
+      (ucs               . #x0177)     ; ŷ
+      ))
     (japanese-jisx0212 . #x2B74)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x0059 #x0308)
-    (->lowercase       #x00FF)
-    (ucs               . #x178)        ; Ÿ
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter y with diaeresis")
+      (japanese-jisx0212  . #x2A73)    ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER Y WITH DIAERESIS")
+      (ucs               . #x00FF)     ; ÿ
+      ))
+    (ucs               . #x0178)       ; Ÿ
     ))
 (define-char
-  '((name              . "FULLWIDTH LATIN CAPITAL LETTER Y WITH DIAERESIS")
-    (->ucs             . #x0178)       ; Ÿ
+  '((name              . "fullwidth latin capital letter y with diaeresis")
+    (=>ucs             . #x0178)       ; Ÿ
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0178)
     (->lowercase
-     ((name . "FULLWIDTH LATIN SMALL LETTER Y WITH DIAERESIS")))
+     ((name . "fullwidth latin small letter y with diaeresis")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER Y WITH DIAERESIS")
+      (ucs               . #x0178)     ; Ÿ
+      ))
     (japanese-jisx0212 . #x2A73)       ; 
     ))
 (define-char
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x005A #x0301)
-    (->lowercase       #x017A)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter z with acute")
+      (japanese-jisx0212         . #x2A75)     ; 
+      (japanese-jisx0213-1       . #x2A29)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER Z WITH ACUTE")
+      (ucs               . #x017A)     ; ź
+      ))
     (latin-iso8859-2   . #xAC) ; 
-    (ucs               . #x179)        ; Ź
+    (ucs               . #x0179)       ; Ź
     ))
 (define-char
   '((name              . "fullwidth latin capital letter z with acute")
-    (->ucs             . #x0179)       ; Ź
+    (=>ucs             . #x0179)       ; Ź
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x0179)
     (->lowercase
      ((name . "fullwidth latin small letter z with acute")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER Z WITH ACUTE")
+      (ucs               . #x0179)     ; Ź
+      ))
     (japanese-jisx0212         . #x2A75)       ; 
     (japanese-jisx0213-1       . #x2A29)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x007A #x0301)
-    (->uppercase       #x0179)
-    (->titlecase       #x0179)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter z with acute")
+      (japanese-jisx0212         . #x2B75)     ; 
+      (japanese-jisx0213-1       . #x2A35)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER Z WITH ACUTE")
+      (ucs               . #x0179)     ; Ź
+      ))
     (latin-iso8859-2   . #xBC) ; 
-    (ucs               . #x17A)        ; ź
+    (ucs               . #x017A)       ; ź
     ))
 (define-char
   '((name              . "fullwidth latin small letter z with acute")
-    (->ucs             . #x017A)       ; ź
+    (=>ucs             . #x017A)       ; ź
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x017A)
     (->uppercase
      ((name . "fullwidth latin capital letter z with acute")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter z with acute")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER Z WITH ACUTE")
+      (ucs               . #x017A)     ; ź
+      ))
     (japanese-jisx0212         . #x2B75)       ; 
     (japanese-jisx0213-1       . #x2A35)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x005A #x0307)
-    (->lowercase       #x017C)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter z with dot above")
+      (japanese-jisx0212         . #x2A77)     ; 
+      (japanese-jisx0213-1       . #x2A2B)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER Z WITH DOT ABOVE")
+      (ucs               . #x017C)     ; ż
+      ))
     (latin-iso8859-2   . #xAF) ; 
     (latin-iso8859-3   . #xAF) ; 
-    (ucs               . #x17B)        ; Ż
+    (ucs               . #x017B)       ; Ż
     ))
 (define-char
   '((name              . "fullwidth latin capital letter z with dot above")
-    (->ucs             . #x017B)       ; Ż
+    (=>ucs             . #x017B)       ; Ż
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x017B)
     (->lowercase
      ((name . "fullwidth latin small letter z with dot above")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER Z WITH DOT ABOVE")
+      (ucs               . #x017B)     ; Ż
+      ))
     (japanese-jisx0212         . #x2A77)       ; 
     (japanese-jisx0213-1       . #x2A2B)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x007A #x0307)
-    (->uppercase       #x017B)
-    (->titlecase       #x017B)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter z with dot above")
+      (japanese-jisx0212         . #x2B77)     ; 
+      (japanese-jisx0213-1       . #x2A38)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER Z WITH DOT ABOVE")
+      (ucs               . #x017B)     ; Ż
+      ))
     (latin-iso8859-2   . #xBF) ; 
     (latin-iso8859-3   . #xBF) ; 
-    (ucs               . #x17C)        ; ż
+    (ucs               . #x017C)       ; ż
     ))
 (define-char
   '((name              . "fullwidth latin small letter z with dot above")
-    (->ucs             . #x017C)       ; ż
+    (=>ucs             . #x017C)       ; ż
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x017C)
     (->uppercase
      ((name . "fullwidth latin capital letter z with dot above")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter z with dot above")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER Z WITH DOT ABOVE")
+      (ucs               . #x017C)     ; ż
+      ))
     (japanese-jisx0212         . #x2B77)       ; 
     (japanese-jisx0213-1       . #x2A38)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x005A #x030C)
-    (->lowercase       #x017E)
+    (->fullwidth
+     ((name              . "fullwidth latin capital letter z with caron")
+      (japanese-jisx0212         . #x2A76)     ; 
+      (japanese-jisx0213-1       . #x2A2A)     ; 
+      ))
+    (->lowercase
+     ((name              . "LATIN SMALL LETTER Z WITH CARON")
+      (ucs               . #x017E)     ; ž
+      ))
     (latin-iso8859-2   . #xAE) ; 
     (latin-iso8859-4   . #xAE) ; 
-    (ucs               . #x17D)        ; Ž
+    (ucs               . #x017D)       ; Ž
     ))
 (define-char
   '((name              . "fullwidth latin capital letter z with caron")
-    (->ucs             . #x017D)       ; Ž
+    (=>ucs             . #x017D)       ; Ž
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x017D)
     (->lowercase
      ((name . "fullwidth latin small letter z with caron")))
+    (<-fullwidth
+     ((name              . "LATIN CAPITAL LETTER Z WITH CARON")
+      (ucs               . #x017D)     ; Ž
+      ))
     (japanese-jisx0212         . #x2A76)       ; 
     (japanese-jisx0213-1       . #x2A2A)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   #x007A #x030C)
-    (->uppercase       #x017D)
-    (->titlecase       #x017D)
+    (->fullwidth
+     ((name              . "fullwidth latin small letter z with caron")
+      (japanese-jisx0212         . #x2B76)     ; 
+      (japanese-jisx0213-1       . #x2A37)     ; 
+      ))
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER Z WITH CARON")
+      (ucs               . #x017D)     ; Ž
+      ))
     (latin-iso8859-2   . #xBE) ; 
     (latin-iso8859-4   . #xBE) ; 
-    (ucs               . #x17E)        ; ž
+    (ucs               . #x017E)       ; ž
     ))
 (define-char
   '((name              . "fullwidth latin small letter z with caron")
-    (->ucs             . #x017E)       ; ž
+    (=>ucs             . #x017E)       ; ž
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   wide #x017E)
     (->uppercase
      ((name . "fullwidth latin capital letter z with caron")))
-    (->titlecase
-     ((name . "fullwidth latin capital letter z with caron")))
+    (<-fullwidth
+     ((name              . "LATIN SMALL LETTER Z WITH CARON")
+      (ucs               . #x017E)     ; ž
+      ))
     (japanese-jisx0212         . #x2B76)       ; 
     (japanese-jisx0213-1       . #x2A37)       ; 
     ))
     (bidi-category     . "L")
     (mirrored          . nil)
     (->decomposition   compat #x0073)
-    (->uppercase       #x0053)
-    (->titlecase       #x0053)
-    (ucs               . #x17F)        ; ſ
+    (->uppercase
+     ((name              . "LATIN CAPITAL LETTER S")
+      (ucs               . #x0053)     ; S
+      ))
+    (ucs               . #x017F)       ; ſ
     ))