From cf7b2d9a36be98078ec8480ed48d772de66f9c35 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 30 Dec 2015 13:31:13 +0900
Subject: [PATCH] (U-00023A47): Apply new conventions for glyph granularity.

---
 lisp/utf-2000/Ideograph-R078-Death.el |   33 +++++++++++++++++++--------------
 1 file changed, 19 insertions(+), 14 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R078-Death.el b/lisp/utf-2000/Ideograph-R078-Death.el
index 68aa89a..5054ec5 100644
--- a/lisp/utf-2000/Ideograph-R078-Death.el
+++ b/lisp/utf-2000/Ideograph-R078-Death.el
@@ -3303,24 +3303,29 @@
   '((ideographic-radical . 78)	; ⽍
     (ideographic-strokes . 10)
     (total-strokes	 . 14)
+    (hanyu-dazidian	2 899 4)
     (=ucs		. #x23A47)	; 𣩇
+    (=cns11643-6	. #x5D7C)	; &I-C6-5D7C; [61-92]
+    (=daikanwa		. 16545)	; &I-M-16545;
+    (<-same
+     ((=ucs		  . #x8150)	; 腐
+      (=daikanwa	  . 29625)	; &I-M-29625;
+      ))
+    (<-same*sources
+     zihui-bu daikanwa)
     (->subsumptive
-     ((=daikanwa	  . 16545)	; &M-16545;
-      (<-same
-       ((=ucs@jis	    . #x8150)	; &GT-38538;
-	(=jis-x0208	    . #x4965)	; &GT-38538; [41-69]
-	(=ks-x1001	    . #x5D2F)	; &I-K0-5D2F; [61-15]
-	(=jis-x0213-1	    . #x4965)	; &I-JX1-4965; [41-69]
-	(=daikanwa	    . 29625)	; &I-M-29625;
+     ((==ucs@iso	  . #x23A47)	; &g2-M-16545;
+      (==daikanwa	  . 16545)	; &g2-M-16545;
+      (->subsumptive
+       ((===daikanwa	    . 16545)	; &R-M-16545;
+	)
+       ((===ucs@iso	    . #x23A47)	; &R-U-00023A47;
+	)
+       ((=hanziku-3	    . #xB4FB)	; &HZK03-B4FB;
 	))
-      (<-same*sources
-       zihui-bu daikanwa)
-      )
-     ((hanyu-dazidian	  2 899 4)
-      (=ucs@iso		  . #x23A47)	; &HZK03-B4FB;
-      (=hanziku-3	  . #xB4FB)	; &HZK03-B4FB;
       )
-     ((=cns11643-6	  . #x5D7C)	; &C6-5D7C; [61-92]
+     ((==ucs@cns	  . #x23A47)	; &g2-CU+23A47;
+      (==cns11643-6	  . #x5D7C)	; &g2-CU+23A47; [61-92]
       ))
     ))
 (define-char
-- 
1.7.10.4