From: tomo <tomo>
Date: Tue, 27 Jul 2010 09:43:50 +0000 (+0000)
Subject: (U-000200CA): Use `->subsumptive'.
X-Git-Tag: chise-base-0_25-1^20~429
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ebfc83eab45de57d88526b1a78d26a8245480107;p=chise%2Fxemacs-chise.git.1

(U-000200CA): Use `->subsumptive'.
(U+4E5F): Unify abstract glyph of J0-4C69.
(U+4E73): Add abstract ideographic-structure; unify abstract J0-467D.
(J0-467D): Add `=>>ucs@unicode'.
(U+4E82): Unify abstract J0-502C.
(J0-502C): Use `<-subsumptive' for abstract glyph node.
(abstract glyph og GT-00286): Add `=>>ucs@unicode'.
---

diff --git a/lisp/utf-2000/Ideograph-R005-Second.el b/lisp/utf-2000/Ideograph-R005-Second.el
index 12496b9..586583a 100644
--- a/lisp/utf-2000/Ideograph-R005-Second.el
+++ b/lisp/utf-2000/Ideograph-R005-Second.el
@@ -112,31 +112,29 @@
   '((ideographic-radical . 5)	; ⼄
     (ideographic-strokes . 0)
     (total-strokes	 . 1)
-    (hanyu-dazidian	1 47 5)
     (=ucs		. #x200CA)	; 𠃊
-    (=big5-cdp		. #x8C7B)	; &I-CDP-8C7B;
-    (=gt-k		. 00029)	; &I-GT-K00029;
-    (=gt-pj-k1		. #x303A)	; 𠃊 [16-26]
-    ))
-(define-char
-  '((=>ucs		. #x200CA)	; 𠃊
-    (ideographic-radical . 5)	; ⼄
-    (ideographic-strokes . 0)
-    (total-strokes	 . 1)
-    (=gt-k		. 00027)	; &GT-K00027;
-    (=gt-pj-k1		. #x302A)	; &GT-K00027; [16-10]
+    (->subsumptive
+     ((=gt-k		  . 00027)	; &GT-K00027;
+      (=gt-pj-k1	  . #x302A)	; &GT-K00027; [16-10]
+      )
+     ((hanyu-dazidian	  1 47 5)
+      (=ucs@iso		  . #x200CA)	; &CDP-8C7B;
+      (=big5-cdp	  . #x8C7B)	; &CDP-8C7B;
+      (=gt-k		  . 00029)	; &I-GT-K00029;
+      (=gt-pj-k1	  . #x303A)	; &CDP-8C7B; [16-26]
+      ))
     ))
 (define-char
   '((ideographic-radical . 5)	; ⼄
     (ideographic-strokes . 1)
     (total-strokes	 . 2)
+    (hanyu-dazidian	1 49 9)
     (=ucs		. #x4E5C)	; 乜
+    (=big5		. #xC941)	; &I-B-C941;
     (->subsumptive
-     ((hanyu-dazidian	  1 49 9)
-      (=ucs@unicode	  . #x4E5C)	; &GT-00229;
+     ((=ucs@unicode	  . #x4E5C)	; &GT-00229;
       (=gb2312		  . #x583F)	; &GT-00229; [56-31]
       (=jis-x0212	  . #x3035)	; &I-JSP-3035; [16-21]
-      (=big5		  . #xC941)	; &I-B-C941;
       (=gt		  . 00229)	; &I-GT-00229;
       (=gt-k		  . 00095)	; &I-GT-K00095;
       (=gt-pj-2		  . #x3146)	; &I-GT-00229; [17-38]
@@ -285,6 +283,7 @@
     (sound@ja/kun	"na+r5" "nari")
     (sound@ja/on/kan	"ya")
     (=ucs		. #x4E5F)	; 也
+    (=>>jis-x0208	. #x4C69)	; 也 [44-73]
     (=big5		. #xA45D)	; &I-B-A45D;
     (->subsumptive
      ((=ucs@unicode	  . #x4E5F)	; &GT-00231;
@@ -1095,9 +1094,19 @@
     (ideographic-strokes . 7)
     (total-strokes	 . 8)
     (hanyu-dazidian	1 55 4)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5B5A)	; 孚
+      )
+     ((=ucs		  . #x4E5A)	; 乚
+      ))
     (sound@ja/kun	"titi" "ti")
     (sound@ja/on	"nyuu")
     (=ucs		. #x4E73)	; ä¹³
+    (=>jis-x0208	. #x467D)	; ä¹³ [38-93]
+    (=>jis-x0213-1	. #x467D)	; ä¹³ [38-93]
     (=big5		. #xA8C5)	; &I-B-A8C5;
     ))
 (define-char
@@ -1139,12 +1148,13 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
       )
-     ((=ucs@unicode	  . #x5B5A)	; &C1-4977;
-      (=gb2312		  . #x665A)	; &C1-4977; [70-58]
+     ((=ucs@unicode	  . #x5B5A)	; &GT-08749;
+      (=gb2312		  . #x665A)	; &GT-08749; [70-58]
       (=cns11643-1	  . #x4977)	; &I-C1-4977; [41-87]
       )
      ((=ucs		  . #x4E5A)	; 乚
       ))
+    (=>>ucs@unicode	. #x4E73)	; &GT-00258;
     (=ucs@unicode	. #x4E73)	; &GT-00258;
     (=jis-x0208		. #x467D)	; &GT-00258; [38-93]
     (=gb2312		. #x4869)	; &I-G0-4869; [40-73]
@@ -2349,6 +2359,8 @@
     (sound@ja/kun	"mida-r+eru" "mida+s5")
     (sound@ja/on	"ran")
     (=ucs		. #x4E82)	; 亂
+    (=>jis-x0208	. #x502C)	; 亂 [48-12]
+    (=>jis-x0213-1	. #x502C)	; 亂 [48-12]
     (=big5		. #xB6C3)	; &I-B-B6C3;
     ))
 (define-char
@@ -2358,21 +2370,25 @@
     (ideographic-radical . 5)	; ⼄
     (ideographic-strokes . 12)
     (total-strokes	 . 13)
-    (=ucs@jis		. #x4E82)	; &GT-00285;
-    (=jis-x0208		. #x502C)	; &GT-00285; [48-12]
-    (=jis-x0213-1	. #x502C)	; &I-JX1-502C; [48-12]
-    (=gt		. 00285)	; &I-GT-00285;
-    (=gt-k		. 10403)	; &I-GT-K10403;
-    (=gt-pj-1		. #x502C)	; &I-GT-00285; [48-12]
-    (=daikanwa		. 00214)	; &I-M-00214;
-    (=shinjigen		.  0061)	; &GT-00285;
+    (=>>ucs@jis		. #x4E82)	; &G-J78-502C;
+    (=>>jis-x0208	. #x502C)	; &G-J78-502C; [48-12]
     (->subsumptive
-     ((=ucs@ks		  . #x4E82)	; &K0-552F;
-      (=ks-x1001	  . #x552F)	; &K0-552F; [53-15]
-      )
-     ((=>ucs*		  . #x4E82)	; 亂
-      (=ucs		  . #xF91B)	; 亂
-      (=ks-x1001	  . #x516A)	; &I-K0-516A; [49-74]
+     ((=ucs@jis		  . #x4E82)	; &GT-00285;
+      (=jis-x0208	  . #x502C)	; &GT-00285; [48-12]
+      (=jis-x0213-1	  . #x502C)	; &I-JX1-502C; [48-12]
+      (=gt		  . 00285)	; &I-GT-00285;
+      (=gt-k		  . 10403)	; &I-GT-K10403;
+      (=gt-pj-1		  . #x502C)	; &I-GT-00285; [48-12]
+      (=daikanwa	  . 00214)	; &I-M-00214;
+      (=shinjigen	  .  0061)	; &GT-00285;
+      (->subsumptive
+       ((=ucs@ks	    . #x4E82)	; &K0-552F;
+	(=ks-x1001	    . #x552F)	; &K0-552F; [53-15]
+	)
+       ((=>ucs*		    . #x4E82)	; 亂
+	(=ucs		    . #xF91B)	; 亂
+	(=ks-x1001	    . #x516A)	; &I-K0-516A; [49-74]
+	))
       ))
     ))
 (define-char
@@ -2382,6 +2398,7 @@
     (ideographic-radical . 5)	; ⼄
     (ideographic-strokes . 12)
     (total-strokes	 . 13)
+    (=>>ucs@unicode	. #x4E82)	; &G-GT-00286;
     (=>>gt		. 00286)	; &G-GT-00286;
     (->subsumptive
      ((ideographic-structure