(U+5277): Add ideographic-structure.

(mother of JX2-233C): Unify G-JU+5277 and G-CU+5277; add
ideographic-structure.
(G-UU+5277): New abstract glyph.
(C3-4043): Use `<-subsumptive' for G-UU+5277.

diff --git a/lisp/utf-2000/Ideograph-R018-Knife.el b/lisp/utf-2000/Ideograph-R018-Knife.el
index fed22c3..8a7c2a9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R018-Knife.el
+++ b/lisp/utf-2000/Ideograph-R018-Knife.el
@@ -6810,6 +6810,15 @@
     (ideographic-strokes . 11)
     (total-strokes      . 13)
     (hanyu-dazidian    1 354 11)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=>jis-x0208       . #x3B3A)     ; &J97-3B3A; [27-26]
+      )
+     ((name              . "CJK RADICAL KNIFE TWO")
+      (=ucs              . #x2E89)     ; ⺉
+      ))
     (=ucs              . #x5277)       ; 剷
     (=big5             . #xB6D0)       ; &I-B-B6D0;
     ))
@@ -6820,6 +6829,17 @@
     (ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 11)
     (total-strokes      . 13)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x7522)     ; 產
+      )
+     ((name              . "CJK RADICAL KNIFE TWO")
+      (=ucs              . #x2E89)     ; ⺉
+      ))
+    (=>>ucs@jis                . #x5277)       ; &G-JU+5277;
+    (=>>ucs@cns                . #x5277)       ; &G-JU+5277;
     (->subsumptive
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -6856,7 +6876,6 @@
   '((<-denotational
      ((=ucs              . #x5277)     ; 剷
       ))
-    (=>ucs*            . #x5277)       ; 剷
     (ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 11)
     (total-strokes      . 13)
@@ -6864,16 +6883,30 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs@unicode      . #x7523)     ; &C3-3745;
-      (=cns11643-3       . #x3745)     ; &C3-3745; [23-37]
+     ((=ucs              . #x7523)     ; 産
       )
      ((name              . "CJK RADICAL KNIFE TWO")
       (=ucs              . #x2E89)     ; ⺉
       ))
-    (=ucs              . #x2F823)      ; 剷
-    (=ucs@unicode      . #x5277)       ; 剷
-    (=ucs@cns          . #x2F823)      ; 剷
-    (=cns11643-3       . #x4043)       ; &I-C3-4043; [32-35]
+    (=>>ucs@unicode    . #x5277)       ; &G-UU+5277;
+    (=>>ucs@cns                . #x2F823)      ; &G-UU+5277;
+    (->subsumptive
+     ((=>ucs*            . #x5277)     ; 剷
+      (ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ucs@unicode      . #x7523)   ; &C3-3745;
+       (=cns11643-3        . #x3745)   ; &C3-3745; [23-37]
+       )
+       ((name              . "CJK RADICAL KNIFE TWO")
+       (=ucs               . #x2E89)   ; ⺉
+       ))
+      (=ucs              . #x2F823)    ; 剷
+      (=ucs@unicode      . #x5277)     ; 剷
+      (=ucs@cns                  . #x2F823)    ; 剷
+      (=cns11643-3       . #x4043)     ; &I-C3-4043; [32-35]
+      ))
     ))
 (define-char
   '((ideographic-radical . 18) ; ⼑