From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 1 Jul 2017 01:25:58 +0000 (+0900)
Subject: (U+37A1): Apply new conventions for glyph granularity.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=fbc22cf7826ded738dec8f409e8da22ca5c0f911;p=chise%2Fxemacs-chise.git

(U+37A1): Apply new conventions for glyph granularity.
---

diff --git a/lisp/utf-2000/Ideograph-R044-Corpse.el b/lisp/utf-2000/Ideograph-R044-Corpse.el
index ad72124..6096049 100644
--- a/lisp/utf-2000/Ideograph-R044-Corpse.el
+++ b/lisp/utf-2000/Ideograph-R044-Corpse.el
@@ -3748,12 +3748,31 @@
     (ideographic-strokes . 16)
     (total-strokes	 . 19)
     (=ucs		. #x37A1)	; 㞡
+    (=mj		. 000813)	; &I-MJ000813;
+    (=cns11643-3	. #x5A37)	; &I-C3-5A37; [58-23]
+    (=koseki		. 088720)	; 㞡
+    (=daikanwa		. 07816)	; &I-M-07816;
+    (<-original
+     ((=ucs		  . #x5C55)	; 展
+      (=daikanwa	  . 07715)	; &I-M-07715;
+      ))
+    (<-original*sources
+     zhengzitong daikanwa)
     (->subsumptive
-     ((=daikanwa	  . 07816)	; &M-07816;
+     ((==ucs@cns	  . #x37A1)	; &g2-M-07816;
+      (==cns11643-3	  . #x5A37)	; &g2-M-07816; [58-23]
+      (==koseki		  . 088720)	; &g2-M-07816;
+      (==daikanwa	  . 07816)	; &g2-M-07816;
+      (->subsumptive
+       ((===daikanwa	    . 07816)	; &R-M-07816;
+	)
+       ((===cns11643-3	    . #x5A37)	; &R-C3-5A37; [58-23]
+	))
       )
-     ((=cns11643-3	  . #x5A37)	; &C3-5A37; [58-23]
+     ((==mj		  . 000813)	; &g2-MJ000813;
       )
-     ((=ucs@unicode	  . #x37A1)	; &UU+37A1;
+     ((==ucs@unicode	  . #x37A1)	; &g2-UU+37A1;
+      (==ucs@JP/hanazono  . nil)
       ))
     ))
 (define-char