From f540c618471e65b9d6bcd57794be5ebfa6633201 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 19 Nov 2015 14:21:31 +0900
Subject: [PATCH] (U+562B): Use `->subsumptive'. (U+56A7): Apply new
 conventions for glyph granularity.

---
 lisp/utf-2000/Ideograph-R030-Mouth.el |   89 +++++++++++++++++++++++----------
 1 file changed, 63 insertions(+), 26 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R030-Mouth.el b/lisp/utf-2000/Ideograph-R030-Mouth.el
index a0eecf3..e4a4de1 100644
--- a/lisp/utf-2000/Ideograph-R030-Mouth.el
+++ b/lisp/utf-2000/Ideograph-R030-Mouth.el
@@ -36844,24 +36844,39 @@
      ((=ucs		  . #x7136)	; 然
       ))
     (=ucs		. #x562B)	; 嘫
+    (=cns11643-3	. #x4B41)	; &I-C3-4B41; [43-33]
     (=daikanwa		. 04237)	; &I-M-04237;
-    (=hanziku-2		. #xDF58)	; &I-HZK02-DF58;
-    ))
-(define-char
-  '((=>ucs		. #x562B)	; 嘫
-    (morohashi-daikanwa	4237 0 0)
-    (ideographic-radical . 30)	; ⼝
-    (ideographic-strokes . 12)
-    (total-strokes	 . 15)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs		  . #x2FF0)	; â¿°
-      )
-     ((=ucs		  . #x53E3)	; 口
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=ucs		    . #x53E3)	; 口
+	)
+       ((==ucs@unicode	    . #x7136)	; &g2-GT-24509;
+	(==jis-x0208	    . #x4133)	; &g2-GT-24509; [33-19]
+	))
+      (==ucs@unicode	  . #x562B)	; &g2-M-04237;
+      (==daikanwa	  . 04237)	; &g2-M-04237;
+      (=hanziku-2	  . #xDF58)	; &g2-M-04237;
+      (->subsumptive
+       ((===daikanwa	    . 04237)	; &R-M-04237;
+	)
+       ((===ucs@unicode	    . #x562B)	; &R-UU+562B;
+	))
       )
-     ((=cns11643-1	  . #x6053)	; &C1-6053; [64-51]
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=ucs		    . #x53E3)	; 口
+	)
+       ((==ucs@cns	    . #x7136)	; &g2-CU+7136;
+	(==cns11643-1	    . #x6053)	; &g2-CU+7136; [64-51]
+	))
+      (==ucs@cns	  . #x562B)	; &g2-CU+562B;
+      (==cns11643-3	  . #x4B41)	; &g2-CU+562B; [43-33]
       ))
-    (=cns11643-3	. #x4B41)	; &C3-4B41; [43-33]
     ))
 (define-char
   '((ideographic-radical . 30)	; ⼝
@@ -47379,7 +47394,6 @@
   '((ideographic-radical . 30)	; ⼝
     (ideographic-strokes . 16)
     (total-strokes	 . 19)
-    (hanyu-dazidian	1 702 1)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
@@ -47389,7 +47403,21 @@
      ((=ucs		  . #x76E7)	; 盧
       ))
     (=ucs		. #x56A7)	; 嚧
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x56A7)	; 嚧
+      ))
+    (ideographic-radical . 30)	; ⼝
+    (ideographic-strokes . 16)
+    (total-strokes	 . 19)
+    (hanyu-dazidian	1 702 1)
+    (=ucs@unicode	. #x56A7)	; &AJ1-21308;
+    (=adobe-japan1-6	. 21308)	; &AJ1-21308;
+    (=jis-x0212		. #x3660)	; &I-JSP-3660; [22-64]
+    (=cns11643-2	. #x653F)	; &I-C2-653F; [69-31]
     (=big5		. #xF1F3)	; &I-B-F1F3;
+    (=daikanwa		. 04548)	; &I-M-04548;
     (->subsumptive
      ((=decomposition@cid
        ((=ucs		    . #x56A7)	; 嚧
@@ -47402,15 +47430,22 @@
 	)
        ((=ucs		    . #x53E3)	; 口
 	)
-       ((=ucs@unicode	    . #x76E7)	; &GT-29541;
-	(=jis-x0208	    . #x623A)	; &GT-29541; [66-26]
-	(=jis-x0213-1	    . #x623A)	; &I-JX1-623A; [66-26]
-	(=daikanwa	    . 23050)	; &I-M-23050;
+       ((==ucs@unicode	    . #x76E7)	; &g2-GT-29541;
+	(==jis-x0208	    . #x623A)	; &g2-GT-29541; [66-26]
+	))
+      (==ucs@unicode	  . #x56A7)	; &g2-AJ1-21308;
+      (==adobe-japan1-6	  . 21308)	; &g2-AJ1-21308;
+      (==jis-x0212	  . #x3660)	; &g2-AJ1-21308; [22-64]
+      (==daikanwa	  . 04548)	; &g2-AJ1-21308;
+      (->subsumptive
+       ((===daikanwa	    . 04548)	; &R-M-04548;
+	)
+       ((===jis-x0212	    . #x3660)	; &R-JSP-3660; [22-64]
+	)
+       ((===adobe-japan1-6  . 21308)	; &R-AJ1-21308;
+	)
+       ((===ucs@unicode	    . #x56A7)	; &R-UU+56A7;
 	))
-      (=ucs@unicode	  . #x56A7)	; &AJ1-21308;
-      (=adobe-japan1-6	  . 21308)	; &AJ1-21308;
-      (=jis-x0212	  . #x3660)	; &I-JSP-3660; [22-64]
-      (=daikanwa	  . 04548)	; &I-M-04548;
       )
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -47418,9 +47453,11 @@
 	)
        ((=ucs		    . #x53E3)	; 口
 	)
-       ((=cns11643-1	    . #x714D)	; &C1-714D; [81-45]
+       ((==ucs@cns	    . #x76E7)	; &g2-CU+76E7;
+	(==cns11643-1	    . #x714D)	; &g2-CU+76E7; [81-45]
 	))
-      (=cns11643-2	  . #x653F)	; &C2-653F; [69-31]
+      (==ucs@cns	  . #x56A7)	; &g2-CU+56A7;
+      (==cns11643-2	  . #x653F)	; &g2-CU+56A7; [69-31]
       ))
     ))
 (define-char
-- 
1.7.10.4