Sync up with r21-4-14-chise-0_21-18.

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R019-Power.el

diff --git a/lisp/utf-2000/Ideograph-R019-Power.el b/lisp/utf-2000/Ideograph-R019-Power.el
index 54d0419..644fad1 100644 (file)
--- a/lisp/utf-2000/Ideograph-R019-Power.el
+++ b/lisp/utf-2000/Ideograph-R019-Power.el
@@ -743,7 +743,7 @@
     (ideographic-radical . 19) ; â¼’
     (ideographic-strokes . 5)
     (total-strokes      . 7)
-    (<-simplified-ideograph
+    (<-simplified
      (:sources (sougen-irai-zokujifu morohashi-daikanwa shinjigen-1)
       :char    ((shinjigen-1        . 716)
                 (=daikanwa          . 02472)   ; ø¸€¦¨
@@ -840,10 +840,16 @@
     (=jef-china3       . #x82B2)       ; øºˆŠ²
     ))
 (define-char
-  '((ideographic-radical . 19) ; â¼’
+  '((script            JP-Jouyou Ideograph)
+    (ideographic-radical . 19) ; â¼’
     (ideographic-strokes . 5)
     (total-strokes      . 7)
-    (comment           . "[JP-Jouyou] <simplified character> of S1-0718")
+    (<-simplified
+     ((shinjigen-1       . 718)
+      (=daikanwa         . 02410)      ; ø¸€¥ª
+      ))
+    (<-simplified*sources
+     shinjigen-1)
     (shinjigen-1       . 717)
     (shinjigen-2       . 717)
     (=ucs              . #x52B4)       ; 労
@@ -1639,14 +1645,16 @@
     (=hanziku-1                . #xF2AB)       ; ý¢€ŸŠ«
     ))
 (define-char
-  '((ideographic-radical . 19) ; â¼’
+  '((=>ucs*            . #x52C9)       ; 勉
+    (ideographic-radical . 19) ; â¼’
     (ideographic-strokes . 7)
     (total-strokes      . 9)
     (->same-ideograph
-     (:char    ((shinjigen-1        . 735)
-                (=jis-x0208         . #x4A59)  ; ø½Š³‚
-                )
-      :sources (shinjigen-1)))
+     ((shinjigen-1       . 735)
+      (=jis-x0208        . #x4A59)     ; ø½Š³‚
+      ))
+    (->same-ideograph*sources
+     shinjigen-1)
     (hanyu-dazidian    1 372 3)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
@@ -1658,7 +1666,7 @@
       ))
     (shinjigen-1       . 736)
     (shinjigen-2       . 736)
-    (=ucs              . #x52C9)       ; 勉
+    (=ucs              . #xFA33)       ; 勉
     (=gb2312           . #x4363)       ; ø»„¹‚
     (=ks-x1001         . #x5875)       ; ø»‰¬’
     (=cns11643-1       . #x502E)       ; ø»’‡«
@@ -1666,15 +1674,21 @@
     (=big5             . #xAB6A)       ; ý¢€Š­ª
     (=daikanwa         . 02362)        ; ø¸€¤º
     (=jef-china3       . #x44E7)       ; øº„“§
-    (=ucs@jis          . #xFA33)       ; 勉
+    (=ucs@gb           . #x52C9)       ; 勉
+    (=ucs@cns          . #x52C9)       ; 勉
+    (=ucs@ks           . #x52C9)       ; 勉
+    (=ucs@big5         . #x52C9)       ; 勉
     ))
 (define-char
-  '((=>ucs*            . #x52C9)       ; 勉
+  '((=>ucs@jis         . #xFA33)       ; 勉
     (morohashi-daikanwa        2362 0 0)
     (ideographic-radical . 19) ; â¼’
     (ideographic-strokes . 7)
     (total-strokes      . 9)
-    (=ucs              . #xFA33)       ; 勉
+    (->identical
+     ((=ucs              . #xFA33)     ; 勉
+      ))
+    (=ucs              . #x52C9)       ; 勉
     ))
 (define-char
   '((ideographic-radical . 19) ; â¼’
@@ -2772,15 +2786,17 @@
     (ideographic-radical . 19) ; â¼’
     (ideographic-strokes . 10)
     (total-strokes      . 12)
-    (<-simplified-ideograph
-     (:char    ((=daikanwa          . 02424)   ; ø¸€¥¸
-                )
-      :sources (morohashi-daikanwa)))
+    (<-simplified
+     ((=daikanwa         . 02424)      ; ø¸€¥¸
+      ))
+    (<-simplified*sources
+     daikanwa)
     (<-vulgar-ideograph
-     (:char    ((shinjigen-1        . 744)
-                (=daikanwa          . 02424)   ; ø¸€¥¸
-                )
-      :sources (shinjigen-1)))
+     ((shinjigen-1       . 744)
+      (=daikanwa         . 02424)      ; ø¸€¥¸
+      ))
+    (<-vulgar-ideograph*sources
+     shinjigen-1)
     (shinjigen-1       . 743)
     (shinjigen-2       . 743)
     (=ucs              . #x2F827)      ; 勤
@@ -3025,7 +3041,8 @@
     (=daikanwa         . 02423)        ; ø¸€¥·
     ))
 (define-char
-  '((ideographic-radical . 19) ; â¼’
+  '((=>ucs*            . #x52E4)       ; 勤
+    (ideographic-radical . 19) ; â¼’
     (ideographic-strokes . 11)
     (total-strokes      . 13)
     (hanyu-dazidian    1 378 3)
@@ -3039,7 +3056,7 @@
       ))
     (shinjigen-1       . 744)
     (shinjigen-2       . 744)
-    (=ucs              . #x52E4)       ; 勤
+    (=ucs              . #xFA34)       ; 勤
     (=gb2312           . #x475A)       ; ø»„¾±
     (=ks-x1001         . #x5043)       ; ø»‰Ÿ°
     (=cns11643-1       . #x633B)       ; ø»’£²
@@ -3047,15 +3064,21 @@
     (=big5             . #xB6D4)       ; ý¢€‹›”
     (=daikanwa         . 02424)        ; ø¸€¥¸
     (=jef-china3       . #x44EF)       ; øº„“¯
-    (=ucs@jis          . #xFA34)       ; 勤
+    (=ucs@gb           . #x52E4)       ; 勤
+    (=ucs@cns          . #x52E4)       ; 勤
+    (=ucs@ks           . #x52E4)       ; 勤
+    (=ucs@big5         . #x52E4)       ; 勤
     ))
 (define-char
-  '((=>ucs*            . #x52E4)       ; 勤
+  '((=>ucs@jis         . #xFA34)       ; 勤
     (morohashi-daikanwa        2424 0 0)
     (ideographic-radical . 19) ; â¼’
     (ideographic-strokes . 11)
     (total-strokes      . 13)
-    (=ucs              . #xFA34)       ; 勤
+    (->identical
+     ((=ucs              . #xFA34)     ; 勤
+      ))
+    (=ucs              . #x52E4)       ; 勤
     ))
 (define-char
   '((=>ucs             . #x52E5)       ; å‹¥
@@ -3178,7 +3201,7 @@
     (ideographic-radical . 19) ; â¼’
     (ideographic-strokes . 11)
     (total-strokes      . 13)
-    (<-simplified-ideograph
+    (<-simplified
      (:char    ((shinjigen-1        . 751)
                 (=daikanwa          . 02486)   ; ø¸€¦¶
                 )