From: tomo <tomo>
Date: Mon, 25 Oct 2010 08:39:38 +0000 (+0000)
Subject: (U+52DC): Add ideographic-structure.
X-Git-Tag: r21-4-22-chise-0_25-2^20~9
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f6b681259e20b2eed6416abad878c1ed806a0691;p=chise%2Fxemacs-chise.git.1

(U+52DC): Add ideographic-structure.
(mother of JSP-336F): Unify G-JU+52DC; add ideographic-structure.
---

diff --git a/lisp/utf-2000/Ideograph-R019-Power.el b/lisp/utf-2000/Ideograph-R019-Power.el
index 9ee850d..8702845 100644
--- a/lisp/utf-2000/Ideograph-R019-Power.el
+++ b/lisp/utf-2000/Ideograph-R019-Power.el
@@ -2875,6 +2875,14 @@
   '((ideographic-radical . 19)	; ⼒
     (ideographic-strokes . 10)
     (total-strokes	 . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x7FC1)	; 翁
+      )
+     ((=ucs		  . #x529B)	; 力
+      ))
     (=ucs		. #x52DC)	; 勜
     ))
 (define-char
@@ -2884,12 +2892,22 @@
     (ideographic-radical . 19)	; ⼒
     (ideographic-strokes . 10)
     (total-strokes	 . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=>>gt		  . 36863)	; &G-GT-36863;
+      )
+     ((=ucs		  . #x529B)	; 力
+      ))
+    (=>>ucs@jis		. #x52DC)	; &G-JU+52DC;
     (->subsumptive
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
 	(=ucs		    . #x2FF0)	; â¿°
 	)
-       ((=ks-x1001	    . #x683A)	; &GT-36863; [72-26]
+       ((=ucs@ks	    . #x7FC1)	; &GT-36863;
+	(=ks-x1001	    . #x683A)	; &GT-36863; [72-26]
 	(=daikanwa	    . 28635)	; &I-M-28635;
 	)
        ((=ucs		    . #x529B)	; 力