From: tomo <tomo>
Date: Tue, 20 Sep 2011 20:47:19 +0000 (+0000)
Subject: (U+7504): Use `->denotational' instead of `->subsumptive'.
X-Git-Tag: r21-4-22-chise-0_25-10^20~150
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6c40f88214e52ab077cdc584864cd3bc1962a807;p=chise%2Fxemacs-chise.git.1

(U+7504): Use `->denotational' instead of `->subsumptive'.
(J78-612B): Unify HD-FT1966.
---

diff --git a/lisp/utf-2000/Ideograph-R098-Tile.el b/lisp/utf-2000/Ideograph-R098-Tile.el
index 4cab9db..9dfb28d 100644
--- a/lisp/utf-2000/Ideograph-R098-Tile.el
+++ b/lisp/utf-2000/Ideograph-R098-Tile.el
@@ -1274,21 +1274,48 @@
   '((ideographic-radical . 98)	; ⽡
     (ideographic-strokes . 9)
     (=ucs		. #x7504)	; 甄
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x7504)	; 甄
+      ))
+    (ideographic-radical . 98)	; ⽡
+    (ideographic-strokes . 9)
+    (total-strokes	 . 14)
+    (=>>ucs@cns		. #x7504)	; &G-GT-27672;
+    (=>>jis-x0208@1978	. #x612B)	; &G-GT-27672; [65-11]
+    (=big5		. #xBAC2)	; &G-GT-27672;
+    (=>>gt		. 27672)	; &G-GT-27672;
+    (=>>daikanwa	. 21557)	; &G-GT-27672;
+    (=>>hanyo-denshi/ft . #x3362)	; &G-GT-27672; [19-66]
     (->subsumptive
-     ((total-strokes	   . 14)
-      (=big5		  . #xBAC2)	; &B-BAC2;
-      (->subsumptive
-       ((=jis-x0208@1978    . #x612B)	; &GT-27672; [65-11]
-	(=ks-x1001	    . #x4C34)	; &I-K0-4C34; [44-20]
-	(=gt		    . 27672)	; &I-GT-27672;
-	(=gt-pj-5	    . #x3135)	; &I-GT-27672; [17-21]
-	(=daikanwa	    . 21557)	; &I-M-21557;
-	)
-       ((=cns11643-1	    . #x6969)	; &C1-6969; [73-73]
-	))
+     ((=jis-x0208@1978	  . #x612B)	; &GT-27672; [65-11]
+      (=ks-x1001	  . #x4C34)	; &I-K0-4C34; [44-20]
+      (=gt		  . 27672)	; &I-GT-27672;
+      (=gt-pj-5		  . #x3135)	; &I-GT-27672; [17-21]
+      (=daikanwa	  . 21557)	; &I-M-21557;
+      (=hanyo-denshi/ft	  . #x3362)	; &I-HD-FT-3362; [19-66]
       )
+     ((=ucs@cns		  . #x7504)	; &C1-6969;
+      (=cns11643-1	  . #x6969)	; &C1-6969; [73-73]
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x7504)	; 甄
+      ))
+    (ideographic-radical . 98)	; ⽡
+    (ideographic-strokes . 9)
+    (=>>ucs@unicode	. #x7504)	; &G-GT-27673;
+    (=>>jis-x0208@1983	. #x612B)	; &G-GT-27673; [65-11]
+    (=>>jis-x0208@1990	. #x612B)	; &G-GT-27673; [65-11]
+    (=>>jis-x0213-1	. #x612B)	; &G-GT-27673; [65-11]
+    (=>>gt		. 27673)	; &G-GT-27673;
+    (->subsumptive
      ((total-strokes	   . 14)
-      (=ucs@jis		  . #x7504)	; &GT-27673;
+      (=ucs@jis/1990	  . #x7504)	; &GT-27673;
+      (=ucs@jis/2000	  . #x7504)	; &GT-27673;
+      (=ucs@jis/2004	  . #x7504)	; &GT-27673;
       (=jis-x0208@1983	  . #x612B)	; &GT-27673; [65-11]
       (=jis-x0208@1990	  . #x612B)	; &I-J90-612B; [65-11]
       (=jis-x0213-1	  . #x612B)	; &I-JX1-612B; [65-11]