(CU+623F): Apply new conventions for glyph granularity.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R016-Table.el

diff --git a/lisp/utf-2000/Ideograph-R016-Table.el b/lisp/utf-2000/Ideograph-R016-Table.el
index 79e3a09..c4b918a 100644 (file)
--- a/lisp/utf-2000/Ideograph-R016-Table.el
+++ b/lisp/utf-2000/Ideograph-R016-Table.el
@@ -61,13 +61,13 @@
   '((ideographic-radical . 16) ; ⼏
     (ideographic-strokes . 0)
     (total-strokes      . 5)
-    (=>>big5-cdp       . #x865B)       ; &G-CDP-865B;
-    (=>>gt-k           . 01371)        ; &G-CDP-865B;
+    (=big5-cdp         . #x865B)       ; &CDP-865B;
+    (=gt-k             . 01371)        ; &I-GT-K01371;
+    (=gt-pj-k1         . #x4A55)       ; &CDP-865B; [42-53]
     (->subsumptive
-     ((=gt-k             . 01371)      ; &GT-K01371;
-      (=gt-pj-k1         . #x4A55)     ; &GT-K01371; [42-53]
+     ((==gt-k            . 01371)      ; &g2-GT-K01371;
       )
-     ((=big5-cdp         . #x865B)     ; &CDP-865B;
+     ((==big5-cdp        . #x865B)     ; &g2-CDP-865B;
       ))
     ))
 (define-char
@@ -105,8 +105,6 @@
       )
      ((=ucs              . #x4E36)     ; 丶
       ))
-    (=>>ucs@unicode    . #x51E1)       ; &AJ1-03724;
-    (=>>>ucs@unicode   . #x51E1)       ; &AJ1-03724;
     (=ucs@unicode      . #x51E1)       ; &AJ1-03724;
     (=adobe-japan1-0   . 03724)        ; &AJ1-03724;
     (=jis-x0208                . #x4B5E)       ; &I-J90-4B5E; [43-62]
@@ -770,8 +768,6 @@
       )
      ((=ucs              . #x51E0)     ; 几
       ))
-    (=>>ucs@unicode    . #x51ED)       ; &AJ1-04246;
-    (=>>>ucs@unicode   . #x51ED)       ; &AJ1-04246;
     (=ucs@unicode      . #x51ED)       ; &AJ1-04246;
     (=adobe-japan1-0   . 04246)        ; &AJ1-04246;
     (=jis-x0208                . #x515F)       ; &I-J90-515F; [49-63]
@@ -1226,7 +1222,6 @@
        )
        ((=ucs              . #xE0100)  ; 󠄀
        ))
-      (=>>>ucs@unicode   . #x51F1)     ; &AJ1-01420;
       (=ucs@unicode      . #x51F1)     ; &AJ1-01420;
       (=adobe-japan1-0   . 01420)      ; &AJ1-01420;
       (=jis-x0208        . #x332E)     ; &I-J90-332E; [19-14]
@@ -1259,7 +1254,6 @@
     (=ucs              . #x51EF)       ; 凯
     (->subsumptive
      ((hanyu-dazidian    1 277 19)
-      (=>>>ucs@unicode   . #x51EF)     ; &G0-3F2D;
       (=ucs@unicode      . #x51EF)     ; &G0-3F2D;
       (=gb2312           . #x3F2D)     ; &G0-3F2D; [31-13]
       (=hanziku-1        . #xDF5B)     ; &I-HZK01-DF5B;
@@ -1309,10 +1303,8 @@
     (ideographic-radical . 16) ; ⼏
     (ideographic-strokes . 10)
     (total-strokes      . 12)
-    (=>>ucs@jis                . #x51F2)       ; &G-AJ1-21189;
-    (=>>adobe-japan1-6 . 21189)        ; &G-AJ1-21189;
-    (=>>daikanwa       . 01792)        ; &G-AJ1-21189;
-    (=jef-china3       . #x44A9)       ; &G-AJ1-21189;
+    (=+>ucs@jis                . #x51F2)       ; &o-AJ1-21189;
+    (=+>adobe-japan1-6 . 21189)        ; &o-AJ1-21189;
     (->subsumptive
      ((=decomposition@cid
        ((=ucs              . #x51F2)   ; 凲
@@ -1328,7 +1320,6 @@
        )
        ((=gt               . 01936)    ; &GT-01936;
        ))
-      (=>>>ucs@jis       . #x51F2)     ; &AJ1-21189;
       (=ucs@jis                  . #x51F2)     ; &AJ1-21189;
       (=adobe-japan1-6   . 21189)      ; &AJ1-21189;
       (=jis-x0212        . #x332C)     ; &I-JSP-332C; [19-12]
@@ -1336,6 +1327,8 @@
       )
      ((=cns11643-6       . #x4665)     ; &C6-4665; [38-69]
       )
+     ((=jef-china3       . #x44A9)     ; &JC3-44A9;
+      )
      ((hanyu-dazidian    1 278 14)
       (=hanziku-1        . #xDF76)     ; &HZK01-DF76;
       ))
@@ -1347,20 +1340,9 @@
     (ideographic-radical . 16) ; ⼏
     (ideographic-strokes . 10)
     (total-strokes      . 12)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
-      (=ucs              . #x2FF5)     ; ⿵
-      )
-     ((name              . "CJK RADICAL TABLE")
-      (=ucs              . #x2E87)     ; ⺇
-      )
-     ((=ucs@unicode      . #x517C)     ; &AJ1-01865;
-      (=adobe-japan1-0   . 01865)      ; &AJ1-01865;
-      ))
-    (=>>ucs@unicode    . #x51F2)       ; &G-UU+51F2;
+    (=ucs@unicode      . #x51F2)       ; &UU+51F2;
     (->subsumptive
-     ((=>>>ucs@unicode   . #x51F2)     ; &g2-UU+51F2;
-      (=ucs@unicode      . #x51F2)     ; &g2-UU+51F2;
+     ((==ucs@unicode     . #x51F2)     ; &g2-UU+51F2;
       ))
     ))
 (define-char