From 438c85d7ff7c5a2e8d13aa9d04ba8661590a1d51 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 8 May 2019 16:11:40 +0900
Subject: [PATCH] (IWDS1-0141): Add `=>iwds-1*note'. (U-0002B743): Use
 A-IWDSU+723E instead of A-cgnU+723E as its mother; add
 `ideographic-structure'. (HD-TK01056730): Add
 `ideographic-structure'. (IU+2B743): Add
 `ideographic-structure'. (IWDS1-0221): Add
 `<-denotational@component' for A-IWDSU+4E38 and
 A-compU+5EFE.

---
 lisp/utf-2000/Ideograph-R001-One.el |   40 ++++++++++++++++++++++++++++++++---
 1 file changed, 37 insertions(+), 3 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index 3693b76..6f63e0c 100644
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -370,6 +370,7 @@
     (ideographic-radical . 1)	; ⼀
     (ideographic-strokes . 1)
     (total-strokes	 . 2)
+    (=>iwds-1*note	"140+141")
     (=>ucs@iwds-1	. #x4E03)	; &A-IWDSU+4E03;
     (=>iwds-1		.  0141)	; &A-IWDSU+4E03;
     ))
@@ -6723,11 +6724,19 @@
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@cognate	  . #x723E)	; &A-cgnU+723E;
+     ((=>ucs@iwds-1	  . #x723E)	; &A-IWDSU+723E;
       ))
     (ideographic-radical . 1)	; ⼀
     (ideographic-strokes . 13)
     (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x4E00)	; 一
+      )
+     ((=>big5-cdp-itaiji-001 . #x88D6)	; &A-CDP-i001-88D6;
+      ))
     (=ucs		. #x2B743)	; 𫝃
     (<-formed
      ((=ucs		  . #x723E)	; 爾
@@ -6740,10 +6749,19 @@
     (ideographic-radical . 1)	; ⼀
     (ideographic-strokes . 13)
     (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x4E00)	; 一
+      )
+     ((=big5-cdp-itaiji-001 . #x88D6)	; &CDP-i001-88D6;
+      ))
     (=hanyo-denshi/tk	. 01056730)	; &HD-TK-01056730;
+    (=hanyo-denshi/tk/mf-01 . #x1629)	; &HD-TK-01056730;
     (->subsumptive
      ((==hanyo-denshi/tk  . 01056730)	; &g2-HD-TK-01056730;
-      (=hanyo-denshi/tk/mf-01 . #x1629)	; &g2-HD-TK-01056730;
+      (==hanyo-denshi/tk/mf-01 . #x1629)	; &g2-HD-TK-01056730;
       ))
     ))
 (define-char
@@ -6753,6 +6771,16 @@
     (ideographic-radical . 1)	; ⼀
     (ideographic-strokes . 13)
     (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs		  . #x2FF3)	; ⿳
+      )
+     ((=ucs		  . #x4E00)	; 一
+      )
+     ((=ucs		  . #x4E37)	; 丷
+      )
+     ((=big5-cdp-var-001  . #x8569)	; &CDP-v001-8569;
+      ))
     (=ucs@iso		. #x2B743)	; &MJ058020;
     (=mj		. 058020)	; &MJ058020;
     (=hanyo-denshi/jt	. #xADA4)	; &I-HD-JT-ADA4;
@@ -6945,7 +6973,13 @@
     (=>ucs@component	. #x4E0A)	; &A-compU+4E0A;
     ))
 (define-char
-  '((ideographic-radical . 1)	; ⼀
+  '((<-denotational@component
+     ((=>ucs@iwds-1	  . #x4E38)	; &A-IWDSU+4E38;
+      (=>iwds-1		  .  65535)	; &A-IWDSU+4E38;
+      )
+     ((=>ucs@component	  . #x5EFE)	; &A-compU+5EFE;
+      ))
+    (ideographic-radical . 1)	; ⼀
     (=>ucs@component	. #x4E0C)	; &A-compU+4E0C;
     (=>iwds-1		.  0221)	; &A-compU+4E0C;
     ))
-- 
1.7.10.4