(A-U+22376-itaiji-001): Apply new conventions for glyph granularity.

diff --git a/lisp/utf-2000/Ideograph-R016-Table.el b/lisp/utf-2000/Ideograph-R016-Table.el
index 850b88a..293dffb 100644 (file)
--- a/lisp/utf-2000/Ideograph-R016-Table.el
+++ b/lisp/utf-2000/Ideograph-R016-Table.el
@@ -4148,30 +4148,18 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=ucs@jis                  . #x470C)     ; &AJ1-18690;
+     ((=ucs@unicode      . #x470C)     ; &AJ1-18690;
       (=adobe-japan1-5   . 18690)      ; &AJ1-18690;
       )
      ((=ucs              . #x51E0)     ; 几
       ))
     (=ucs-itaiji-001   . #x22376)      ; &U-i001+22376;
-    ))
-(define-char
-  '((<-denotational
-     ((=>ucs-itaiji-001          . #x22376)    ; &A-U-i001+22376;
-      ))
-    (ideographic-radical . 16) ; ⼏
-    (ideographic-strokes . 19)
-    (total-strokes      . 21)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs              . #x2FF1)     ; ⿱
-      )
-     ((=ucs@unicode      . #x470C)     ; &C5-6952;
-      (=cns11643-5       . #x6952)     ; &C5-6952; [73-50]
+    (=ucs-itaiji-002   . #x22376)      ; &U-i001+22376;
+    (->subsumptive
+     ((==ucs-itaiji-001          . #x22376)    ; &g2-U-i001+22376;
       )
-     ((=ucs              . #x51E0)     ; 几
+     ((==ucs-itaiji-002          . #x22376)    ; &g2-U-i002+22376;
       ))
-    (=ucs-itaiji-002   . #x22376)      ; &U-i002+22376;
     ))
 (define-char
   '((ideographic-radical . 16) ; ⼏