(G-IU+2F9FB): New node; add `<-denotational' for U-0002940A.

(M-43253): Add `<-subsumptive' for G-IU+2F9FB.
(C7-4B6B): Unify U-0002F9FB; add `<-subsumptive' for G-IU+2F9FB.
(A-IU+2940A): New node; add `<-denotational' for U-0002940A.
(G-GT-58097): Use A-IU+2940A instead of U-0002940A as the mother.
(IU+2940A): Likewise.
(C7-5148): Likewise.

diff --git a/lisp/utf-2000/Ideograph-R179-Leek.el b/lisp/utf-2000/Ideograph-R179-Leek.el
index b55f074..cb63835 100644 (file)
--- a/lisp/utf-2000/Ideograph-R179-Leek.el
+++ b/lisp/utf-2000/Ideograph-R179-Leek.el
@@ -207,16 +207,27 @@
     ))
 (define-char
   '((ideographic-radical . 179)        ; ⾲
-    (ideographic-strokes . 10)
-    (total-strokes      . 19)
-    (=daikanwa         . 43253)        ; &M-43253;
+    (ideographic-strokes . 11)
+    (total-strokes      . 20)
+    (=ucs              . #x2940A)      ; 𩐊
     ))
 (define-char
-  '((morohashi-daikanwa        43253 0 1)
+  '((<-denotational
+     ((=ucs              . #x2940A)    ; 𩐊
+      ))
     (ideographic-radical . 179)        ; ⾲
     (ideographic-strokes . 10)
     (total-strokes      . 19)
-    (=cns11643-7       . #x4B6B)       ; &C7-4B6B; [43-75]
+    (=>ucs@iso         . #x2F9FB)      ; &A-IU+2F9FB;
+    (=>>ucs@iso                . #x2F9FB)      ; &A-IU+2F9FB;
+    (=>>daikanwa       . 43253)        ; &A-IU+2F9FB;
+    (->subsumptive
+     ((=daikanwa         . 43253)      ; &M-43253;
+      )
+     ((=>ucs*            . #x2940A)    ; 𩐊
+      (=ucs              . #x2F9FB)    ; 𩐊
+      (=cns11643-7       . #x4B6B)     ; &I-C7-4B6B; [43-75]
+      ))
     ))
 (define-char
   '((ideographic-radical@ucs . 28)     ; ⼛
@@ -300,14 +311,18 @@
     (=ucs@iso          . #x2940D)      ; &U-0002940D;
     ))
 (define-char
-  '((ideographic-radical . 179)        ; ⾲
+  '((<-denotational
+     ((=ucs              . #x2940A)    ; 𩐊
+      ))
+    (ideographic-radical . 179)        ; ⾲
     (ideographic-strokes . 11)
     (total-strokes      . 20)
-    (=ucs              . #x2940A)      ; 𩐊
+    (=>ucs@iso         . #x2940A)      ; &A-GT-58097;
+    (=>gt              . 58097)        ; &A-GT-58097;
     ))
 (define-char
   '((<-denotational
-     ((=ucs              . #x2940A)    ; 𩐊
+     ((=>ucs@iso         . #x2940A)    ; &A-GT-58097;
       ))
     (ideographic-radical . 179)        ; ⾲
     (ideographic-strokes . 11)
@@ -322,7 +337,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs              . #x2940A)    ; 𩐊
+     ((=>ucs@iso         . #x2940A)    ; &A-GT-58097;
       ))
     (ideographic-radical . 179)        ; ⾲
     (ideographic-strokes . 11)
@@ -331,7 +346,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs              . #x2940A)    ; 𩐊
+     ((=>ucs@iso         . #x2940A)    ; &A-GT-58097;
       ))
     (ideographic-radical . 179)        ; ⾲
     (ideographic-strokes . 11)