From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 16 Apr 2014 07:27:35 +0000 (+0900)
Subject: (U+821E): Use `->subsumptive' instead of `->denotational'.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=bb86c91aa7c341841c6a56d9f458476510059cf8;p=chise%2Fxemacs-chise.git-

(U+821E): Use `->subsumptive' instead of `->denotational'.
---

diff --git a/lisp/utf-2000/Ideograph-R136-Oppose.el b/lisp/utf-2000/Ideograph-R136-Oppose.el
index 401bbfc..c4e2dca 100644
--- a/lisp/utf-2000/Ideograph-R136-Oppose.el
+++ b/lisp/utf-2000/Ideograph-R136-Oppose.el
@@ -112,39 +112,26 @@
     (=>>jis-x0208	. #x4971)	; 舞 [41-81]
     (=>>jis-x0213-1	. #x4971)	; 舞 [41-81]
     (=big5		. #xBB52)	; &I-B-BB52;
-    ))
-(define-char
-  '((<-denotational
-     ((=ucs		  . #x821E)	; 舞
-      ))
-    (ideographic-radical . 136)	; ⾇
-    (ideographic-strokes . 8)
-    (total-strokes	 . 14)
-    (=ucs@unicode	. #x821E)	; &C1-6A5A;
-    (=gb2312		. #x4E68)	; &C1-6A5A; [46-72]
-    (=cns11643-1	. #x6A5A)	; &I-C1-6A5A; [74-58]
-    (=daikanwa		. 30342)	; &I-M-30342;
-    (=shinjigen		.  6640)	; &C1-6A5A;
     (->subsumptive
-     ((==daikanwa	  . 30342)	; &R-M-30342;
-      (==shinjigen	  .  6640)	; &R-M-30342;
+     ((total-strokes	   . 14)
+      (=ucs@unicode	  . #x821E)	; &G0-4E68;
+      (=gb2312		  . #x4E68)	; &G0-4E68; [46-72]
+      (=daikanwa	  . 30342)	; &I-M-30342;
+      (=shinjigen	  .  6640)	; &G0-4E68;
+      (->subsumptive
+       ((==daikanwa	    . 30342)	; &R-M-30342;
+	(==shinjigen	    .  6640)	; &R-M-30342;
+	)
+       ((==ucs@unicode	    . #x821E)	; &R-UU+821E;
+	(==gb2312	    . #x4E68)	; &R-UU+821E; [46-72]
+	))
       )
-     ((==ucs@unicode	  . #x821E)	; &R-UU+821E;
-      (==gb2312		  . #x4E68)	; &R-UU+821E; [46-72]
+     ((total-strokes	   . 14)
+      (=ucs@cns		  . #x821E)	; &C1-6A5A;
+      (=cns11643-1	  . #x6A5A)	; &C1-6A5A; [74-58]
       )
-     ((==cns11643-1	  . #x6A5A)	; &R-C1-6A5A; [74-58]
-      ))
-    ))
-(define-char
-  '((<-denotational
-     ((=ucs		  . #x821E)	; 舞
-      ))
-    (ideographic-radical . 136)	; ⾇
-    (ideographic-strokes . 8)
-    (total-strokes	 . 15)
-    (=>>daikanwa/+p	. 30342)	; &G-M-p30342;
-    (->subsumptive
-     ((=ucs@jis		  . #x821E)	; &GT-39251;
+     ((total-strokes	   . 15)
+      (=ucs@jis		  . #x821E)	; &GT-39251;
       (=jis-x0208	  . #x4971)	; &GT-39251; [41-81]
       (=jis-x0213-1	  . #x4971)	; &I-JX1-4971; [41-81]
       (=gt		  . 39251)	; &I-GT-39251;
@@ -152,7 +139,8 @@
       (=gt-pj-1		  . #x4971)	; &I-GT-39251; [41-81]
       (=daikanwa/+p	  . 30342)	; &GT-39251;
       )
-     ((=ucs@ks		  . #x821E)	; &K0-5971;
+     ((total-strokes	   . 15)
+      (=ucs@ks		  . #x821E)	; &K0-5971;
       (=ks-x1001	  . #x5971)	; &K0-5971; [57-81]
       (=shinjigen	  .  6639)	; &K0-5971;
       ))