From 12baf6260f5dbaf8cf92d348f15c5be715429ef1 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 30 Jan 2022 18:27:45 +0900
Subject: [PATCH] (U+54CF): Apply new conventions for glyph granularity.

---
 lisp/utf-2000/Ideograph-R030-Mouth.el |   36 +++++++++++++++++++++++++++++++--
 1 file changed, 34 insertions(+), 2 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R030-Mouth.el b/lisp/utf-2000/Ideograph-R030-Mouth.el
index 5939f55..b0846d0 100644
--- a/lisp/utf-2000/Ideograph-R030-Mouth.el
+++ b/lisp/utf-2000/Ideograph-R030-Mouth.el
@@ -21733,6 +21733,22 @@
     ))
 (define-char
   '((ideographic-radical . 30)	; ⼝
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x53E3)	; 口
+      )
+     ((=>ucs@iwds-1	  . #x826E)	; &A-IWDSU+826E;
+      (=>iwds-1		  .  0199)	; &A-IWDSU+826E;
+      ))
+    (=ucs		. #x54CF)	; 哏
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x54CF)	; 哏
+      ))
+    (ideographic-radical . 30)	; ⼝
     (ideographic-strokes . 6)
     (total-strokes	 . 9)
     (hanyu-dazidian	1 623 9)
@@ -21744,12 +21760,28 @@
       )
      ((=ucs		  . #x826E)	; 艮
       ))
-    (=ucs		. #x54CF)	; 哏
-    (=gb2312		. #x5F67)	; &I-G0-5F67; [63-71]
+    (=ucs@unicode	. #x54CF)	; &C2-2940;
+    (=gb2312		. #x5F67)	; &C2-2940; [63-71]
     (=cns11643-2	. #x2940)	; &I-C2-2940; [09-32]
     (=big5		. #xCDFE)	; &I-B-CDFE;
     (=daikanwa		. 03629)	; &I-M-03629;
     (=jef-china3	. #x9AAB)	; &I-JC3-9AAB;
+    (->subsumptive
+     ((==ucs@unicode	  . #x54CF)	; &g2-M-03629;
+      (==gb2312		  . #x5F67)	; &g2-M-03629; [63-71]
+      (==cns11643-2	  . #x2940)	; &g2-M-03629; [09-32]
+      (==daikanwa	  . 03629)	; &g2-M-03629;
+      (==jef-china3	  . #x9AAB)	; &g2-M-03629;
+      (->subsumptive
+       ((===daikanwa	    . 03629)	; &R-M-03629;
+	)
+       ((===cns11643-2	    . #x2940)	; &R-C2-2940; [09-32]
+	)
+       ((===ucs@unicode	    . #x54CF)	; &R-UU+54CF;
+	)
+       ((===jef-china3	    . #x9AAB)	; &R-JC3-9AAB;
+	))
+      ))
     ))
 (define-char
   '((<-denotational@component
-- 
1.7.10.4