(U+52C9): Unify JU+FA33.

(U+FA33): New character.
(U+52E4): Unify JU+FA34.
(U+FA34): New character.

diff --git a/lisp/utf-2000/Ideograph-R019-Power.el b/lisp/utf-2000/Ideograph-R019-Power.el
index 1be6ab1..647f1fa 100644 (file)
--- a/lisp/utf-2000/Ideograph-R019-Power.el
+++ b/lisp/utf-2000/Ideograph-R019-Power.el
@@ -1597,12 +1597,11 @@
     (ideographic-strokes . 7)
     (total-strokes      . 9)
     (->same-ideograph
-     (:sources (shinjigen-1)
-      :char    ((shinjigen-1        . 735)
+     (:char    ((shinjigen-1        . 735)
                 (=jis-x0208         . #x4A59)  ; ø½Š³‚
                 (chinese-cns11643-6 . #x3558)  ; ø»œ’¿
                 )
-      ))
+      :sources (shinjigen-1)))
     (hanyu-dazidian    1 372 3)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
@@ -1622,9 +1621,18 @@
     (chinese-big5              . #xAB6A)       ; ý¢€Š­ª
     (ideograph-daikanwa                . 02362)        ; ø¸€¤º
     (china3-jef                        . #x44E7)       ; øº„“§
+    (ucs-jis                   . #xFA33)       ; 勉
     (ucs                       . #x52C9)       ; 勉
     ))
 (define-char
+  '((=>ucs*            . #x52C9)       ; 勉
+    (morohashi-daikanwa        2362 0 0)
+    (ideographic-radical . 19) ; â¼’
+    (ideographic-strokes . 7)
+    (total-strokes      . 9)
+    (ucs               . #xFA33)       ; 勉
+    ))
+(define-char
   '((ideographic-radical . 19) ; â¼’
     (ideographic-strokes . 7)
     (total-strokes      . 9)
@@ -2903,9 +2911,18 @@
     (chinese-big5              . #xB6D4)       ; ý¢€‹›”
     (ideograph-daikanwa                . 02424)        ; ø¸€¥¸
     (china3-jef                        . #x44EF)       ; øº„“¯
+    (ucs-jis                   . #xFA34)       ; 勤
     (ucs                       . #x52E4)       ; 勤
     ))
 (define-char
+  '((=>ucs*            . #x52E4)       ; 勤
+    (morohashi-daikanwa        2424 0 0)
+    (ideographic-radical . 19) ; â¼’
+    (ideographic-strokes . 11)
+    (total-strokes      . 13)
+    (ucs               . #xFA34)       ; 勤
+    ))
+(define-char
   '((=>ucs             . #x52E5)       ; å‹¥
     (ideographic-radical . 19) ; â¼’
     (ideographic-strokes . 11)