From 1185deeafa50904f71fd9373d25086cfafddc630 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 8 Jul 2017 23:36:19 +0900
Subject: [PATCH 1/1] (UU+752B): Add `ideographic-structure'. (BC-86B7): New
 character; use `<-denotational' for U+752B.

---
 lisp/utf-2000/Ideograph-R101-Use.el |   20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)

diff --git a/lisp/utf-2000/Ideograph-R101-Use.el b/lisp/utf-2000/Ideograph-R101-Use.el
index d8a31b4..c6fa0fd 100644
--- a/lisp/utf-2000/Ideograph-R101-Use.el
+++ b/lisp/utf-2000/Ideograph-R101-Use.el
@@ -181,6 +181,14 @@
     (ideographic-radical . 101)	; ⽤
     (ideographic-strokes . 2)
     (total-strokes	 . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
+      (=ucs		  . #x2FFA)	; ⿺
+      )
+     ((=big5-cdp	  . #x86B7)	; &CDP-86B7;
+      )
+     ((=ucs		  . #x4E36)	; 丶
+      ))
     (=ucs@unicode	. #x752B)	; &AJ1-03635;
     (=adobe-japan1-0	. 03635)	; &AJ1-03635;
     (=jis-x0208		. #x4A63)	; &I-J90-4A63; [42-67]
@@ -236,6 +244,18 @@
     (=ucs-itaiji-001	. #x752B)	; &U-i001+752B;
     ))
 (define-char
+  '((<-denotational
+     ((=ucs		  . #x752B)	; 甫
+      ))
+    (ideographic-radical . 101)	; ⽤
+    (ideographic-strokes . 1)
+    (total-strokes	 . 6)
+    (=big5-cdp		. #x86B7)	; &CDP-86B7;
+    (->subsumptive
+     ((==big5-cdp	  . #x86B7)	; &g2-CDP-86B7;
+      ))
+    ))
+(define-char
   '((ideographic-radical . 101)	; ⽤
     (==>ucs@bucs	. #x752C)	; &BUCS+752C;
     ))
-- 
1.7.10.4