From e4d344dd8f680fa144fadbb977f1abaedfed9955 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 15 Jan 2020 20:05:59 +0900
Subject: [PATCH] (U+5DE5-var-004): New character; use `<-denotational' for
 U+5DE5. (BC-8C78): Add `<-denotational@component' for
 A-compU+5DE5. (A-BC-86C9): New abstract node. (BC-86C9):
 Add `<-denotational' for A-BC-86C9. (BC-88D7): Add
 `<-denotational' for U-000200EC.

---
 lisp/utf-2000/Ideograph-R048-Work.el |   34 ++++++++++++++++++++++++++++++++--
 1 file changed, 32 insertions(+), 2 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R048-Work.el b/lisp/utf-2000/Ideograph-R048-Work.el
index bed87aa..f5eed77 100644
--- a/lisp/utf-2000/Ideograph-R048-Work.el
+++ b/lisp/utf-2000/Ideograph-R048-Work.el
@@ -93,6 +93,15 @@
     (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 0)
     (total-strokes	 . 3)
+    (=ucs-var-004	. #x5DE5)	; &U-v004+5DE5;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x5DE5)	; å·¥
+      ))
+    (ideographic-radical . 48)	; ⼯
+    (ideographic-strokes . 0)
+    (total-strokes	 . 3)
     (=adobe-japan1-4	. 13763)	; &AJ1-13763;
     (->subsumptive
      ((=decomposition@cid
@@ -126,7 +135,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 48)	; ⼯
+  '((<-denotational@component
+     ((=>ucs@component	  . #x5DE5)	; &A-compU+5DE5;
+      ))
+    (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 0)
     (total-strokes	 . 3)
     (=big5-cdp		. #x8C78)	; &CDP-8C78;
@@ -802,6 +814,21 @@
     ))
 (define-char
   '((ideographic-radical . 48)	; ⼯
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND")
+      (=ucs		  . #x2FF4)	; â¿´
+      )
+     ((=ucs		  . #x5DF1)	; å·±
+      )
+     ((=>ucs@component	  . #x5DE5)	; &A-compU+5DE5;
+      ))
+    (=>big5-cdp		. #x86C9)	; &A-CDP-86C9;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp	  . #x86C9)	; &A-CDP-86C9;
+      ))
+    (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
     (ideographic-structure
@@ -1032,7 +1059,10 @@
     (=gb12345		. #x7D44)	; å·­ [93-36]
     ))
 (define-char
-  '((ideographic-radical . 48)	; ⼯
+  '((<-denotational
+     ((=ucs		  . #x200EC)	; 𠃬
+      ))
+    (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 6)
     (total-strokes	 . 9)
     (ideographic-structure
-- 
1.7.10.4