From 0fb1a39778b2b9fd98f7d218d78e18fc1116c67a Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 17 Dec 2021 01:47:36 +0900
Subject: [PATCH] (CB09706): Unify U-0003016D. (U+20991-itaiji-001): New
 character; use `<-denotational' for A-cgnU+20991.

---
 lisp/utf-2000/Ideograph-R024-Ten.el |   44 ++++++++++++++++++++++++++++++++++-
 1 file changed, 43 insertions(+), 1 deletion(-)

diff --git a/lisp/utf-2000/Ideograph-R024-Ten.el b/lisp/utf-2000/Ideograph-R024-Ten.el
index 6556572..fa43710 100644
--- a/lisp/utf-2000/Ideograph-R024-Ten.el
+++ b/lisp/utf-2000/Ideograph-R024-Ten.el
@@ -578,7 +578,13 @@
       )
      ((=ucs		  . #x5341)	; 十
       ))
-    (=cbeta		. 09706)	; &CB09706;
+    (=ucs		. #x3016D)	; 𰅭
+    (=cbeta		. 09706)	; &I-CB09706;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x3016D)	; &g2-hanaJU+3016D;
+      )
+     ((==cbeta		  . 09706)	; &g2-CB09706;
+      ))
     ))
 (define-char
   '((ideographic-radical . 24)	; ⼗
@@ -2197,6 +2203,42 @@
     (ideographic-radical . 24)	; ⼗
     (ideographic-strokes . 5)
     (total-strokes	 . 7)
+    (ideographic-structure@apparent
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs		  . #x2FF8)	; ⿸
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+	(=ucs		    . #x2FF9)	; ⿹
+	)
+       ((ideographic-structure
+	 ((=ucs-itaiji-001    . #x2FF6)	; &U-i001+2FF6;
+	  )
+	 ((=ucs		      . #x5341)	; 十
+	  )
+	 ((=ucs		      . #x4E36)	; 丶
+	  ))
+	)
+       ((ideographic-structure
+	 ((=ucs-itaiji-001    . #x2FF6)	; &U-i001+2FF6;
+	  )
+	 ((=ucs		      . #x4EBA)	; 人
+	  )
+	 ((=ucs		      . #x4E36)	; 丶
+	  ))
+	))
+      )
+     ((=ucs		  . #x4E36)	; 丶
+      ))
+    (=ucs-itaiji-001	. #x20991)	; &U-i001+20991;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x20991)	; &A-cgnU+20991;
+      ))
+    (ideographic-radical . 24)	; ⼗
+    (ideographic-strokes . 5)
+    (total-strokes	 . 7)
     (=cbeta		. 07083)	; &CB07083;
     (->subsumptive
      ((==cbeta		  . 07083)	; &g2-CB07083;
-- 
1.7.10.4