(U+6B7B): Add `<-denotational@component' for A-IWDSU+6B7B.

(A-IWDSU+6B7B): New abstract node; unify IWDS1-0445.

diff --git a/lisp/utf-2000/Ideograph-R078-Death.el b/lisp/utf-2000/Ideograph-R078-Death.el
index 2ba722a..4d520f0 100644 (file)
--- a/lisp/utf-2000/Ideograph-R078-Death.el
+++ b/lisp/utf-2000/Ideograph-R078-Death.el
@@ -428,6 +428,10 @@
   '((<-denotational
      ((=>ucs@cognate     . #x6B7B)     ; &A-cgnU+6B7B;
       ))
+    (<-denotational@component
+     ((=>ucs@iwds-1      . #x6B7B)     ; &A-IWDSU+6B7B;
+      (=>iwds-1                  .  0445)      ; &A-IWDSU+6B7B;
+      ))
     (ideographic-radical . 78) ; ⽍
     (ideographic-strokes . 2)
     (total-strokes      . 6)
@@ -8932,6 +8936,12 @@
     ))
 (define-char
   '((ideographic-radical . 78) ; ⽍
+    (=>iwds-1*level    . 2)
+    (=>ucs@iwds-1      . #x6B7B)       ; &A-IWDSU+6B7B;
+    (=>iwds-1          .  0445)        ; &A-IWDSU+6B7B;
+    ))
+(define-char
+  '((ideographic-radical . 78) ; ⽍
     (hanyu-dazidian    2 1381 3)
     (=ucs              . #x239BE)      ; 𣦾
     (=hanziku-4                . #xC44B)       ; &I-HZK04-C44B;