(A-compU+7680): Separated from IWDS1-0355; add

`<-denotational@component' for IWDS1-0355.
(U+7680): Use `<-denotational' for A-compU+7680 instead of
`<-denotational@component' for IWDS1-0355.
(GT-K02802): Likewise.
(IWDS1-0355): Unify A-IWDSU+7680 instead of A-compU+7680.

diff --git a/lisp/utf-2000/Ideograph-R106-White.el b/lisp/utf-2000/Ideograph-R106-White.el
index 5f8c60d..84e753f 100644 (file)
--- a/lisp/utf-2000/Ideograph-R106-White.el
+++ b/lisp/utf-2000/Ideograph-R106-White.el
@@ -136,8 +136,15 @@
     ))
 (define-char
   '((<-denotational@component
+     ((=>ucs@iwds-1      . #x7680)     ; &A-IWDSU+7680;
+      (=>iwds-1                  .  0355)      ; &A-IWDSU+7680;
+      ))
+    (ideographic-radical . 106)        ; ⽩
+    (=>ucs@component   . #x7680)       ; &A-compU+7680;
+    ))
+(define-char
+  '((<-denotational
      ((=>ucs@component   . #x7680)     ; &A-compU+7680;
-      (=>iwds-1                  .  0355)      ; &A-compU+7680;
       ))
     (ideographic-radical . 106)        ; ⽩
     (ideographic-structure
@@ -225,9 +232,8 @@
       ))
     ))
 (define-char
-  '((<-denotational@component
+  '((<-denotational
      ((=>ucs@component   . #x7680)     ; &A-compU+7680;
-      (=>iwds-1                  .  0355)      ; &A-compU+7680;
       ))
     (ideographic-radical . 106)        ; ⽩
     (ideographic-strokes . 2)
@@ -3086,6 +3092,6 @@
     ))
 (define-char
   '((ideographic-radical . 106)        ; ⽩
-    (=>ucs@component   . #x7680)       ; &A-compU+7680;
-    (=>iwds-1          .  0355)        ; &A-compU+7680;
+    (=>ucs@iwds-1      . #x7680)       ; &A-IWDSU+7680;
+    (=>iwds-1          .  0355)        ; &A-IWDSU+7680;
     ))