Reformatted.
[chise/xemacs-chise.git.1] / lisp / utf-2000 / u0FF00-Halfwidth-and-Fullwidth-Forms.el
index a257a7d..7045cfd 100644 (file)
@@ -4,7 +4,6 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x0021)
     (<-fullwidth
      ((name              . "EXCLAMATION MARK")
       (=ucs              . #x0021)     ; !
@@ -21,7 +20,6 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x0022)
     (<-fullwidth
      ((name              . "QUOTATION MARK")
       (=ucs              . #x0022)     ; "
@@ -37,7 +35,6 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (->decomposition   wide #x0023)
     (<-fullwidth
      ((name              . "NUMBER SIGN")
       (=ucs              . #x0023)     ; #
@@ -54,7 +51,6 @@
     (general-category  symbol currency) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (->decomposition   wide #x0024)
     (<-fullwidth
      ((name              . "DOLLAR SIGN")
       (=ucs              . #x0024)     ; $
@@ -71,7 +67,6 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (->decomposition   wide #x0025)
     (<-fullwidth
      ((name              . "PERCENT SIGN")
       (=ucs              . #x0025)     ; %
@@ -88,7 +83,6 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x0026)
     (<-fullwidth
      ((name              . "AMPERSAND")
       (=ucs              . #x0026)     ; &
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x0027)
     (<-fullwidth
      ((name              . "APOSTROPHE")
       (=ucs              . #x0027)     ; '
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x0028)
     (<-fullwidth
      ((name              . "LEFT PARENTHESIS")
       (=ucs              . #x0028)     ; (
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x0029)
     (<-fullwidth
      ((name              . "RIGHT PARENTHESIS")
       (=ucs              . #x0029)     ; )
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x002A)
     (<-fullwidth
      ((name              . "ASTERISK")
       (=ucs              . #x002A)     ; *
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (->decomposition   wide #x002B)
     (<-fullwidth
      ((name              . "PLUS SIGN")
       (=ucs              . #x002B)     ; +
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "CS")
     (mirrored          . nil)
-    (->decomposition   wide #x002C)
     (<-fullwidth
      ((name              . "COMMA")
       (=ucs              . #x002C)     ; ,
     (general-category  punctuation dash) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (->decomposition   wide #x002D)
     (<-fullwidth
      ((name              . "HYPHEN-MINUS")
       (=ucs              . #x002D)     ; -
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "CS")
     (mirrored          . nil)
-    (->decomposition   wide #x002E)
     (<-fullwidth
      ((name              . "FULL STOP")
       (=ucs              . #x002E)     ; .
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ES")
     (mirrored          . nil)
-    (->decomposition   wide #x002F)
     (<-fullwidth
      ((name              . "SOLIDUS")
       (=ucs              . #x002F)     ; /
     (=jis-x0208                . #x213F)       ; &I-J90-213F; [01-31]
     (=gb2312           . #x232F)       ; &I-G0-232F; [03-15]
     (=ks-x1001         . #x232F)       ; &I-K0-232F; [03-15]
+    (=cns11643-1       . #x225F)       ; &I-C1-225F; [02-63]
     (=big5             . #xA1FE)       ; &I-B-A1FE;
     ))
 (define-char
     (decimal-digit-value . 0)
     (digit-value        . 0)
     (numeric-value      . 0)
-    (->decomposition   wide #x0030)
     (<-fullwidth
      ((name              . "DIGIT ZERO")
       (=ucs              . #x0030)     ; 0
     (decimal-digit-value . 1)
     (digit-value        . 1)
     (numeric-value      . 1)
-    (->decomposition   wide #x0031)
     (<-fullwidth
      ((name              . "DIGIT ONE")
       (=ucs              . #x0031)     ; 1
     (decimal-digit-value . 2)
     (digit-value        . 2)
     (numeric-value      . 2)
-    (->decomposition   wide #x0032)
     (<-fullwidth
      ((name              . "DIGIT TWO")
       (=ucs              . #x0032)     ; 2
     (decimal-digit-value . 3)
     (digit-value        . 3)
     (numeric-value      . 3)
-    (->decomposition   wide #x0033)
     (<-fullwidth
      ((name              . "DIGIT THREE")
       (=ucs              . #x0033)     ; 3
     (decimal-digit-value . 4)
     (digit-value        . 4)
     (numeric-value      . 4)
-    (->decomposition   wide #x0034)
     (<-fullwidth
      ((name              . "DIGIT FOUR")
       (=ucs              . #x0034)     ; 4
     (decimal-digit-value . 5)
     (digit-value        . 5)
     (numeric-value      . 5)
-    (->decomposition   wide #x0035)
     (<-fullwidth
      ((name              . "DIGIT FIVE")
       (=ucs              . #x0035)     ; 5
     (decimal-digit-value . 6)
     (digit-value        . 6)
     (numeric-value      . 6)
-    (->decomposition   wide #x0036)
     (<-fullwidth
      ((name              . "DIGIT SIX")
       (=ucs              . #x0036)     ; 6
     (decimal-digit-value . 7)
     (digit-value        . 7)
     (numeric-value      . 7)
-    (->decomposition   wide #x0037)
     (<-fullwidth
      ((name              . "DIGIT SEVEN")
       (=ucs              . #x0037)     ; 7
     (decimal-digit-value . 8)
     (digit-value        . 8)
     (numeric-value      . 8)
-    (->decomposition   wide #x0038)
     (<-fullwidth
      ((name              . "DIGIT EIGHT")
       (=ucs              . #x0038)     ; 8
     (decimal-digit-value . 9)
     (digit-value        . 9)
     (numeric-value      . 9)
-    (->decomposition   wide #x0039)
     (<-fullwidth
      ((name              . "DIGIT NINE")
       (=ucs              . #x0039)     ; 9
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "CS")
     (mirrored          . nil)
-    (->decomposition   wide #x003A)
     (<-fullwidth
      ((name              . "COLON")
       (=ucs              . #x003A)     ; :
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x003B)
     (<-fullwidth
      ((name              . "SEMICOLON")
       (=ucs              . #x003B)     ; ;
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x003C)
     (<-fullwidth
      ((name              . "LESS-THAN SIGN")
       (=ucs              . #x003C)     ; <
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x003D)
     (<-fullwidth
      ((name              . "EQUALS SIGN")
       (=ucs              . #x003D)     ; =
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x003E)
     (<-fullwidth
      ((name              . "GREATER-THAN SIGN")
       (=ucs              . #x003E)     ; >
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x003F)
     (<-fullwidth
      ((name              . "QUESTION MARK")
       (=ucs              . #x003F)     ; ?
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x0040)
     (<-fullwidth
      ((name              . "COMMERCIAL AT")
       (=ucs              . #x0040)     ; @
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0041)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER A")
-      (=ucs              . #xFF41)     ; a
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER A")
       (=ucs              . #x0041)     ; A
     (=ks-x1001         . #x2341)       ; &I-K0-2341; [03-33]
     (=cns11643-1       . #x2441)       ; &I-C1-2441; [04-33]
     (=big5             . #xA2CF)       ; &I-B-A2CF;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER A")
+      (=ucs              . #xFF41)     ; a
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER B")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0042)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER B")
-      (=ucs              . #xFF42)     ; b
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER B")
       (=ucs              . #x0042)     ; B
     (=ks-x1001         . #x2342)       ; &I-K0-2342; [03-34]
     (=cns11643-1       . #x2442)       ; &I-C1-2442; [04-34]
     (=big5             . #xA2D0)       ; &I-B-A2D0;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER B")
+      (=ucs              . #xFF42)     ; b
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER C")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0043)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER C")
-      (=ucs              . #xFF43)     ; c
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER C")
       (=ucs              . #x0043)     ; C
     (=ks-x1001         . #x2343)       ; &I-K0-2343; [03-35]
     (=cns11643-1       . #x2443)       ; &I-C1-2443; [04-35]
     (=big5             . #xA2D1)       ; &I-B-A2D1;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER C")
+      (=ucs              . #xFF43)     ; c
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER D")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0044)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER D")
-      (=ucs              . #xFF44)     ; d
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER D")
       (=ucs              . #x0044)     ; D
     (=ks-x1001         . #x2344)       ; &I-K0-2344; [03-36]
     (=cns11643-1       . #x2444)       ; &I-C1-2444; [04-36]
     (=big5             . #xA2D2)       ; &I-B-A2D2;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER D")
+      (=ucs              . #xFF44)     ; d
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER E")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0045)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER E")
-      (=ucs              . #xFF45)     ; e
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER E")
       (=ucs              . #x0045)     ; E
     (=ks-x1001         . #x2345)       ; &I-K0-2345; [03-37]
     (=cns11643-1       . #x2445)       ; &I-C1-2445; [04-37]
     (=big5             . #xA2D3)       ; &I-B-A2D3;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER E")
+      (=ucs              . #xFF45)     ; e
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER F")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0046)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER F")
-      (=ucs              . #xFF46)     ; f
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER F")
       (=ucs              . #x0046)     ; F
     (=ks-x1001         . #x2346)       ; &I-K0-2346; [03-38]
     (=cns11643-1       . #x2446)       ; &I-C1-2446; [04-38]
     (=big5             . #xA2D4)       ; &I-B-A2D4;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER F")
+      (=ucs              . #xFF46)     ; f
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER G")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0047)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER G")
-      (=ucs              . #xFF47)     ; g
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER G")
       (=ucs              . #x0047)     ; G
     (=ks-x1001         . #x2347)       ; &I-K0-2347; [03-39]
     (=cns11643-1       . #x2447)       ; &I-C1-2447; [04-39]
     (=big5             . #xA2D5)       ; &I-B-A2D5;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER G")
+      (=ucs              . #xFF47)     ; g
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER H")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0048)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER H")
-      (=ucs              . #xFF48)     ; h
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER H")
       (=ucs              . #x0048)     ; H
     (=ks-x1001         . #x2348)       ; &I-K0-2348; [03-40]
     (=cns11643-1       . #x2448)       ; &I-C1-2448; [04-40]
     (=big5             . #xA2D6)       ; &I-B-A2D6;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER H")
+      (=ucs              . #xFF48)     ; h
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER I")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0049)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER I")
-      (=ucs              . #xFF49)     ; i
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER I")
       (=ucs              . #x0049)     ; I
     (=ks-x1001         . #x2349)       ; &I-K0-2349; [03-41]
     (=cns11643-1       . #x2449)       ; &I-C1-2449; [04-41]
     (=big5             . #xA2D7)       ; &I-B-A2D7;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER I")
+      (=ucs              . #xFF49)     ; i
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER J")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x004A)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER J")
-      (=ucs              . #xFF4A)     ; j
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER J")
       (=ucs              . #x004A)     ; J
     (=ks-x1001         . #x234A)       ; &I-K0-234A; [03-42]
     (=cns11643-1       . #x244A)       ; &I-C1-244A; [04-42]
     (=big5             . #xA2D8)       ; &I-B-A2D8;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER J")
+      (=ucs              . #xFF4A)     ; j
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER K")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x004B)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER K")
-      (=ucs              . #xFF4B)     ; k
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER K")
       (=ucs              . #x004B)     ; K
     (=ks-x1001         . #x234B)       ; &I-K0-234B; [03-43]
     (=cns11643-1       . #x244B)       ; &I-C1-244B; [04-43]
     (=big5             . #xA2D9)       ; &I-B-A2D9;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER K")
+      (=ucs              . #xFF4B)     ; k
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER L")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x004C)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER L")
-      (=ucs              . #xFF4C)     ; l
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER L")
       (=ucs              . #x004C)     ; L
     (=ks-x1001         . #x234C)       ; &I-K0-234C; [03-44]
     (=cns11643-1       . #x244C)       ; &I-C1-244C; [04-44]
     (=big5             . #xA2DA)       ; &I-B-A2DA;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER L")
+      (=ucs              . #xFF4C)     ; l
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER M")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x004D)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER M")
-      (=ucs              . #xFF4D)     ; m
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER M")
       (=ucs              . #x004D)     ; M
     (=ks-x1001         . #x234D)       ; &I-K0-234D; [03-45]
     (=cns11643-1       . #x244D)       ; &I-C1-244D; [04-45]
     (=big5             . #xA2DB)       ; &I-B-A2DB;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER M")
+      (=ucs              . #xFF4D)     ; m
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER N")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x004E)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER N")
-      (=ucs              . #xFF4E)     ; n
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER N")
       (=ucs              . #x004E)     ; N
     (=ks-x1001         . #x234E)       ; &I-K0-234E; [03-46]
     (=cns11643-1       . #x244E)       ; &I-C1-244E; [04-46]
     (=big5             . #xA2DC)       ; &I-B-A2DC;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER N")
+      (=ucs              . #xFF4E)     ; n
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER O")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x004F)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER O")
-      (=ucs              . #xFF4F)     ; o
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER O")
       (=ucs              . #x004F)     ; O
     (=ks-x1001         . #x234F)       ; &I-K0-234F; [03-47]
     (=cns11643-1       . #x244F)       ; &I-C1-244F; [04-47]
     (=big5             . #xA2DD)       ; &I-B-A2DD;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER O")
+      (=ucs              . #xFF4F)     ; o
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER P")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0050)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER P")
-      (=ucs              . #xFF50)     ; p
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER P")
       (=ucs              . #x0050)     ; P
     (=ks-x1001         . #x2350)       ; &I-K0-2350; [03-48]
     (=cns11643-1       . #x2450)       ; &I-C1-2450; [04-48]
     (=big5             . #xA2DE)       ; &I-B-A2DE;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER P")
+      (=ucs              . #xFF50)     ; p
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER Q")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0051)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER Q")
-      (=ucs              . #xFF51)     ; q
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER Q")
       (=ucs              . #x0051)     ; Q
     (=ks-x1001         . #x2351)       ; &I-K0-2351; [03-49]
     (=cns11643-1       . #x2451)       ; &I-C1-2451; [04-49]
     (=big5             . #xA2DF)       ; &I-B-A2DF;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER Q")
+      (=ucs              . #xFF51)     ; q
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER R")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0052)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER R")
-      (=ucs              . #xFF52)     ; r
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER R")
       (=ucs              . #x0052)     ; R
     (=ks-x1001         . #x2352)       ; &I-K0-2352; [03-50]
     (=cns11643-1       . #x2452)       ; &I-C1-2452; [04-50]
     (=big5             . #xA2E0)       ; &I-B-A2E0;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER R")
+      (=ucs              . #xFF52)     ; r
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER S")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0053)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER S")
-      (=ucs              . #xFF53)     ; s
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER S")
       (=ucs              . #x0053)     ; S
     (=ks-x1001         . #x2353)       ; &I-K0-2353; [03-51]
     (=cns11643-1       . #x2453)       ; &I-C1-2453; [04-51]
     (=big5             . #xA2E1)       ; &I-B-A2E1;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER S")
+      (=ucs              . #xFF53)     ; s
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER T")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0054)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER T")
-      (=ucs              . #xFF54)     ; t
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER T")
       (=ucs              . #x0054)     ; T
     (=ks-x1001         . #x2354)       ; &I-K0-2354; [03-52]
     (=cns11643-1       . #x2454)       ; &I-C1-2454; [04-52]
     (=big5             . #xA2E2)       ; &I-B-A2E2;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER T")
+      (=ucs              . #xFF54)     ; t
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER U")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0055)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER U")
-      (=ucs              . #xFF55)     ; u
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER U")
       (=ucs              . #x0055)     ; U
     (=ks-x1001         . #x2355)       ; &I-K0-2355; [03-53]
     (=cns11643-1       . #x2455)       ; &I-C1-2455; [04-53]
     (=big5             . #xA2E3)       ; &I-B-A2E3;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER U")
+      (=ucs              . #xFF55)     ; u
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER V")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0056)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER V")
-      (=ucs              . #xFF56)     ; v
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER V")
       (=ucs              . #x0056)     ; V
     (=ks-x1001         . #x2356)       ; &I-K0-2356; [03-54]
     (=cns11643-1       . #x2456)       ; &I-C1-2456; [04-54]
     (=big5             . #xA2E4)       ; &I-B-A2E4;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER V")
+      (=ucs              . #xFF56)     ; v
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER W")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0057)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER W")
-      (=ucs              . #xFF57)     ; w
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER W")
       (=ucs              . #x0057)     ; W
     (=ks-x1001         . #x2357)       ; &I-K0-2357; [03-55]
     (=cns11643-1       . #x2457)       ; &I-C1-2457; [04-55]
     (=big5             . #xA2E5)       ; &I-B-A2E5;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER W")
+      (=ucs              . #xFF57)     ; w
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER X")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0058)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER X")
-      (=ucs              . #xFF58)     ; x
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER X")
       (=ucs              . #x0058)     ; X
     (=ks-x1001         . #x2358)       ; &I-K0-2358; [03-56]
     (=cns11643-1       . #x2458)       ; &I-C1-2458; [04-56]
     (=big5             . #xA2E6)       ; &I-B-A2E6;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER X")
+      (=ucs              . #xFF58)     ; x
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER Y")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0059)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER Y")
-      (=ucs              . #xFF59)     ; y
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER Y")
       (=ucs              . #x0059)     ; Y
     (=ks-x1001         . #x2359)       ; &I-K0-2359; [03-57]
     (=cns11643-1       . #x2459)       ; &I-C1-2459; [04-57]
     (=big5             . #xA2E7)       ; &I-B-A2E7;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER Y")
+      (=ucs              . #xFF59)     ; y
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN CAPITAL LETTER Z")
     (general-category  letter uppercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x005A)
-    (->lowercase
-     ((name              . "FULLWIDTH LATIN SMALL LETTER Z")
-      (=ucs              . #xFF5A)     ; z
-      ))
     (<-fullwidth
      ((name              . "LATIN CAPITAL LETTER Z")
       (=ucs              . #x005A)     ; Z
     (=ks-x1001         . #x235A)       ; &I-K0-235A; [03-58]
     (=cns11643-1       . #x245A)       ; &I-C1-245A; [04-58]
     (=big5             . #xA2E8)       ; &I-B-A2E8;
+    (->lowercase
+     ((name              . "FULLWIDTH LATIN SMALL LETTER Z")
+      (=ucs              . #xFF5A)     ; z
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LEFT SQUARE BRACKET")
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x005B)
     (<-fullwidth
      ((name              . "LEFT SQUARE BRACKET")
       (=ucs              . #x005B)     ; [
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x005C)
     (<-fullwidth
      ((name              . "REVERSE SOLIDUS")
       (=ucs              . #x005C)     ; \
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x005D)
     (<-fullwidth
      ((name              . "RIGHT SQUARE BRACKET")
       (=ucs              . #x005D)     ; ]
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x005E)
     (<-fullwidth
      ((name              . "CIRCUMFLEX ACCENT")
       (=ucs              . #x005E)     ; ^
     (general-category  punctuation connector) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x005F)
     (<-fullwidth
      ((name              . "LOW LINE")
       (=ucs              . #x005F)     ; _
     (=big5             . #xA1C4)       ; &I-B-A1C4;
     ))
 (define-char
-  '((name              . "heavy low line")
-    (=>ucs             . #xFF3F)       ; _
-    (general-category  punctuation connector) ; Informative Category
-    (bidi-category     . "ON")
-    (mirrored          . nil)
-    (=cns11643-1       . #x2226)       ; &C1-2226; [02-06]
-    (=big5             . #xA1C5)       ; &I-B-A1C5;
-    (=ucs@big5         . #x02CD)       ; &C1-2226;
-    ))
-(define-char
   '((name              . "FULLWIDTH GRAVE ACCENT")
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x0060)
     (<-fullwidth
      ((name              . "GRAVE ACCENT")
       (=ucs              . #x0060)     ; `
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0061)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER A")
-      (=ucs              . #xFF21)     ; A
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER A")
       (=ucs              . #x0061)     ; a
     (=cns11643-1       . #x245B)       ; &I-C1-245B; [04-59]
     (=big5             . #xA2E9)       ; &I-B-A2E9;
     (=jef-china3       . #x83E1)       ; &I-JC3-83E1;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER A")
+      (=ucs              . #xFF21)     ; A
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER B")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0062)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER B")
-      (=ucs              . #xFF22)     ; B
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER B")
       (=ucs              . #x0062)     ; b
     (=ks-x1001         . #x2362)       ; &I-K0-2362; [03-66]
     (=cns11643-1       . #x245C)       ; &I-C1-245C; [04-60]
     (=big5             . #xA2EA)       ; &I-B-A2EA;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER B")
+      (=ucs              . #xFF22)     ; B
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER C")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0063)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER C")
-      (=ucs              . #xFF23)     ; C
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER C")
       (=ucs              . #x0063)     ; c
     (=cns11643-1       . #x245D)       ; &I-C1-245D; [04-61]
     (=big5             . #xA2EB)       ; &I-B-A2EB;
     (=jef-china3       . #x83E2)       ; &I-JC3-83E2;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER C")
+      (=ucs              . #xFF23)     ; C
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER D")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0064)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER D")
-      (=ucs              . #xFF24)     ; D
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER D")
       (=ucs              . #x0064)     ; d
     (=cns11643-1       . #x245E)       ; &I-C1-245E; [04-62]
     (=big5             . #xA2EC)       ; &I-B-A2EC;
     (=jef-china3       . #x83E3)       ; &I-JC3-83E3;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER D")
+      (=ucs              . #xFF24)     ; D
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER E")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0065)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER E")
-      (=ucs              . #xFF25)     ; E
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER E")
       (=ucs              . #x0065)     ; e
     (=cns11643-1       . #x245F)       ; &I-C1-245F; [04-63]
     (=big5             . #xA2ED)       ; &I-B-A2ED;
     (=jef-china3       . #x83E4)       ; &I-JC3-83E4;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER E")
+      (=ucs              . #xFF25)     ; E
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER F")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0066)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER F")
-      (=ucs              . #xFF26)     ; F
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER F")
       (=ucs              . #x0066)     ; f
     (=ks-x1001         . #x2366)       ; &I-K0-2366; [03-70]
     (=cns11643-1       . #x2460)       ; &I-C1-2460; [04-64]
     (=big5             . #xA2EE)       ; &I-B-A2EE;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER F")
+      (=ucs              . #xFF26)     ; F
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER G")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0067)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER G")
-      (=ucs              . #xFF27)     ; G
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER G")
       (=ucs              . #x0067)     ; g
     (=cns11643-1       . #x2461)       ; &I-C1-2461; [04-65]
     (=big5             . #xA2EF)       ; &I-B-A2EF;
     (=jef-china3       . #x83E5)       ; &I-JC3-83E5;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER G")
+      (=ucs              . #xFF27)     ; G
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER H")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0068)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER H")
-      (=ucs              . #xFF28)     ; H
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER H")
       (=ucs              . #x0068)     ; h
     (=cns11643-1       . #x2462)       ; &I-C1-2462; [04-66]
     (=big5             . #xA2F0)       ; &I-B-A2F0;
     (=jef-china3       . #x83E6)       ; &I-JC3-83E6;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER H")
+      (=ucs              . #xFF28)     ; H
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER I")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0069)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER I")
-      (=ucs              . #xFF29)     ; I
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER I")
       (=ucs              . #x0069)     ; i
     (=cns11643-1       . #x2463)       ; &I-C1-2463; [04-67]
     (=big5             . #xA2F1)       ; &I-B-A2F1;
     (=jef-china3       . #x83E7)       ; &I-JC3-83E7;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER I")
+      (=ucs              . #xFF29)     ; I
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER J")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x006A)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER J")
-      (=ucs              . #xFF2A)     ; J
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER J")
       (=ucs              . #x006A)     ; j
     (=cns11643-1       . #x2464)       ; &I-C1-2464; [04-68]
     (=big5             . #xA2F2)       ; &I-B-A2F2;
     (=jef-china3       . #x83E8)       ; &I-JC3-83E8;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER J")
+      (=ucs              . #xFF2A)     ; J
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER K")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x006B)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER K")
-      (=ucs              . #xFF2B)     ; K
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER K")
       (=ucs              . #x006B)     ; k
     (=ks-x1001         . #x236B)       ; &I-K0-236B; [03-75]
     (=cns11643-1       . #x2465)       ; &I-C1-2465; [04-69]
     (=big5             . #xA2F3)       ; &I-B-A2F3;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER K")
+      (=ucs              . #xFF2B)     ; K
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER L")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x006C)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER L")
-      (=ucs              . #xFF2C)     ; L
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER L")
       (=ucs              . #x006C)     ; l
     (=cns11643-1       . #x2466)       ; &I-C1-2466; [04-70]
     (=big5             . #xA2F4)       ; &I-B-A2F4;
     (=jef-china3       . #x83E9)       ; &I-JC3-83E9;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER L")
+      (=ucs              . #xFF2C)     ; L
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER M")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x006D)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER M")
-      (=ucs              . #xFF2D)     ; M
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER M")
       (=ucs              . #x006D)     ; m
     (=cns11643-1       . #x2467)       ; &I-C1-2467; [04-71]
     (=big5             . #xA2F5)       ; &I-B-A2F5;
     (=jef-china3       . #x83EA)       ; &I-JC3-83EA;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER M")
+      (=ucs              . #xFF2D)     ; M
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER N")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x006E)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER N")
-      (=ucs              . #xFF2E)     ; N
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER N")
       (=ucs              . #x006E)     ; n
     (=cns11643-1       . #x2468)       ; &I-C1-2468; [04-72]
     (=big5             . #xA2F6)       ; &I-B-A2F6;
     (=jef-china3       . #x83EB)       ; &I-JC3-83EB;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER N")
+      (=ucs              . #xFF2E)     ; N
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER O")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x006F)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER O")
-      (=ucs              . #xFF2F)     ; O
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER O")
       (=ucs              . #x006F)     ; o
     (=cns11643-1       . #x2469)       ; &I-C1-2469; [04-73]
     (=big5             . #xA2F7)       ; &I-B-A2F7;
     (=jef-china3       . #x83EC)       ; &I-JC3-83EC;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER O")
+      (=ucs              . #xFF2F)     ; O
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER P")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0070)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER P")
-      (=ucs              . #xFF30)     ; P
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER P")
       (=ucs              . #x0070)     ; p
     (=ks-x1001         . #x2370)       ; &I-K0-2370; [03-80]
     (=cns11643-1       . #x246A)       ; &I-C1-246A; [04-74]
     (=big5             . #xA2F8)       ; &I-B-A2F8;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER P")
+      (=ucs              . #xFF30)     ; P
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER Q")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0071)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER Q")
-      (=ucs              . #xFF31)     ; Q
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER Q")
       (=ucs              . #x0071)     ; q
     (=ks-x1001         . #x2371)       ; &I-K0-2371; [03-81]
     (=cns11643-1       . #x246B)       ; &I-C1-246B; [04-75]
     (=big5             . #xA2F9)       ; &I-B-A2F9;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER Q")
+      (=ucs              . #xFF31)     ; Q
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER R")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0072)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER R")
-      (=ucs              . #xFF32)     ; R
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER R")
       (=ucs              . #x0072)     ; r
     (=cns11643-1       . #x246C)       ; &I-C1-246C; [04-76]
     (=big5             . #xA2FA)       ; &I-B-A2FA;
     (=jef-china3       . #x83ED)       ; &I-JC3-83ED;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER R")
+      (=ucs              . #xFF32)     ; R
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER S")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0073)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER S")
-      (=ucs              . #xFF33)     ; S
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER S")
       (=ucs              . #x0073)     ; s
     (=cns11643-1       . #x246D)       ; &I-C1-246D; [04-77]
     (=big5             . #xA2FB)       ; &I-B-A2FB;
     (=jef-china3       . #x83EE)       ; &I-JC3-83EE;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER S")
+      (=ucs              . #xFF33)     ; S
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER T")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0074)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER T")
-      (=ucs              . #xFF34)     ; T
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER T")
       (=ucs              . #x0074)     ; t
     (=cns11643-1       . #x246E)       ; &I-C1-246E; [04-78]
     (=big5             . #xA2FC)       ; &I-B-A2FC;
     (=jef-china3       . #x83EF)       ; &I-JC3-83EF;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER T")
+      (=ucs              . #xFF34)     ; T
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER U")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0075)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER U")
-      (=ucs              . #xFF35)     ; U
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER U")
       (=ucs              . #x0075)     ; u
     (=cns11643-1       . #x246F)       ; &I-C1-246F; [04-79]
     (=big5             . #xA2FD)       ; &I-B-A2FD;
     (=jef-china3       . #x83F0)       ; &I-JC3-83F0;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER U")
+      (=ucs              . #xFF35)     ; U
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER V")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0076)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER V")
-      (=ucs              . #xFF36)     ; V
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER V")
       (=ucs              . #x0076)     ; v
     (=ks-x1001         . #x2376)       ; &I-K0-2376; [03-86]
     (=cns11643-1       . #x2470)       ; &I-C1-2470; [04-80]
     (=big5             . #xA2FE)       ; &I-B-A2FE;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER V")
+      (=ucs              . #xFF36)     ; V
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER W")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0077)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER W")
-      (=ucs              . #xFF37)     ; W
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER W")
       (=ucs              . #x0077)     ; w
     (=ks-x1001         . #x2377)       ; &I-K0-2377; [03-87]
     (=cns11643-1       . #x2471)       ; &I-C1-2471; [04-81]
     (=big5             . #xA340)       ; &I-B-A340;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER W")
+      (=ucs              . #xFF37)     ; W
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER X")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0078)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER X")
-      (=ucs              . #xFF38)     ; X
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER X")
       (=ucs              . #x0078)     ; x
     (=ks-x1001         . #x2378)       ; &I-K0-2378; [03-88]
     (=cns11643-1       . #x2472)       ; &I-C1-2472; [04-82]
     (=big5             . #xA341)       ; &I-B-A341;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER X")
+      (=ucs              . #xFF38)     ; X
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER Y")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x0079)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER Y")
-      (=ucs              . #xFF39)     ; Y
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER Y")
       (=ucs              . #x0079)     ; y
     (=cns11643-1       . #x2473)       ; &I-C1-2473; [04-83]
     (=big5             . #xA342)       ; &I-B-A342;
     (=jef-china3       . #x83F1)       ; &I-JC3-83F1;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER Y")
+      (=ucs              . #xFF39)     ; Y
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LATIN SMALL LETTER Z")
     (general-category  letter lowercase) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   wide #x007A)
-    (->uppercase
-     ((name              . "FULLWIDTH LATIN CAPITAL LETTER Z")
-      (=ucs              . #xFF3A)     ; Z
-      ))
     (<-fullwidth
      ((name              . "LATIN SMALL LETTER Z")
       (=ucs              . #x007A)     ; z
     (=cns11643-1       . #x2474)       ; &I-C1-2474; [04-84]
     (=big5             . #xA343)       ; &I-B-A343;
     (=jef-china3       . #x83F2)       ; &I-JC3-83F2;
+    (->uppercase
+     ((name              . "FULLWIDTH LATIN CAPITAL LETTER Z")
+      (=ucs              . #xFF3A)     ; Z
+      ))
     ))
 (define-char
   '((name              . "FULLWIDTH LEFT CURLY BRACKET")
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x007B)
     (<-fullwidth
      ((name              . "LEFT CURLY BRACKET")
       (=ucs              . #x007B)     ; {
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x007C)
     (<-fullwidth
      ((name              . "VERTICAL LINE")
       (=ucs              . #x007C)     ; |
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x007D)
     (<-fullwidth
      ((name              . "RIGHT CURLY BRACKET")
       (=ucs              . #x007D)     ; }
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x007E)
     (<-fullwidth
      ((name              . "TILDE")
       (=ucs              . #x007E)     ; ~
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x3002)
     (<-halfwidth
      ((name              . "IDEOGRAPHIC FULL STOP")
       (=ucs              . #x3002)     ; 。
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x300C)
     (<-halfwidth
      ((name              . "LEFT CORNER BRACKET")
       (=ucs              . #x300C)     ; 「
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x300D)
     (<-halfwidth
      ((name              . "RIGHT CORNER BRACKET")
       (=ucs              . #x300D)     ; 」
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x3001)
     (<-halfwidth
      ((name              . "IDEOGRAPHIC COMMA")
       (=ucs              . #x3001)     ; 、
     (general-category  punctuation connector) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x30FB)
     (<-halfwidth
      ((name              . "KATAKANA MIDDLE DOT")
       (=ucs              . #x30FB)     ; ・
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30F2)
     (<-halfwidth
      ((name              . "KATAKANA LETTER WO")
       (=ucs              . #x30F2)     ; ヲ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30A1)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SMALL A")
       (=ucs              . #x30A1)     ; ァ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30A3)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SMALL I")
       (=ucs              . #x30A3)     ; ィ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30A5)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SMALL U")
       (=ucs              . #x30A5)     ; ゥ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30A7)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SMALL E")
       (=ucs              . #x30A7)     ; ェ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30A9)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SMALL O")
       (=ucs              . #x30A9)     ; ォ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30E3)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SMALL YA")
       (=ucs              . #x30E3)     ; ャ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30E5)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SMALL YU")
       (=ucs              . #x30E5)     ; ュ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30E7)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SMALL YO")
       (=ucs              . #x30E7)     ; ョ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30C3)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SMALL TU")
       (=ucs              . #x30C3)     ; ッ
     (general-category  letter modifier) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30FC)
     (<-halfwidth
      ((name              . "KATAKANA-HIRAGANA PROLONGED SOUND MARK")
       (=ucs              . #x30FC)     ; ー
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30A2)
     (<-halfwidth
      ((name              . "KATAKANA LETTER A")
       (=ucs              . #x30A2)     ; ア
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30A4)
     (<-halfwidth
      ((name              . "KATAKANA LETTER I")
       (=ucs              . #x30A4)     ; イ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30A6)
     (<-halfwidth
      ((name              . "KATAKANA LETTER U")
       (=ucs              . #x30A6)     ; ウ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30A8)
     (<-halfwidth
      ((name              . "KATAKANA LETTER E")
       (=ucs              . #x30A8)     ; エ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30AA)
     (<-halfwidth
      ((name              . "KATAKANA LETTER O")
       (=ucs              . #x30AA)     ; オ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30AB)
     (<-halfwidth
      ((name              . "KATAKANA LETTER KA")
       (=ucs              . #x30AB)     ; カ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30AD)
     (<-halfwidth
      ((name              . "KATAKANA LETTER KI")
       (=ucs              . #x30AD)     ; キ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30AF)
     (<-halfwidth
      ((name              . "KATAKANA LETTER KU")
       (=ucs              . #x30AF)     ; ク
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30B1)
     (<-halfwidth
      ((name              . "KATAKANA LETTER KE")
       (=ucs              . #x30B1)     ; ケ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30B3)
     (<-halfwidth
      ((name              . "KATAKANA LETTER KO")
       (=ucs              . #x30B3)     ; コ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30B5)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SA")
       (=ucs              . #x30B5)     ; サ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30B7)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SI")
       (=ucs              . #x30B7)     ; シ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30B9)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SU")
       (=ucs              . #x30B9)     ; ス
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30BB)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SE")
       (=ucs              . #x30BB)     ; セ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30BD)
     (<-halfwidth
      ((name              . "KATAKANA LETTER SO")
       (=ucs              . #x30BD)     ; ソ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30BF)
     (<-halfwidth
      ((name              . "KATAKANA LETTER TA")
       (=ucs              . #x30BF)     ; タ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30C1)
     (<-halfwidth
      ((name              . "KATAKANA LETTER TI")
       (=ucs              . #x30C1)     ; チ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30C4)
     (<-halfwidth
      ((name              . "KATAKANA LETTER TU")
       (=ucs              . #x30C4)     ; ツ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30C6)
     (<-halfwidth
      ((name              . "KATAKANA LETTER TE")
       (=ucs              . #x30C6)     ; テ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30C8)
     (<-halfwidth
      ((name              . "KATAKANA LETTER TO")
       (=ucs              . #x30C8)     ; ト
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30CA)
     (<-halfwidth
      ((name              . "KATAKANA LETTER NA")
       (=ucs              . #x30CA)     ; ナ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30CB)
     (<-halfwidth
      ((name              . "KATAKANA LETTER NI")
       (=ucs              . #x30CB)     ; ニ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30CC)
     (<-halfwidth
      ((name              . "KATAKANA LETTER NU")
       (=ucs              . #x30CC)     ; ヌ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30CD)
     (<-halfwidth
      ((name              . "KATAKANA LETTER NE")
       (=ucs              . #x30CD)     ; ネ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30CE)
     (<-halfwidth
      ((name              . "KATAKANA LETTER NO")
       (=ucs              . #x30CE)     ; ノ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30CF)
     (<-halfwidth
      ((name              . "KATAKANA LETTER HA")
       (=ucs              . #x30CF)     ; ハ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30D2)
     (<-halfwidth
      ((name              . "KATAKANA LETTER HI")
       (=ucs              . #x30D2)     ; ヒ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30D5)
     (<-halfwidth
      ((name              . "KATAKANA LETTER HU")
       (=ucs              . #x30D5)     ; フ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30D8)
     (<-halfwidth
      ((name              . "KATAKANA LETTER HE")
       (=ucs              . #x30D8)     ; ヘ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30DB)
     (<-halfwidth
      ((name              . "KATAKANA LETTER HO")
       (=ucs              . #x30DB)     ; ホ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30DE)
     (<-halfwidth
      ((name              . "KATAKANA LETTER MA")
       (=ucs              . #x30DE)     ; マ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30DF)
     (<-halfwidth
      ((name              . "KATAKANA LETTER MI")
       (=ucs              . #x30DF)     ; ミ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30E0)
     (<-halfwidth
      ((name              . "KATAKANA LETTER MU")
       (=ucs              . #x30E0)     ; ム
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30E1)
     (<-halfwidth
      ((name              . "KATAKANA LETTER ME")
       (=ucs              . #x30E1)     ; メ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30E2)
     (<-halfwidth
      ((name              . "KATAKANA LETTER MO")
       (=ucs              . #x30E2)     ; モ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30E4)
     (<-halfwidth
      ((name              . "KATAKANA LETTER YA")
       (=ucs              . #x30E4)     ; ヤ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30E6)
     (<-halfwidth
      ((name              . "KATAKANA LETTER YU")
       (=ucs              . #x30E6)     ; ユ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30E8)
     (<-halfwidth
      ((name              . "KATAKANA LETTER YO")
       (=ucs              . #x30E8)     ; ヨ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30E9)
     (<-halfwidth
      ((name              . "KATAKANA LETTER RA")
       (=ucs              . #x30E9)     ; ラ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30EA)
     (<-halfwidth
      ((name              . "KATAKANA LETTER RI")
       (=ucs              . #x30EA)     ; リ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30EB)
     (<-halfwidth
      ((name              . "KATAKANA LETTER RU")
       (=ucs              . #x30EB)     ; ル
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30EC)
     (<-halfwidth
      ((name              . "KATAKANA LETTER RE")
       (=ucs              . #x30EC)     ; レ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30ED)
     (<-halfwidth
      ((name              . "KATAKANA LETTER RO")
       (=ucs              . #x30ED)     ; ロ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30EF)
     (<-halfwidth
      ((name              . "KATAKANA LETTER WA")
       (=ucs              . #x30EF)     ; ワ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x30F3)
     (<-halfwidth
      ((name              . "KATAKANA LETTER N")
       (=ucs              . #x30F3)     ; ン
     (bidi-category     . "L")
     (mirrored          . nil)
     (iso-10646-comment . "halfwidth katakana-hiragana voiced sound mark")
-    (->decomposition   narrow #x3099)
     (<-halfwidth
      ((name . "COMBINING KATAKANA-HIRAGANA VOICED SOUND MARK")
       (=ucs              . #x3099)     ; ゙
     (bidi-category     . "L")
     (mirrored          . nil)
     (iso-10646-comment . "halfwidth katakana-hiragana semi-voiced sound mark")
-    (->decomposition   narrow #x309A)
     (<-halfwidth
      ((name . "COMBINING KATAKANA-HIRAGANA SEMI-VOICED SOUND MARK")
       (=ucs              . #x309A)     ; ゚
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3164)
     (<-halfwidth
      ((name              . "HANGUL FILLER")
       (=ucs              . #x3164)     ; ㅤ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3131)
     (<-halfwidth
      ((name              . "HANGUL LETTER KIYEOK")
       (=ucs              . #x3131)     ; ㄱ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3132)
     (<-halfwidth
      ((name              . "HANGUL LETTER SSANGKIYEOK")
       (=ucs              . #x3132)     ; ㄲ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3133)
     (<-halfwidth
      ((name              . "HANGUL LETTER KIYEOK-SIOS")
       (=ucs              . #x3133)     ; ㄳ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3134)
     (<-halfwidth
      ((name              . "HANGUL LETTER NIEUN")
       (=ucs              . #x3134)     ; ㄴ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3135)
     (<-halfwidth
      ((name              . "HANGUL LETTER NIEUN-CIEUC")
       (=ucs              . #x3135)     ; ㄵ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3136)
     (<-halfwidth
      ((name              . "HANGUL LETTER NIEUN-HIEUH")
       (=ucs              . #x3136)     ; ㄶ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3137)
     (<-halfwidth
      ((name              . "HANGUL LETTER TIKEUT")
       (=ucs              . #x3137)     ; ㄷ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3138)
     (<-halfwidth
      ((name              . "HANGUL LETTER SSANGTIKEUT")
       (=ucs              . #x3138)     ; ㄸ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3139)
     (<-halfwidth
      ((name              . "HANGUL LETTER RIEUL")
       (=ucs              . #x3139)     ; ㄹ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x313A)
     (<-halfwidth
      ((name              . "HANGUL LETTER RIEUL-KIYEOK")
       (=ucs              . #x313A)     ; ㄺ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x313B)
     (<-halfwidth
      ((name              . "HANGUL LETTER RIEUL-MIEUM")
       (=ucs              . #x313B)     ; ㄻ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x313C)
     (<-halfwidth
      ((name              . "HANGUL LETTER RIEUL-PIEUP")
       (=ucs              . #x313C)     ; ㄼ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x313D)
     (<-halfwidth
      ((name              . "HANGUL LETTER RIEUL-SIOS")
       (=ucs              . #x313D)     ; ㄽ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x313E)
     (<-halfwidth
      ((name              . "HANGUL LETTER RIEUL-THIEUTH")
       (=ucs              . #x313E)     ; ㄾ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x313F)
     (<-halfwidth
      ((name              . "HANGUL LETTER RIEUL-PHIEUPH")
       (=ucs              . #x313F)     ; ㄿ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3140)
     (<-halfwidth
      ((name              . "HANGUL LETTER RIEUL-HIEUH")
       (=ucs              . #x3140)     ; ㅀ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3141)
     (<-halfwidth
      ((name              . "HANGUL LETTER MIEUM")
       (=ucs              . #x3141)     ; ㅁ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3142)
     (<-halfwidth
      ((name              . "HANGUL LETTER PIEUP")
       (=ucs              . #x3142)     ; ㅂ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3143)
     (<-halfwidth
      ((name              . "HANGUL LETTER SSANGPIEUP")
       (=ucs              . #x3143)     ; ㅃ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3144)
     (<-halfwidth
      ((name              . "HANGUL LETTER PIEUP-SIOS")
       (=ucs              . #x3144)     ; ㅄ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3145)
     (<-halfwidth
      ((name              . "HANGUL LETTER SIOS")
       (=ucs              . #x3145)     ; ㅅ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3146)
     (<-halfwidth
      ((name              . "HANGUL LETTER SSANGSIOS")
       (=ucs              . #x3146)     ; ㅆ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3147)
     (<-halfwidth
      ((name              . "HANGUL LETTER IEUNG")
       (=ucs              . #x3147)     ; ㅇ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3148)
     (<-halfwidth
      ((name              . "HANGUL LETTER CIEUC")
       (=ucs              . #x3148)     ; ㅈ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3149)
     (<-halfwidth
      ((name              . "HANGUL LETTER SSANGCIEUC")
       (=ucs              . #x3149)     ; ㅉ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x314A)
     (<-halfwidth
      ((name              . "HANGUL LETTER CHIEUCH")
       (=ucs              . #x314A)     ; ㅊ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x314B)
     (<-halfwidth
      ((name              . "HANGUL LETTER KHIEUKH")
       (=ucs              . #x314B)     ; ㅋ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x314C)
     (<-halfwidth
      ((name              . "HANGUL LETTER THIEUTH")
       (=ucs              . #x314C)     ; ㅌ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x314D)
     (<-halfwidth
      ((name              . "HANGUL LETTER PHIEUPH")
       (=ucs              . #x314D)     ; ㅍ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x314E)
     (<-halfwidth
      ((name              . "HANGUL LETTER HIEUH")
       (=ucs              . #x314E)     ; ㅎ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x314F)
     (<-halfwidth
      ((name              . "HANGUL LETTER A")
       (=ucs              . #x314F)     ; ㅏ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3150)
     (<-halfwidth
      ((name              . "HANGUL LETTER AE")
       (=ucs              . #x3150)     ; ㅐ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3151)
     (<-halfwidth
      ((name              . "HANGUL LETTER YA")
       (=ucs              . #x3151)     ; ㅑ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3152)
     (<-halfwidth
      ((name              . "HANGUL LETTER YAE")
       (=ucs              . #x3152)     ; ㅒ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3153)
     (<-halfwidth
      ((name              . "HANGUL LETTER EO")
       (=ucs              . #x3153)     ; ㅓ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3154)
     (<-halfwidth
      ((name              . "HANGUL LETTER E")
       (=ucs              . #x3154)     ; ㅔ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3155)
     (<-halfwidth
      ((name              . "HANGUL LETTER YEO")
       (=ucs              . #x3155)     ; ㅕ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3156)
     (<-halfwidth
      ((name              . "HANGUL LETTER YE")
       (=ucs              . #x3156)     ; ㅖ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3157)
     (<-halfwidth
      ((name              . "HANGUL LETTER O")
       (=ucs              . #x3157)     ; ㅗ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3158)
     (<-halfwidth
      ((name              . "HANGUL LETTER WA")
       (=ucs              . #x3158)     ; ㅘ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3159)
     (<-halfwidth
      ((name              . "HANGUL LETTER WAE")
       (=ucs              . #x3159)     ; ㅙ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x315A)
     (<-halfwidth
      ((name              . "HANGUL LETTER OE")
       (=ucs              . #x315A)     ; ㅚ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x315B)
     (<-halfwidth
      ((name              . "HANGUL LETTER YO")
       (=ucs              . #x315B)     ; ㅛ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x315C)
     (<-halfwidth
      ((name              . "HANGUL LETTER U")
       (=ucs              . #x315C)     ; ㅜ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x315D)
     (<-halfwidth
      ((name              . "HANGUL LETTER WEO")
       (=ucs              . #x315D)     ; ㅝ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x315E)
     (<-halfwidth
      ((name              . "HANGUL LETTER WE")
       (=ucs              . #x315E)     ; ㅞ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x315F)
     (<-halfwidth
      ((name              . "HANGUL LETTER WI")
       (=ucs              . #x315F)     ; ㅟ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3160)
     (<-halfwidth
      ((name              . "HANGUL LETTER YU")
       (=ucs              . #x3160)     ; ㅠ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3161)
     (<-halfwidth
      ((name              . "HANGUL LETTER EU")
       (=ucs              . #x3161)     ; ㅡ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3162)
     (<-halfwidth
      ((name              . "HANGUL LETTER YI")
       (=ucs              . #x3162)     ; ㅢ
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   narrow #x3163)
     (<-halfwidth
      ((name              . "HANGUL LETTER I")
       (=ucs              . #x3163)     ; ㅣ
     (general-category  symbol currency) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (->decomposition   wide #x00A2)
     (<-fullwidth
      ((name              . "CENT SIGN")
       (=ucs              . #x00A2)     ; ¢
     (general-category  symbol currency) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (->decomposition   wide #x00A3)
     (<-fullwidth
      ((name              . "POUND SIGN")
       (=ucs              . #x00A3)     ; £
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x00AC)
     (<-fullwidth
      ((name              . "NOT SIGN")
       (=ucs              . #x00AC)     ; ¬
       ))
     (=ucs              . #xFFE2)       ; ¬
-    (=jis-x0208-1983   . #x224C)       ; &I-J83-224C; [02-44]
+    (=jis-x0208@1983   . #x224C)       ; &I-J83-224C; [02-44]
     (=ks-x1001         . #x217E)       ; &I-K0-217E; [01-94]
-    (=jis-x0208-1990   . #x224C)       ; &I-J90-224C; [02-44]
+    (=jis-x0208@1990   . #x224C)       ; &I-J90-224C; [02-44]
     (=big5-eten                . #xC8CD)       ; &B-C8CD;
     ))
 (define-char
     (general-category  symbol modifier) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x00AF)
     (<-fullwidth
      ((name              . "MACRON")
       (=ucs              . #x00AF)     ; ¯
       ))
     (=ucs              . #xFFE3)       ;  ̄
     (=jis-x0212                . #x2234)       ; &I-JSP-2234; [02-20]
+    (=cns11643-1       . #x2224)       ; &I-C1-2224; [02-04]
     (=jis-x0213-1-2000 . #x292B)       ; &I-JX1-292B; [09-11]
+    (=big5             . #xA1C3)       ; &I-B-A1C3;
     (=jef-china3       . #x81A7)       ; &I-JC3-81A7;
     ))
 (define-char
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   wide #x00A6)
     (<-fullwidth
      ((name              . "BROKEN BAR")
       (=ucs              . #x00A6)     ; ¦
     (general-category  symbol currency) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (->decomposition   wide #x00A5)
     (<-fullwidth
      ((name              . "YEN SIGN")
       (=ucs              . #x00A5)     ; ¥
     (general-category  symbol currency) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (->decomposition   wide #x20A9)
     (<-fullwidth
      ((name              . "WON SIGN")
       (=ucs              . #x20A9)     ; ₩
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x2502)
     (<-halfwidth
      ((name              . "BOX DRAWINGS LIGHT VERTICAL")
       (=ucs              . #x2502)     ; │
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x2190)
     (<-halfwidth
      ((name              . "LEFTWARDS ARROW")
       (=ucs              . #x2190)     ; ←
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x2191)
     (<-halfwidth
      ((name              . "UPWARDS ARROW")
       (=ucs              . #x2191)     ; ↑
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x2192)
     (<-halfwidth
      ((name              . "RIGHTWARDS ARROW")
       (=ucs              . #x2192)     ; →
     (general-category  symbol math) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x2193)
     (<-halfwidth
      ((name              . "DOWNWARDS ARROW")
       (=ucs              . #x2193)     ; ↓
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x25A0)
     (<-halfwidth
      ((name              . "BLACK SQUARE")
       (=ucs              . #x25A0)     ; ■
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (->decomposition   narrow #x25CB)
     (<-halfwidth
      ((name              . "WHITE CIRCLE")
       (=ucs              . #x25CB)     ; ○