From: tomo <tomo>
Date: Wed, 2 Feb 2005 13:38:58 +0000 (+0000)
Subject: (U+5168): Use `->denotational' instead of `->subsumptive'.
X-Git-Tag: r21-4-15-chise-0_21-33^2~49
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8fc18643c86d699b66bced23ee5aee417f864fc8;p=chise%2Fxemacs-chise.git.1

(U+5168): Use `->denotational' instead of `->subsumptive'.
(UU+5168): Use `<-denotational' for U+5168; unify U+FA72.
---

diff --git a/lisp/utf-2000/Ideograph-R011-Enter.el b/lisp/utf-2000/Ideograph-R011-Enter.el
index 5e2ae32..d405c5f 100644
--- a/lisp/utf-2000/Ideograph-R011-Enter.el
+++ b/lisp/utf-2000/Ideograph-R011-Enter.el
@@ -322,6 +322,14 @@
     (ideographic-strokes . 4)
     (total-strokes	 . 6)
     (=ucs		. #x5168)	; 全
+    ))
+(define-char
+  '((ideographic-radical . 11)	; ⼊
+    (ideographic-strokes . 4)
+    (total-strokes	 . 6)
+    (<-denotational
+     ((=ucs		  . #x5168)	; 全
+      ))
     (->subsumptive
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
@@ -349,28 +357,38 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
 	(=ucs		    . #x2FF1)	; ⿱
 	)
-       ((=ucs		    . #x5165)	; 入
+       ((=gb2312	    . #x486B)	; &C1-442B; [40-75]
+	(=cns11643-1	    . #x442B)	; &I-C1-442B; [36-11]
 	)
        ((=ucs		    . #x738B)	; 王
 	))
       (=cns11643-1	  . #x4740)	; &C1-4740; [39-32]
+      ))
+    ))
+(define-char
+  '((=>ucs*		. #x5168)	; 全
+    (ideographic-radical . 11)	; ⼊
+    (ideographic-strokes . 4)
+    (total-strokes	 . 6)
+    (<-denotational
+     ((=ucs		  . #x5168)	; 全
+      ))
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((name*		    . "ideographic component person as roof")
-	(=big5-cdp	    . #x8B5D)	; &GT-00458;
-	)
-       ((=ucs		    . #x738B)	; 王
-	))
-      (=jis-x0208	  . #x4134)	; &GT-00565; [33-20]
-      (=gb2312		  . #x482B)	; &I-G0-482B; [40-11]
-      (=gt		  . 00565)	; &I-GT-00565;
-      (=gt-k		  . 01658)	; &I-GT-K01658;
-      (=gt-pj-1		  . #x4134)	; &I-GT-00565; [33-20]
-      (=ucs@unicode	  . #x5168)	; &GT-00565;
+     ((name*		  . "ideographic component person as roof")
+      (=big5-cdp	  . #x8B5D)	; &GT-00458;
+      )
+     ((=ucs		  . #x738B)	; 王
       ))
+    (=ucs		. #xFA72)	; 全
+    (=jis-x0208		. #x4134)	; &I-J90-4134; [33-20]
+    (=gb2312		. #x482B)	; &I-G0-482B; [40-11]
+    (=gt		. 00565)	; &I-GT-00565;
+    (=gt-k		. 01658)	; &I-GT-K01658;
+    (=gt-pj-1		. #x4134)	; &I-GT-00565; [33-20]
+    (=ucs@unicode	. #x5168)	; 全
     ))
 (define-char
   '((ideographic-radical . 11)	; ⼊