From 6efe5bfd905c82cd32fcaabf4b9f53085eb5e979 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 25 Nov 2015 12:27:37 +0900
Subject: [PATCH] (U+51DD): Apply new conventions for glyph granularity.

---
 lisp/utf-2000/Ideograph-R015-Ice.el |   59 ++++++++++++++++++++++++-----------
 1 file changed, 40 insertions(+), 19 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R015-Ice.el b/lisp/utf-2000/Ideograph-R015-Ice.el
index 5baa60f..862e222 100644
--- a/lisp/utf-2000/Ideograph-R015-Ice.el
+++ b/lisp/utf-2000/Ideograph-R015-Ice.el
@@ -3748,8 +3748,17 @@
      ((=ucs		  . #x7591)	; 疑
       ))
     (=ucs		. #x51DD)	; 凝
-    (=>>jis-x0208	. #x3645)	; 凝 [22-37]
+    (=adobe-japan1-0	. 01725)	; &I-AJ1-01725;
+    (=jis-x0208		. #x3645)	; &I-J90-3645; [22-37]
+    (=gb2312		. #x447D)	; &I-G0-447D; [36-93]
+    (=ks-x1001		. #x6B6A)	; &I-K0-6B6A; [75-74]
+    (=cns11643-1	. #x7037)	; &I-C1-7037; [80-23]
+    (=jis-x0213-1	. #x3645)	; &I-JX1-3645; [22-37]
     (=big5		. #xBEAE)	; &I-B-BEAE;
+    (=gt		. 02261)	; &I-GT-02261;
+    (=gt-pj-1		. #x3645)	; &I-GT-02261; [22-37]
+    (=daikanwa		. 01720)	; &I-M-01720;
+    (=shinjigen		.  0564)	; 凝
     (->subsumptive
      ((=decomposition@cid
        ((=ucs		    . #x51DD)	; 凝
@@ -3762,23 +3771,33 @@
 	)
        ((=ucs		    . #x51AB)	; 冫
 	)
-       ((=ucs@unicode	    . #x7591)	; &GT-28247;
-	(=jis-x0208	    . #x353F)	; &GT-28247; [21-31]
-	(=gb2312	    . #x5249)	; &I-G0-5249; [50-41]
-	(=ks-x1001	    . #x6B77)	; &I-K0-6B77; [75-87]
-	(=jis-x0213-1	    . #x353F)	; &I-JX1-353F; [21-31]
-	(=daikanwa	    . 22007)	; &I-M-22007;
+       ((==ucs@unicode	    . #x7591)	; &g2-AJ1-01625;
+	(==adobe-japan1-0   . 01625)	; &g2-AJ1-01625;
+	))
+      (==ucs@unicode	  . #x51DD)	; &g2-AJ1-01725;
+      (==adobe-japan1-0	  . 01725)	; &g2-AJ1-01725;
+      (==gb2312		  . #x447D)	; &g2-AJ1-01725; [36-93]
+      (==ks-x1001	  . #x6B6A)	; &g2-AJ1-01725; [75-74]
+      (==jis-x0208	  . #x3645)	; &g2-AJ1-01725; [22-37]
+      (==jis-x0213-1	  . #x3645)	; &g2-AJ1-01725; [22-37]
+      (==gt		  . 02261)	; &g2-AJ1-01725;
+      (==daikanwa	  . 01720)	; &g2-AJ1-01725;
+      (==shinjigen	  .  0564)	; &g2-AJ1-01725;
+      (->subsumptive
+       ((===daikanwa	    . 01720)	; &R-M-01720;
+	)
+       ((===jis-x0208	    . #x3645)	; &R-J0-3645; [22-37]
+	(===jis-x0213-1	    . #x3645)	; &R-J0-3645; [22-37]
+	)
+       ((===adobe-japan1-0  . 01725)	; &R-AJ1-01725;
+	)
+       ((===gt		    . 02261)	; &R-GT-02261;
+	)
+       ((===ucs@ks	    . #x51DD)	; &R-K0-6B6A;
+	(===ks-x1001	    . #x6B6A)	; &R-K0-6B6A; [75-74]
+	)
+       ((===ucs@unicode	    . #x51DD)	; &R-UU+51DD;
 	))
-      (=ucs@unicode	  . #x51DD)	; &AJ1-01725;
-      (=adobe-japan1-0	  . 01725)	; &AJ1-01725;
-      (=jis-x0208	  . #x3645)	; &I-J90-3645; [22-37]
-      (=gb2312		  . #x447D)	; &I-G0-447D; [36-93]
-      (=ks-x1001	  . #x6B6A)	; &I-K0-6B6A; [75-74]
-      (=jis-x0213-1	  . #x3645)	; &I-JX1-3645; [22-37]
-      (=gt		  . 02261)	; &I-GT-02261;
-      (=gt-pj-1		  . #x3645)	; &I-GT-02261; [22-37]
-      (=daikanwa	  . 01720)	; &I-M-01720;
-      (=shinjigen	  .  0564)	; &AJ1-01725;
       )
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -3786,9 +3805,11 @@
 	)
        ((=ucs		    . #x51AB)	; 冫
 	)
-       ((=cns11643-1	    . #x696A)	; &C1-696A; [73-74]
+       ((==ucs@cns	    . #x7591)	; &g2-CU+7591;
+	(==cns11643-1	    . #x696A)	; &g2-CU+7591; [73-74]
 	))
-      (=cns11643-1	  . #x7037)	; &C1-7037; [80-23]
+      (==ucs@cns	  . #x51DD)	; &g2-CU+51DD;
+      (==cns11643-1	  . #x7037)	; &g2-CU+51DD; [80-23]
       ))
     ))
 (define-char
-- 
1.7.10.4