(J0-405A): Moved into U+5207.

(U+5207): Use `->subsumptive'.
(S1-0597): Use `<-denotational' for U+5207; use `<-wrong*sources'
instead of char-ref in `<-wrong'.
(M-02103): Moved into U-00020771; use `<-wrong*sources' instead of
char-ref in `<-wrong'.
(U-00020771): Use `->subsumptive'.

diff --git a/lisp/utf-2000/Ideograph-R018-Knife.el b/lisp/utf-2000/Ideograph-R018-Knife.el
index 414211b..747562d 100644 (file)
--- a/lisp/utf-2000/Ideograph-R018-Knife.el
+++ b/lisp/utf-2000/Ideograph-R018-Knife.el
@@ -290,60 +290,52 @@
     (=cns11643-5       . #x213B)       ; &C5-213B;
     ))
 (define-char
-  '((=>ucs             . #x5207)       ; 切
-    (ideographic-radical . 18) ; ⼑
-    (ideographic-strokes . 2)
-    (total-strokes      . 4)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs              . #x2FF0)     ; ⿰
-      )
-     ((=ucs              . #x4E03)     ; 七
-      )
-     ((=ucs              . #x5200)     ; 刀
-      ))
-    (shinjigen-1       . 596)
-    (shinjigen-2       . 596)
-    (=jis-x0208                . #x405A)       ; &GT-02415;
-    (=ks-x1001         . #x6F37)       ; &I-K0-6F37;
-    (=big5             . #xA4C1)       ; &I-B-A4C1;
-    (=gt               . 02415)        ; &I-GT-02415;
-    (=gt-k             . 00456)        ; &I-GT-K00456;
-    (=gt-pj-1          . #x405A)       ; &I-GT-02415;
-    (=daikanwa         . 01858)        ; &I-M-01858;
-    (=ucs@jis          . #x5207)       ; &GT-02415;
-    (=ucs@big5         . #x5207)       ; &GT-02415;
-    ))
-(define-char
-  '((morohashi-daikanwa        1858 0 1)
-    (ideographic-radical . 18) ; ⼑
+  '((ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 2)
     (total-strokes      . 4)
-    (hanyu-dazidian    1 320 5)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs              . #x2FF0)     ; ⿰
-      )
-     ((=ucs              . #x4E03)     ; 七
+    (=ucs              . #x5207)       ; 切
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ucs              . #x4E03)   ; 七
+       )
+       ((=ucs              . #x5200)   ; 刀
+       ))
+      (shinjigen-1       . 596)
+      (shinjigen-2       . 596)
+      (=jis-x0208        . #x405A)     ; &GT-02415;
+      (=ks-x1001         . #x6F37)     ; &I-K0-6F37;
+      (=big5             . #xA4C1)     ; &I-B-A4C1;
+      (=gt               . 02415)      ; &I-GT-02415;
+      (=gt-k             . 00456)      ; &I-GT-K00456;
+      (=gt-pj-1                  . #x405A)     ; &I-GT-02415;
+      (=daikanwa         . 01858)      ; &I-M-01858;
+      (=ucs@jis                  . #x5207)     ; &GT-02415;
+      (=ucs@big5         . #x5207)     ; &GT-02415;
       )
-     ((=ucs              . #x5200)     ; 刀
+     ((hanyu-dazidian    1 320 5)
+      (=gb2312           . #x4750)     ; &C1-4522;
+      (=cns11643-1       . #x4522)     ; &I-C1-4522;
+      (=ucs@unicode      . #x5207)     ; &C1-4522;
       ))
-    (=ucs              . #x5207)       ; 切
-    (=gb2312           . #x4750)       ; &I-G0-4750;
-    (=cns11643-1       . #x4522)       ; &I-C1-4522;
     ))
 (define-char
-  '((=>ucs             . #x5207)       ; 切
-    (morohashi-daikanwa        1858 0 2)
-    (ideographic-radical . 18) ; ⼑
+  '((ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 3)
     (total-strokes      . 5)
+    (<-denotational
+     ((=ucs              . #x5207)     ; 切
+      ))
     (<-wrong
-     (:sources (shinjigen-1)
-      :char    ((shinjigen-1        . 596)
-                (=daikanwa          . 01858)   ; &I-M-01858;
-                )
+     ((shinjigen-1       . 596)
+      (=jis-x0208        . #x405A)     ; &GT-02415;
+      (=ks-x1001         . #x6F37)     ; &I-K0-6F37;
+      (=daikanwa         . 01858)      ; &I-M-01858;
       ))
+    (<-wrong*sources
+     shinjigen-1)
     (shinjigen-1       . 597)
     ))
 (define-char
@@ -5247,24 +5239,22 @@
     (=daikanwa         . 02102)        ; &I-M-02102;
     ))
 (define-char
-  '((=>ucs             . #x20771)      ; 𠝱
-    (ideographic-radical . 18) ; ⼑
-    (ideographic-strokes . 9)
-    (total-strokes      . 11)
-    (<-wrong
-     (:sources (jiiho morohashi-daikanwa)
-      :char    ((=daikanwa          . 02144)   ; &I-M-02144;
-                )
-      ))
-    (=daikanwa         . 02103)        ; &M-02103;
-    ))
-(define-char
-  '((morohashi-daikanwa        2103 0 1)
-    (ideographic-radical . 18) ; ⼑
+  '((ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 9)
     (total-strokes      . 11)
     (=ucs              . #x20771)      ; 𠝱
-    (=cns11643-6       . #x3D48)       ; &I-C6-3D48;
+    (->subsumptive
+     ((<-wrong
+       ((=ucs              . #x34FC)   ; 㓼
+       (=daikanwa          . 02144)    ; &I-M-02144;
+       ))
+      (<-wrong*sources
+       zihui-bei daikanwa)
+      (=daikanwa         . 02103)      ; &M-02103;
+      )
+     ((=cns11643-6       . #x3D48)     ; &C6-3D48;
+      (=ucs@unicode      . #x20771)    ; &C6-3D48;
+      ))
     ))
 (define-char
   '((ideographic-radical . 18) ; ⼑