(A-compU+20041): New abstract node; use `<-denotational' for

A-IWDSU+20041.
(U-00020041): Use A-compU+20041 instead of A-IWDSU+20041 as its
mother.
(U-0002CEDE): Likewise.

diff --git a/lisp/utf-2000/Ideograph-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index 7ca9e3c..05945c9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -9382,6 +9382,13 @@
      ((=>ucs@iwds-1      . #x20041)    ; &A-IWDSU+20041;
       (=>iwds-1                  .  0161)      ; &A-IWDSU+20041;
       ))
+    (ideographic-radical . 1)  ; ⼀
+    (=>ucs@component   . #x20041)      ; &A-compU+20041;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@component   . #x20041)    ; &A-compU+20041;
+      ))
     (<-denotational@usage
      ((==>daijiten       . 00042)      ; &A2-DJT-00042;
       ))
@@ -9509,8 +9516,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@iwds-1      . #x20041)    ; &A-IWDSU+20041;
-      (=>iwds-1                  .  0161)      ; &A-IWDSU+20041;
+     ((=>ucs@component   . #x20041)    ; &A-compU+20041;
       ))
     (ideographic-radical . 1)  ; ⼀
     (ideographic-strokes@ucs . 9)