(U+7259): Apply new conventions for glyph granularity.

diff --git a/lisp/utf-2000/Ideograph-R092-Fang.el b/lisp/utf-2000/Ideograph-R092-Fang.el
index 1dbf029..2e6b304 100644 (file)
--- a/lisp/utf-2000/Ideograph-R092-Fang.el
+++ b/lisp/utf-2000/Ideograph-R092-Fang.el
@@ -3,36 +3,51 @@
   '((ideographic-radical . 92) ; ⽛
     (ideographic-strokes . 0)
     (=ucs              . #x7259)       ; 牙
-    (=>>jis-x0208      . #x3267)       ; 牙 [18-71]
-    (=>>jis-x0213-1    . #x3267)       ; 牙 [18-71]
+    (=mj               . 016801)       ; &I-MJ016801;
+    (=jis-x0208                . #x3267)       ; &I-J90-3267; [18-71]
+    (=gb2312           . #x5140)       ; &I-G0-5140; [49-32]
+    (=ks-x1001         . #x6433)       ; &I-K0-6433; [68-19]
+    (=cns11643-1       . #x455B)       ; &I-C1-455B; [37-59]
+    (=jis-x0213-1      . #x3267)       ; &I-JX1-3267; [18-71]
     (=big5             . #xA4FA)       ; &I-B-A4FA;
+    (=hanyo-denshi/ja  . #x3267)       ; &I-HD-JA-3267; [18-71]
+    (=hanyo-denshi/hg  . #x3026)       ; &I-HD-HG-3026; [16-06]
+    (=gt               . 25560)        ; &I-GT-25560;
+    (=gt-k             . 00900)        ; &I-GT-K00900;
+    (=gt-pj-1          . #x3267)       ; &I-GT-25560; [18-71]
+    (=daikanwa         . 19909)        ; &I-M-19909;
     (->subsumptive
      ((total-strokes      . 4)
-      (=ucs@unicode      . #x7259)     ; &MJ016801;
-      (=mj               . 016801)     ; &MJ016801;
-      (=gb2312           . #x5140)     ; &I-G0-5140; [49-32]
-      (=cns11643-1       . #x455B)     ; &I-C1-455B; [37-59]
-      (=jis-x0213-1@2004  . #x3267)    ; &I-JX3-3267; [18-71]
-      (=hanyo-denshi/hg          . #x3026)     ; &I-HD-HG-3026; [16-06]
-      (=daikanwa         . 19909)      ; &I-M-19909;
+      (=>>ucs@unicode    . #x7259)     ; &G-JX3-3267;
+      (=>>mj             . 016801)     ; &G-JX3-3267;
+      (=>>cns11643-1     . #x455B)     ; &G-JX3-3267; [37-59]
+      (=>>jis-x0213-1@2004 . #x3267)   ; &G-JX3-3267; [18-71]
+      (=>>hanyo-denshi/hg . #x3026)    ; &G-JX3-3267; [16-06]
+      (=>>daikanwa       . 19909)      ; &G-JX3-3267;
       (->subsumptive
-       ((==daikanwa        . 19909)    ; &R-M-19909;
+       ((==daikanwa        . 19909)    ; &g2-M-19909;
        )
-       ((==ucs@cns         . #x7259)   ; &R-CU+7259;
-       (==cns11643-1       . #x455B)   ; &R-CU+7259; [37-59]
+       ((==ucs@cns         . #x7259)   ; &g2-CU+7259;
+       (==cns11643-1       . #x455B)   ; &g2-CU+7259; [37-59]
        )
        ((=decomposition@hanyo-denshi
         ((=ucs               . #x7259) ; 牙
          )
         ((=ucs               . #xE0103)        ; 󠄃
          ))
-       (==ucs@jis/2004     . #x7259)   ; &R-MJ016801;
-       (==mj               . 016801)   ; &R-MJ016801;
-       (==jis-x0213-1@2004 . #x3267)   ; &R-MJ016801; [18-71]
-       (==hanyo-denshi/hg  . #x3026)   ; &R-MJ016801; [16-06]
-       )
-       ((==ucs@unicode     . #x7259)   ; &R-UU+7259;
-       (==gb2312           . #x5140)   ; &R-UU+7259; [49-32]
+       (==ucs@unicode      . #x7259)   ; &g2-MJ016801;
+       (==mj               . 016801)   ; &g2-MJ016801;
+       (==gb2312           . #x5140)   ; &g2-MJ016801; [49-32]
+       (==jis-x0213-1@2004 . #x3267)   ; &g2-MJ016801; [18-71]
+       (==hanyo-denshi/hg  . #x3026)   ; &g2-MJ016801; [16-06]
+       (->subsumptive
+        ((===jis-x0213-1@2004 . #x3267)        ; &R-JX3-3267; [18-71]
+         (===hanyo-denshi/hg . #x3026) ; &R-JX3-3267; [16-06]
+         )
+        ((===mj              . 016801) ; &R-MJ016801;
+         )
+        ((===ucs@unicode     . #x7259) ; &R-UU+7259;
+         ))
        ))
       )
      ((total-strokes      . 5)
@@ -41,20 +56,34 @@
        )
        ((=ucs              . #xE0102)  ; 󠄂
        ))
-      (=ucs@jis/1990     . #x7259)     ; &MJ016802;
-      (=ucs@jis/2000     . #x7259)     ; &MJ016802;
+      (==ucs@jis/1990    . #x7259)     ; &MJ016802;
+      (==ucs@jis/2000    . #x7259)     ; &MJ016802;
       (=mj               . 016802)     ; &MJ016802;
-      (=jis-x0208        . #x3267)     ; &I-J90-3267; [18-71]
-      (=jis-x0213-1@2000  . #x3267)    ; &I-JX1-3267; [18-71]
-      (=hanyo-denshi/ja          . #x3267)     ; &I-HD-JA-3267; [18-71]
-      (=gt               . 25560)      ; &I-GT-25560;
-      (=gt-k             . 00900)      ; &I-GT-K00900;
-      (=gt-pj-1                  . #x3267)     ; &I-GT-25560; [18-71]
+      (==jis-x0208       . #x3267)     ; &MJ016802; [18-71]
+      (==jis-x0213-1@2000 . #x3267)    ; &MJ016802; [18-71]
+      (==hanyo-denshi/ja  . #x3267)    ; &MJ016802; [18-71]
+      (==gt              . 25560)      ; &MJ016802;
+      (==gt-k            . 00900)      ; &MJ016802;
+      (->subsumptive
+       ((===jis-x0208      . #x3267)   ; &R-J90-3267; [18-71]
+       (===jis-x0213-1@2000 . #x3267)  ; &R-J90-3267; [18-71]
+       )
+       ((===mj             . 016802)   ; &R-MJ016802;
+       )
+       ((===gt             . 25560)    ; &R-GT-25560;
+       (===gt-k            . 00900)    ; &R-GT-25560;
+       ))
       )
      ((total-strokes      . 5)
-      (=ucs@ks           . #x7259)     ; &K0-6433;
-      (=ks-x1001         . #x6433)     ; &K0-6433; [68-19]
-      (=jef-china3       . #x58C5)     ; &I-JC3-58C5;
+      (==ucs@ks                  . #x7259)     ; &g2-K0-6433;
+      (==ks-x1001        . #x6433)     ; &g2-K0-6433; [68-19]
+      (=jef-china3       . #x58C5)     ; &g2-K0-6433;
+      (->subsumptive
+       ((===ucs@ks         . #x7259)   ; &R-K0-6433;
+       (===ks-x1001        . #x6433)   ; &R-K0-6433; [68-19]
+       )
+       ((===jef-china3     . #x58C5)   ; &R-JC3-58C5;
+       ))
       ))
     ))
 (define-char