(C6-345D): Unify U-0002F9DD; use `<-subsumptive' for U-000208DE.

diff --git a/lisp/utf-2000/Ideograph-R159-Cart.el b/lisp/utf-2000/Ideograph-R159-Cart.el
index 759d8a2..c5055d3 100644 (file)
--- a/lisp/utf-2000/Ideograph-R159-Cart.el
+++ b/lisp/utf-2000/Ideograph-R159-Cart.el
@@ -152,11 +152,41 @@
     (=daikanwa         . 38179)        ; &I-M-38179;
     ))
 (define-char
     (=daikanwa         . 38179)        ; &I-M-38179;
     ))
 (define-char

-  '((ideographic-radical . 159)        ; ⾞
-    (ideographic-strokes . 2)
+  '((ideographic-radical@ucs . 20)     ; ⼓
+    (ideographic-strokes@ucs . 7)
+    (ideographic-radical@ucs*sources
+     daikanwa=02526 cns11643-6=2F2A)
+    (ideographic-strokes@ucs*sources
+     daikanwa=02526)
+    (ideographic-radical@ucs/compat . 159)     ; ⾞
+    (ideographic-strokes@ucs/compat . 2)
+    (ideographic-radical@ucs/compat*sources
+     daikanwa=38180 cns11643-6=345D)
+    (ideographic-strokes@ucs/compat*sources
+     daikanwa=38180)

     (total-strokes      . 9)
     (total-strokes      . 9)

-    (=cns11643-6       . #x345D)       ; &M-38180; [20-61]
-    (=daikanwa         . 38180)        ; &I-M-38180;
+    (sound@ja/on       "guN")
+    (=ucs              . #x208DE)      ; 𠣞
+    (<-original
+     ((=ucs              . #x8ECD)     ; 軍
+      (=daikanwa         . 38179)      ; &I-M-38179;
+      ))
+    (<-original*sources
+     zhengzitong daikanwa)
+    (->subsumptive
+     ((ideographic-radical . 20)       ; ⼓
+      (ideographic-strokes . 7)
+      (=cns11643-6       . #x2F2A)     ; &M-02526; [15-10]
+      (=daikanwa         . 02526)      ; &I-M-02526;
+      (=ucs@cns                  . #x208DE)    ; &M-02526;
+      )
+     ((=>ucs*            . #x208DE)    ; 𠣞
+      (ideographic-radical . 159)      ; ⾞
+      (ideographic-strokes . 2)
+      (=ucs              . #x2F9DD)    ; 𠣞
+      (=cns11643-6       . #x345D)     ; &I-C6-345D; [20-61]
+      (=daikanwa         . 38180)      ; &I-M-38180;
+      ))

     ))
 (define-char
   '((ideographic-radical . 159)        ; ⾞
     ))
 (define-char
   '((ideographic-radical . 159)        ; ⾞