From 20d0a92df38e3b73e0f2c5fb5be41e4450481dcf Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 20 Dec 2018 10:10:50 +0800
Subject: [PATCH] (U-00020110): New character. (A-cgnU+4E88): Changed from
 U+4E88. (AJ1-03879): Unify U+4E88 instead of A-IWDSU+4E88
 and UU+4E88; use A-cgnU+4E88 instead of U+4E88 as its
 mother. (HNG-TZS0005-0): Use A-cgnU+4E88 instead of U+4E88
 as its mother. (GT-K00846): New character; use
 `<-denotational' for A-cgnU+4E88.

---
 lisp/utf-2000/Ideograph-R006-Hook.el |   44 ++++++++++++++++++++++++++++------
 1 file changed, 37 insertions(+), 7 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R006-Hook.el b/lisp/utf-2000/Ideograph-R006-Hook.el
index c0c2d6b..9e8eae3 100644
--- a/lisp/utf-2000/Ideograph-R006-Hook.el
+++ b/lisp/utf-2000/Ideograph-R006-Hook.el
@@ -253,6 +253,15 @@
     ))
 (define-char
   '((ideographic-radical . 6)	; ⼅
+    (ideographic-strokes . 1)
+    (total-strokes	 . 2)
+    (=ucs		. #x20110)	; 𠄐
+    (->subsumptive
+     ((==ucs@iso	  . #x20110)	; &g2-IU-00020110;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 6)	; ⼅
     (ideographic-strokes . 2)
     (total-strokes	 . 3)
     (hanyu-dazidian	1 51 4)
@@ -304,11 +313,11 @@
   '((ideographic-radical . 6)	; ⼅
     (ideographic-strokes . 3)
     (total-strokes	 . 4)
-    (=ucs		. #x4E88)	; 予
+    (=>ucs@cognate	. #x4E88)	; &A-cgnU+4E88;
     ))
 (define-char
   '((<-denotational
-     ((=ucs		  . #x4E88)	; 予
+     ((=>ucs@cognate	  . #x4E88)	; &A-cgnU+4E88;
       ))
     (ideographic-radical . 6)	; ⼅
     (ideographic-strokes . 3)
@@ -316,9 +325,8 @@
     (hanyu-dazidian	1 52 2)
     (sound@ja/kun	"arakazi-me" "kane-te")
     (sound@ja/on	"yo")
-    (=>ucs@iwds-1	. #x4E88)	; &AJ1-03879;
-    (=ucs@unicode	. #x4E88)	; &AJ1-03879;
-    (=adobe-japan1-0	. 03879)	; &AJ1-03879;
+    (=ucs		. #x4E88)	; 予
+    (=adobe-japan1-0	. 03879)	; &I-AJ1-03879;
     (=jis-x0208		. #x4D3D)	; &I-J90-4D3D; [45-29]
     (=gb2312		. #x5368)	; &I-G0-5368; [51-72]
     (=ks-x1001		. #x6578)	; &I-K0-6578; [69-88]
@@ -329,7 +337,7 @@
     (=gt-k		. 00505)	; &I-GT-K00505;
     (=gt-pj-1		. #x4D3D)	; &I-GT-00312; [45-29]
     (=daikanwa		. 00231)	; &I-M-00231;
-    (=shinjigen		.  0067)	; &AJ1-03879;
+    (=shinjigen		.  0067)	; 予
     (<-simplified@JP/Jouyou
      ((=ucs@unicode	  . #x8C6B)	; &MJ024939;
       (=mj		  . 024939)	; &MJ024939;
@@ -371,7 +379,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs		  . #x4E88)	; 予
+     ((=>ucs@cognate	  . #x4E88)	; &A-cgnU+4E88;
       ))
     (ideographic-radical . 6)	; ⼅
     (ideographic-strokes . 4)
@@ -379,6 +387,28 @@
     (===hng-tzs		. 00050)	; &HNG060-00050;
     ))
 (define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x4E88)	; &A-cgnU+4E88;
+      ))
+    (ideographic-radical . 6)	; ⼅
+    (ideographic-strokes . 3)
+    (total-strokes	 . 4)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=big5-cdp	  . #x8C78)	; &CDP-8C78;
+      )
+     ((=ucs		  . #x20110)	; 𠄐
+      ))
+    (=gt-k		. 00846)	; &GT-K00846;
+    (=gt-pj-k1		. #x5C4B)	; &GT-K00846; [60-43]
+    (->subsumptive
+     ((==gt-k		  . 00846)	; &g2-GT-K00846;
+      (==gt-pj-k1	  . #x5C4B)	; &g2-GT-K00846; [60-43]
+      ))
+    ))
+(define-char
   '((ideographic-radical . 6)	; ⼅
     (ideographic-strokes . 3)
     (total-strokes	 . 4)
-- 
1.7.10.4