(U-00021FEE): Add `ideographic-radical@{ucs|cns}'.

(mother of C6-237E): Unify G-CU+21FEE and G-M-03081.
(C6-237E): Unify CU+21FEE.
(mother of IU+21FEE): Unify G-IU+21FEE, g2-IU+21FEE and G-M-08682.

diff --git a/lisp/utf-2000/Ideograph-R028-Private.el b/lisp/utf-2000/Ideograph-R028-Private.el
index c07e3af..9c034e2 100644 (file)
--- a/lisp/utf-2000/Ideograph-R028-Private.el
+++ b/lisp/utf-2000/Ideograph-R028-Private.el
@@ -473,20 +473,28 @@
     (=hanziku-1                . #xAEE3)       ; &I-HZK01-AEE3;
     ))
 (define-char
-  '((=ucs              . #x21FEE)      ; 𡿮
+  '((ideographic-radical@ucs . 47)     ; ⼮
+    (ideographic-radical@cns . 28)     ; ⼛
+    (=ucs              . #x21FEE)      ; 𡿮
     (->subsumptive
      ((ideographic-radical . 28)       ; ⼛
       (ideographic-strokes . 4)
       (total-strokes      . 6)
+      (=>>ucs@cns        . #x21FEE)    ; &G-CU+21FEE;
+      (=>>daikanwa       . 03081)      ; &G-CU+21FEE;
       (->subsumptive
        ((=daikanwa         . 03081)    ; &M-03081;
        )
-       ((=cns11643-6       . #x237E)   ; &C6-237E; [03-94]
+       ((=ucs@cns          . #x21FEE)  ; &C6-237E;
+       (=cns11643-6        . #x237E)   ; &C6-237E; [03-94]
        ))
       )
      ((ideographic-radical . 47)       ; ⼮
       (ideographic-strokes . 4)
       (total-strokes      . 7)
+      (=>>ucs@iso        . #x21FEE)    ; &G-IU+21FEE;
+      (=>>>ucs@iso       . #x21FEE)    ; &G-IU+21FEE;
+      (=>>daikanwa       . 08682)      ; &G-IU+21FEE;
       (->subsumptive
        ((=daikanwa         . 08682)    ; &M-08682;
        )