(GT-K00083): Use `<-denotational@component' for IWDS1-0047 instead of

`<-denotational' for U+4E8C.

diff --git a/lisp/utf-2000/Ideograph-R007-Two.el b/lisp/utf-2000/Ideograph-R007-Two.el
index ed502c5..93ef333 100644 (file)
--- a/lisp/utf-2000/Ideograph-R007-Two.el
+++ b/lisp/utf-2000/Ideograph-R007-Two.el
@@ -114,8 +114,9 @@
       ))
     ))
 (define-char
-  '((<-denotational
-     ((=ucs              . #x4E8C)     ; 二
+  '((<-denotational@component
+     ((=>ucs@iwds-1      . #x4E8C)     ; &A-IWDSU+4E8C;
+      (=>iwds-1                  .  0047)      ; &A-IWDSU+4E8C;
       ))
     (ideographic-radical . 7)  ; ⼆
     (ideographic-strokes . 0)
@@ -125,6 +126,10 @@
     (<-formed@component
      ((=ucs              . #x4E8C)     ; 二
       ))
+    (->subsumptive
+     ((==gt-k            . 00083)      ; &g2-GT-K00083;
+      (==gt-pj-k1        . #x3B78)     ; &g2-GT-K00083; [27-88]
+      ))
     ))
 (define-char
   '((<-denotational@component