From: tomo <tomo>
Date: Fri, 26 Jan 2007 11:36:46 +0000 (+0000)
Subject: (U+5195): Use `ideographic-{radical|strokes}@jis' instead of
X-Git-Tag: r21-4-19-chise-0_23-4^20~216
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=811a0d11601ab4ff8df08b75c1baa825a769957f;p=chise%2Fxemacs-chise.git

(U+5195): Use `ideographic-{radical|strokes}@jis' instead of
`ideographic-{radical|strokes}'; add
`ideographic-{radical|strokes}@jis*sources',
`ideographic-{radical|strokes}@ucs/compat' and
`ideographic-radical@ucs/compat*sources'.
(G0-4361): Separate K0-5874.
(J78-1978): Use `<-subsumptive' for U-0002F8D3 instead of
`<-denotational' for U+5195.
(K0-5874): Separated from G0-4361; use `<-subsumptive' for U-0002F8D3
instead of `<-denotational' for U+5195; unify C6-4057.
---

diff --git a/lisp/utf-2000/Ideograph-R013-Down-Box.el b/lisp/utf-2000/Ideograph-R013-Down-Box.el
index b709479..147472a 100644
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -1332,8 +1332,16 @@
     (=cbeta		. 02605)	; &I-CB02605;
     ))
 (define-char
-  '((ideographic-radical . 13)	; ⼌
-    (ideographic-strokes . 9)
+  '((ideographic-radical@ucs/compat . 73)	; ⽈
+    (ideographic-strokes@ucs/compat . 7)
+    (ideographic-radical@ucs/compat*sources
+     cns11643-6)
+    (ideographic-radical@jis . 13)	; ⼌
+    (ideographic-strokes@jis . 9)
+    (ideographic-radical@jis*sources
+     daikanwa jis-x0208/1997 cns11643-1)
+    (ideographic-strokes@jis*sources
+     daikanwa)
     (total-strokes	 . 11)
     (=ucs		. #x5195)	; 冕
     (=big5		. #xB0C3)	; &I-B-B0C3;
@@ -1361,7 +1369,6 @@
     (shinjigen-2	. 524)
     (=gb2312		. #x4361)	; &GT-02032; [35-65]
     (=jis-x0208@1983	. #x514B)	; &I-J83-514B; [49-43]
-    (=ks-x1001		. #x5874)	; &I-K0-5874; [56-84]
     (=jis-x0208@1990	. #x514B)	; &I-J90-514B; [49-43]
     (=cns11643-1	. #x5928)	; &I-C1-5928; [57-08]
     (=gt		. 02032)	; &I-GT-02032;
@@ -1374,20 +1381,34 @@
   '((<-denotational
      ((=ucs		  . #x5195)	; 冕
       ))
-    (ideographic-radical . 13)	; ⼌
-    (ideographic-strokes . 9)
+    (=>ucs*		. #x5195)	; 冕
+    (=>ucs@ks		. #x5195)	; &C6-4057;
+    (ideographic-radical@cns . 73)	; ⽈
+    (ideographic-strokes@cns . 7)
+    (ideographic-radical@jis . 13)	; ⼌
+    (ideographic-strokes@jis . 9)
     (total-strokes	 . 11)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs		  . #x2FF1)	; ⿱
-      )
-     ((=ucs		  . #x65E5)	; 日
+    (=ucs		. #x2F8D3)	; 冕
+    (->subsumptive
+     ((ideographic-radical . 13)	; ⼌
+      (ideographic-strokes . 9)
+      (=jis-x0208@1978	  . #x514B)	; &J78-514B; [49-43]
       )
-     ((=gb2312		  . #x4362)	; &C1-492D; [35-66]
-      (=ks-x1001	  . #x5873)	; &I-K0-5873; [56-83]
-      (=cns11643-1	  . #x492D)	; &I-C1-492D; [41-13]
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=cns11643-1	    . #x454B)	; &C1-454B; [37-43]
+	)
+       ((=gb2312	    . #x4362)	; &C1-492D; [35-66]
+	(=ks-x1001	    . #x5873)	; &I-K0-5873; [56-83]
+	(=cns11643-1	    . #x492D)	; &I-C1-492D; [41-13]
+	))
+      (=ks-x1001	  . #x5874)	; &C6-4057; [56-84]
+      (=cns11643-6	  . #x4057)	; &I-C6-4057; [32-55]
+      (=ucs@iso		  . #x2F8D3)	; &C6-4057;
+      (=ucs@ks		  . #x5195)	; &C6-4057;
       ))
-    (=jis-x0208@1978	. #x514B)	; &J78-514B; [49-43]
     ))
 (define-char
   '((<-denotational