From: tomo <tomo>
Date: Sat, 19 Jun 2004 20:26:37 +0000 (+0000)
Subject: (U+88D7): Define as an abstract character; unify B-DBC4.  (C2-402A):
X-Git-Tag: r21-4-14-chise-0_21-29-si-original^2~19
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;ds=sidebyside;h=dd89020bf913af820b3431ed355176728d54c908;p=chise%2Fxemacs-chise.git

(U+88D7): Define as an abstract character; unify B-DBC4.  (C2-402A):
Use `<-denotational' for U+88D7; use `<-original*sources' instead of
char-ref in `<-original'; use `->subsumptive'; separate B-DBC4.
(M-34310): Use `<-denotational' for U+88D7; use `->subsumptive'.
---

diff --git a/lisp/utf-2000/Ideograph-R145-Clothes.el b/lisp/utf-2000/Ideograph-R145-Clothes.el
index c1c4a8a..f429704 100644
--- a/lisp/utf-2000/Ideograph-R145-Clothes.el
+++ b/lisp/utf-2000/Ideograph-R145-Clothes.el
@@ -71,8 +71,9 @@
     (=ucs		. #x461A)	; 䘚
     (->subsumptive
      ((<-original
-       ((ideographic-radical . 24)	; ⼗
-	(shinjigen-1	    . 823)
+       ((shinjigen-1	    . 823)
+	(=jis-x0208	    . #x4234)	; &GT-03504; [34-20]
+	(=ks-x1001	    . #x706F)	; &I-K0-706F; [80-79]
 	(=daikanwa	    . 02740)	; &I-M-02740;
 	))
       (<-original*sources
@@ -2561,18 +2562,27 @@
     (=cns11643-4	. #x3530)	; &C4-3530; [21-16]
     ))
 (define-char
-  '((=>ucs		. #x88D7)	; 裗
-    (ideographic-radical . 145)	; ⾐
+  '((ideographic-radical . 145)	; ⾐
+    (=ucs		. #x88D7)	; 裗
+    (=big5		. #xDBC4)	; &I-B-DBC4;
+    ))
+(define-char
+  '((ideographic-radical . 145)	; ⾐
     (ideographic-strokes . 6)
     (total-strokes	 . 12)
+    (<-denotational
+     ((=ucs		  . #x88D7)	; 裗
+      ))
     (<-original
-     (:sources	(seiji-tsuu morohashi-daikanwa)
-      :char	((=daikanwa	     . 34310)	; &I-M-34310;
-		 )
+     ((=daikanwa	  . 34310)	; &M-34310;
+      ))
+    (<-original*sources
+     zhengzi-tong daikanwa)
+    (->subsumptive
+     ((=daikanwa	  . 34265)	; &M-34265;
+      )
+     ((=cns11643-2	  . #x402A)	; &C2-402A; [32-10]
       ))
-    (=cns11643-2	. #x402A)	; &M-34265; [32-10]
-    (=big5		. #xDBC4)	; &I-B-DBC4;
-    (=daikanwa		. 34265)	; &I-M-34265;
     ))
 (define-char
   '((ideographic-radical . 145)	; ⾐
@@ -3345,9 +3355,16 @@
   '((ideographic-radical . 145)	; ⾐
     (ideographic-strokes . 7)
     (total-strokes	 . 13)
-    (=ucs		. #x88D7)	; 裗
-    (=cns11643-6	. #x582E)	; &I-C6-582E; [56-14]
-    (=daikanwa		. 34310)	; &I-M-34310;
+    (<-denotational
+     ((=ucs		  . #x88D7)	; 裗
+      ))
+    (->subsumptive
+     ((=daikanwa	  . 34310)	; &M-34310;
+      )
+     ((=ucs@unicode	  . #x88D7)	; &UU+88D7;
+      )
+     ((=cns11643-6	  . #x582E)	; &C6-582E; [56-14]
+      ))
     ))
 (define-char
   '((=>ucs		. #x27689)	; 𧚉