From: tomo <tomo>
Date: Tue, 8 Dec 2009 09:53:05 +0000 (+0000)
Subject: (B-ED70): Use `->denotational' instead of `->subsumptive'.
X-Git-Tag: r21-4-22-chise-0_24-jis-x0213-rep-diffs^20~174
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;ds=sidebyside;h=ff16a0dcae1c6305c1f0241abb98f84a9fce4b6a;p=chise%2Fxemacs-chise.git

(B-ED70): Use `->denotational' instead of `->subsumptive'.
(J78-3979): Use `<-subsumptive' to integrate JX3-3979.
(J90-3979): Separate JX3-3979.
(M-21617): Separate J83-6131, K0-6838, J90-6131, JX1-6131, GT-27757
and S-5002.
(K0-6838): Unify JX3-6131, GT-27757 and S-5002.
---

diff --git a/lisp/utf-2000/Ideograph-R098-Tile.el b/lisp/utf-2000/Ideograph-R098-Tile.el
index 1f112ab..0d836c0 100644
--- a/lisp/utf-2000/Ideograph-R098-Tile.el
+++ b/lisp/utf-2000/Ideograph-R098-Tile.el
@@ -1901,12 +1901,30 @@
     (ideographic-radical . 98)	; ⽡
     (ideographic-strokes . 12)
     (=big5		. #xED70)	; &B-ED70;
+    ))
+(define-char
+  '((<-denotational
+     ((=big5		  . #xED70)	; &B-ED70;
+      ))
+    (ideographic-radical . 98)	; ⽡
+    (ideographic-strokes . 12)
+    (total-strokes	 . 17)
     (->subsumptive
-     ((total-strokes	   . 17)
-      (=jis-x0208@1978	  . #x3979)	; &M-21602; [25-89]
+     ((=jis-x0208@1978	  . #x3979)	; &M-21602; [25-89]
       (=ks-x1001	  . #x7177)	; &I-K0-7177; [81-87]
       (=daikanwa	  . 21602)	; &I-M-21602;
       )
+     ((=ucs@jis/2004	  . #x7511)	; &JX3-3979;
+      (=jis-x0213-1@2004  . #x3979)	; &JX3-3979; [25-89]
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=big5		  . #xED70)	; &B-ED70;
+      ))
+    (ideographic-radical . 98)	; ⽡
+    (ideographic-strokes . 12)
+    (->subsumptive
      ((total-strokes	   . 17)
       (=ucs@cns		  . #x7511)	; &C2-5D5C;
       (=cns11643-2	  . #x5D5C)	; &C2-5D5C; [61-60]
@@ -1923,10 +1941,11 @@
     (ideographic-radical . 98)	; ⽡
     (ideographic-strokes . 11)
     (total-strokes	 . 16)
-    (=ucs@jis		. #x7511)	; &GT-27722;
+    (=ucs@jis/1990	. #x7511)	; &GT-27722;
+    (=ucs@jis/2000	. #x7511)	; &GT-27722;
     (=jis-x0208@1983	. #x3979)	; &GT-27722; [25-89]
     (=jis-x0208@1990	. #x3979)	; &I-J90-3979; [25-89]
-    (=jis-x0213-1	. #x3979)	; &I-JX1-3979; [25-89]
+    (=jis-x0213-1@2000	. #x3979)	; &I-JX1-3979; [25-89]
     (=gt		. 27722)	; &I-GT-27722;
     (=gt-pj-1		. #x3979)	; &I-GT-27722; [25-89]
     (=jef-china3	. #x5AB6)	; &I-JC3-5AB6;
@@ -2131,17 +2150,23 @@
     (=big5		. #xC27C)	; &I-B-C27C;
     (->subsumptive
      ((total-strokes	   . 18)
-      (=ucs@jis		  . #x7515)	; &GT-27757;
-      (=jis-x0208@1983	  . #x6131)	; &GT-27757; [65-17]
-      (=ks-x1001	  . #x6838)	; &I-K0-6838; [72-24]
-      (=jis-x0208@1990	  . #x6131)	; &I-J90-6131; [65-17]
-      (=jis-x0213-1	  . #x6131)	; &I-JX1-6131; [65-17]
+      (=daikanwa	  . 21617)	; &M-21617;
+      )
+     ((total-strokes	   . 18)
+      (=ks-x1001	  . #x6838)	; &GT-27757; [72-24]
+      (=jis-x0213-1@2004  . #x6131)	; &I-JX3-6131; [65-17]
       (=gt		  . 27757)	; &I-GT-27757;
       (=gt-pj-1		  . #x6131)	; &I-GT-27757; [65-17]
-      (=daikanwa	  . 21617)	; &I-M-21617;
       (=shinjigen	  .  5002)	; &GT-27757;
       )
      ((total-strokes	   . 18)
+      (=ucs@jis/1990	  . #x7515)	; &J90-6131;
+      (=ucs@jis/2000	  . #x7515)	; &J90-6131;
+      (=jis-x0208@1983	  . #x6131)	; &J90-6131; [65-17]
+      (=jis-x0208@1990	  . #x6131)	; &I-J90-6131; [65-17]
+      (=jis-x0213-1@2000  . #x6131)	; &I-JX1-6131; [65-17]
+      )
+     ((total-strokes	   . 18)
       (=cns11643-1	  . #x7668)	; &C1-7668; [86-72]
       )
      ((total-strokes	   . 17)