From: tomo <tomo>
Date: Mon, 19 Sep 2005 09:55:42 +0000 (+0000)
Subject: (U+8863): Use `->subsumptive'.
X-Git-Tag: r21-4-17-chise-0_22-4^20~116
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6e7c25744f21f7d19dfe7c02c73034c44ad62eaf;p=chise%2Fxemacs-chise.git-

(U+8863): Use `->subsumptive'.
(C6-2553): Unify U-0002F9C4; use `<-denotational' for U+8863; add
`=>ucs*' for U+8863.
(U+8864): Use `->subsumptive'; add `<-formed@component/connect-right'
for U+8863.
(<CJK RADICAL CLOTHES>): Copied from u02E00-CJK-Radical-Supplement.el.
---

diff --git a/lisp/utf-2000/Ideograph-R145-Clothes.el b/lisp/utf-2000/Ideograph-R145-Clothes.el
index 9cc0fb0..04000a1 100644
--- a/lisp/utf-2000/Ideograph-R145-Clothes.el
+++ b/lisp/utf-2000/Ideograph-R145-Clothes.el
@@ -1,53 +1,77 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
-  '((=>ucs		. #x8863)	; è¡£
-    (ideographic-radical . 145)	; ⾐
-    (ideographic-strokes . 0)
-    (total-strokes	 . 6)
-    (shinjigen-2	. 7335)
-    (=jis-x0208		. #x3061)	; &GT-45972; [16-65]
-    (=ks-x1001		. #x6B7D)	; &I-K0-6B7D; [75-93]
-    (=big5		. #xA6E7)	; &I-B-A6E7;
-    (=gt		. 45972)	; &I-GT-45972;
-    (=gt-k		. 01559)	; &I-GT-K01559;
-    (=gt-pj-1		. #x3061)	; &I-GT-45972; [16-65]
-    (=daikanwa		. 34091)	; &I-M-34091;
-    (=ucs@jis		. #x8863)	; &GT-45972;
-    ))
-(define-char
-  '((morohashi-daikanwa	34091 0 0)
-    (ideographic-radical . 145)	; ⾐
+  '((ideographic-radical . 145)	; ⾐
     (ideographic-strokes . 0)
     (total-strokes	 . 6)
     (=ucs		. #x8863)	; è¡£
-    (=gb2312		. #x5242)	; &I-G0-5242; [50-34]
-    (=cns11643-1	. #x4868)	; &I-C1-4868; [40-72]
+    (=big5		. #xA6E7)	; &I-B-A6E7;
+    (->subsumptive
+     ((shinjigen-1	  . 7335)
+      (shinjigen-2	  . 7335)
+      (=jis-x0208	  . #x3061)	; &GT-45972; [16-65]
+      (=ks-x1001	  . #x6B7D)	; &I-K0-6B7D; [75-93]
+      (=gt		  . 45972)	; &I-GT-45972;
+      (=gt-k		  . 01559)	; &I-GT-K01559;
+      (=gt-pj-1		  . #x3061)	; &I-GT-45972; [16-65]
+      (=daikanwa	  . 34091)	; &I-M-34091;
+      (=ucs@jis		  . #x8863)	; &GT-45972;
+      )
+     ((=gb2312		  . #x5242)	; &C1-4868; [50-34]
+      (=cns11643-1	  . #x4868)	; &I-C1-4868; [40-72]
+      (=ucs@unicode	  . #x8863)	; &C1-4868;
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa	34091 0 1)
+  '((<-denotational
+     ((=ucs		  . #x8863)	; è¡£
+      ))
+    (=>ucs*		. #x8863)	; è¡£
     (ideographic-radical . 145)	; ⾐
     (ideographic-strokes . 0)
     (total-strokes	 . 6)
-    (=cns11643-6	. #x2553)	; &C6-2553; [05-51]
+    (=ucs		. #x2F9C4)	; 衣
+    (=cns11643-6	. #x2553)	; &I-C6-2553; [05-51]
     ))
 (define-char
-  '((=>ucs		. #x8864)	; 衤
-    (ideographic-radical . 145)	; ⾐
+  '((ideographic-radical . 145)	; ⾐
     (ideographic-strokes . 0)
     (total-strokes	 . 6)
-    (=jis-x0212		. #x5C33)	; &M-34092; [60-19]
-    (=jis-x0213-2-2000	. #x7828)	; &I-JX2-7828; [88-08]
-    (=daikanwa		. 34092)	; &I-M-34092;
-    (=jef-china3	. #x63F0)	; &I-JC3-63F0;
-    (=ucs@jis		. #x8864)	; &M-34092;
+    (<-formed@component/connect-right
+     ((=ucs		  . #x8863)	; è¡£
+      ))
+    (=ucs		. #x8864)	; 衤
+    (->subsumptive
+     ((<-formed@component/connect-right
+       ((=jis-x0208	    . #x3061)	; &GT-45972; [16-65]
+	(=ks-x1001	    . #x6B7D)	; &I-K0-6B7D; [75-93]
+	(=daikanwa	    . 34091)	; &I-M-34091;
+	))
+      (<-formed@component/connect-right*sources
+       daikanwa)
+      (=jis-x0212	  . #x5C33)	; &M-34092; [60-19]
+      (=jis-x0213-2-2000  . #x7828)	; &I-JX2-7828; [88-08]
+      (=daikanwa	  . 34092)	; &I-M-34092;
+      (=jef-china3	  . #x63F0)	; &I-JC3-63F0;
+      (=ucs@jis		  . #x8864)	; &M-34092;
+      )
+     ((=gb2312		  . #x7142)	; &CDP-8BB1; [81-34]
+      (=big5-cdp	  . #x8BB1)	; &I-CDP-8BB1;
+      (=ucs@unicode	  . #x8864)	; &CDP-8BB1;
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa	34092 0 0)
-    (ideographic-radical . 145)	; ⾐
-    (ideographic-strokes . 0)
-    (total-strokes	 . 6)
-    (=ucs		. #x8864)	; 衤
-    (=gb2312		. #x7142)	; &I-G0-7142; [81-34]
+  '((<-denotational
+     ((=ucs		  . #x8864)	; 衤
+      ))
+    (name		. "CJK RADICAL CLOTHES")
+    (general-category	symbol other) ; Informative Category
+    (bidi-category	. "ON")
+    (mirrored		. nil)
+    (total-strokes	 . 5)
+    (<-identical@component/connect-right
+     ((=ucs		  . #x8864)	; 衤
+      ))
+    (=ucs		. #x2EC2)	; ⻂
     ))
 (define-char
   '((=>ucs		. #x27608)	; 𧘈