From: tomo <tomo>
Date: Mon, 12 Sep 2005 13:35:41 +0000 (+0000)
Subject: (U+6C35): Add `<-formed@component/connect-right' for U+6C34; unify
X-Git-Tag: r21-4-17-chise-0_22-4^20~158
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a0e9c020577f04d94a02febb5045278286fd921e;p=chise%2Fxemacs-chise.git-

(U+6C35): Add `<-formed@component/connect-right' for U+6C34; unify
BC-8AF6.
(<CJK RADICAL WATER ONE>): Copied from
u02E00-CJK-Radical-Supplement.el.
(U+6C39): Use `->subsumptive'.
(U+6C3A): Use `->subsumptive'.
(<CJK RADICAL WATER TWO>): Copied from
u02E00-CJK-Radical-Supplement.el.
---

diff --git a/lisp/utf-2000/Ideograph-R085-Water.el b/lisp/utf-2000/Ideograph-R085-Water.el
index 5684760..f64c4c9 100644
--- a/lisp/utf-2000/Ideograph-R085-Water.el
+++ b/lisp/utf-2000/Ideograph-R085-Water.el
@@ -26,15 +26,35 @@
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 0)
     (total-strokes	 . 3)
+    (<-formed@component/connect-right
+     ((=ucs		  . #x6C34)	; æ°´
+      (=daikanwa	  . 17083)	; &I-M-17083;
+      ))
+    (<-formed@component/connect-right*sources
+     zihui/char-index daikanwa)
     (=ucs		. #x6C35)	; æ°µ
     (=gb2312		. #x635F)	; &I-G0-635F; [67-63]
     (=jis-x0212		. #x4653)	; &I-JSP-4653; [38-51]
     (=jis-x0213-2-2000	. #x6E31)	; &I-JX2-6E31; [78-17]
+    (=big5-cdp		. #x8AF6)	; &I-CDP-8AF6;
     (=daikanwa		. 17085)	; &I-M-17085;
     (=cbeta		. 01416)	; &I-CB01416;
     (=jef-china3	. #x55B0)	; &I-JC3-55B0;
     ))
 (define-char
+  '((<-denotational
+     ((=ucs		  . #x6C35)	; æ°µ
+      ))
+    (name		. "CJK RADICAL WATER ONE")
+    (general-category	symbol other) ; Informative Category
+    (bidi-category	. "ON")
+    (mirrored		. nil)
+    (<-identical@component/connect-right
+     ((=ucs		  . #x6C35)	; æ°µ
+      ))
+    (=ucs		. #x2EA1)	; ⺡
+    ))
+(define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 1)
     (total-strokes	 . 5)
@@ -84,22 +104,48 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 1)
-    (kangxi-radical	 . 5)	; ⼄
-    (kangxi-strokes	 . 5)
     (total-strokes	 . 5)
     (=ucs		. #x6C39)	; æ°¹
-    (=cns11643-3	. #x2254)	; &I-C3-2254; [02-52]
-    (=daikanwa		. 17091)	; &I-M-17091;
+    (->subsumptive
+     ((=cns11643-3	  . #x2254)	; &M-17091; [02-52]
+      (=daikanwa	  . 17091)	; &I-M-17091;
+      )
+     ((=ucs@unicode	  . #x6C39)	; &UU+6C39;
+      ))
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 1)
     (total-strokes	 . 5)
     (=ucs		. #x6C3A)	; æ°º
-    (=jis-x0212		. #x4655)	; &I-JSP-4655; [38-53]
-    (=jis-x0213-2-2000	. #x6E33)	; &I-JX2-6E33; [78-19]
-    (=daikanwa		. 17092)	; &I-M-17092;
-    (=cbeta		. 06162)	; &I-CB06162;
+    (->subsumptive
+     ((<-formed@component/connect-above
+       ((=ucs		    . #x6C34)	; æ°´
+	(=daikanwa	    . 17083)	; &I-M-17083;
+	))
+      (<-formed@component/connect-above*sources
+       zihui/char-index daikanwa)
+      (=jis-x0212	  . #x4655)	; &M-17092; [38-53]
+      (=jis-x0213-2-2000  . #x6E33)	; &I-JX2-6E33; [78-19]
+      (=daikanwa	  . 17092)	; &I-M-17092;
+      (=ucs@unicode	  . #x6C3A)	; &M-17092;
+      )
+     ((=cbeta		  . 06162)	; &CB06162;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x6C3A)	; æ°º
+      ))
+    (name		. "CJK RADICAL WATER TWO")
+    (general-category	symbol other) ; Informative Category
+    (bidi-category	. "ON")
+    (mirrored		. nil)
+    (<-identical@component
+     ((=ucs		  . #x6C3A)	; æ°º
+      ))
+    (=ucs		. #x2EA2)	; ⺢
+    (=big5-cdp		. #x8C43)	; &I-CDP-8C43;
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔