From: tomo <tomo>
Date: Mon, 26 Apr 2004 09:12:53 +0000 (+0000)
Subject: (M-30307): Moved into U-0002F98D; use `->identical' instead of
X-Git-Tag: r21-4-14-chise-0_21-26-si-vulgar^2~5
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=82284749b0e2cbd6017b298fbbcf895a628f56e3;p=chise%2Fxemacs-chise.git.1

(M-30307): Moved into U-0002F98D; use `->identical' instead of
`->same' for M-38638; use `<-vulgar@{jiyun|zhengzi-tong}' instead of
`<-vulgar'.
(U-0002F98D): Use `->subsumptive'; use `<-denotational' for U+8F9E.
---

diff --git a/lisp/utf-2000/Ideograph-R135-Tongue.el b/lisp/utf-2000/Ideograph-R135-Tongue.el
index 10f1bc7..ff7b063 100644
--- a/lisp/utf-2000/Ideograph-R135-Tongue.el
+++ b/lisp/utf-2000/Ideograph-R135-Tongue.el
@@ -441,33 +441,36 @@
     (=cns11643-5	. #x4929)	; &I-C5-4929;
     ))
 (define-char
-  '((=>ucs		. #x8F9E)	; 辞
-    (ideographic-radical . 135)	; ⾆
-    (ideographic-strokes . 7)
-    (total-strokes	 . 13)
-    (->same
-     ((=jis-x0208	  . #x3C2D)	; &GT-51568;
-      (=daikanwa	  . 38638)	; &I-M-38638;
-      ))
-    (->same*sources
-     daikanwa)
-    (<-vulgar
-     (:char	((=daikanwa	     . 38671)	; &I-M-38671;
-		 )
-      :sources	(daikanwa))
-     (:char	((=daikanwa	     . 38649)	; &I-M-38649;
-		 )
-      :sources	(daikanwa)))
-    (=daikanwa		. 30307)	; &M-30307;
-    ))
-(define-char
   '((=>ucs*		. #x8F9E)	; 辞
-    (morohashi-daikanwa	30307 0 1)
     (ideographic-radical . 135)	; ⾆
     (ideographic-strokes . 7)
     (total-strokes	 . 13)
+    (<-denotational
+     ((=ucs		  . #x8F9E)	; 辞
+      ))
     (=ucs		. #x2F98D)	; 辞
-    (=cns11643-3	. #x4425)	; &I-C3-4425;
+    (->subsumptive
+     ((->identical
+       ((=jis-x0208	    . #x3C2D)	; &GT-51568;
+	(=daikanwa	    . 38638)	; &I-M-38638;
+	))
+      (->same*sources
+       daikanwa)
+      (<-vulgar@jiyun
+       ((=daikanwa	    . 38649)	; &I-M-38649;
+	))
+      (<-vulgar@jiyun*sources
+       daikanwa)
+      (<-vulgar@zhengzi-tong
+       ((=daikanwa	    . 38671)	; &I-M-38671;
+	))
+      (<-vulgar@zhengzi-tong*sources
+       daikanwa)
+      (=daikanwa	  . 30307)	; &M-30307;
+      )
+     ((=cns11643-3	  . #x4425)	; &C3-4425;
+      (=ucs@iso		  . #x2F98D)	; &C3-4425;
+      ))
     ))
 (define-char
   '((=>ucs		. #x269DF)	; 𦧟