From a6d34c6e078912d780aaae55a1b1638e8df9ba10 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 5 Feb 2018 11:55:49 +0900
Subject: [PATCH] (GT-K00083): Use `<-denotational@component' for IWDS1-0047
 instead of `<-denotational' for U+4E8C.

---
 lisp/utf-2000/Ideograph-R007-Two.el |    9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R007-Two.el b/lisp/utf-2000/Ideograph-R007-Two.el
index ed502c5..93ef333 100644
--- 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
-- 
1.7.10.4