(U+5341): Unify GT-K00047.

(U+5351): Unify JU+FA35.
(U+FA35): New character.
(J0-485C): Use `<-vulgar-ideograph' instead of `vulgar-ideograph-of'.

diff --git a/lisp/utf-2000/Ideograph-R024-Ten.el b/lisp/utf-2000/Ideograph-R024-Ten.el
index f703ca2..4315193 100644 (file)
--- a/lisp/utf-2000/Ideograph-R024-Ten.el
+++ b/lisp/utf-2000/Ideograph-R024-Ten.el
@@ -10,8 +10,10 @@
     (korean-ksc5601    . #x6428)       ; �����
     (chinese-isoir165  . #x4A2E)       ; �����
     (chinese-cns11643-1 . #x4432)      ; �����
+    (ideograph-gt-pj-1 . #x3D3D)       ; 十
     (chinese-big5      . #xA451)       ; ������
     (ideograph-daikanwa . 02695)       ; �����
+    (ideograph-gt-k    . 00047)        ; ������
     (ucs               . #x5341)       ; 十
     ))
 (define-char
@@ -686,23 +688,31 @@
     (chinese-big5              . #xA8F5)       ; ������
     (ideograph-daikanwa                . 02738)        ; �����
     (china3-jef                        . #x45C3)       ; �����
+    (ucs-jis                   . #xFA35)       ; 卑
     (ucs                       . #x5351)       ; 卑
     ))
 (define-char
+  '((=>ucs*            . #x5351)       ; 卑
+    (morohashi-daikanwa        2738 0 0)
+    (ideographic-radical . 24) ; ⼗
+    (ideographic-strokes . 6)
+    (total-strokes      . 8)
+    (ucs               . #xFA35)       ; 卑
+    ))
+(define-char
   '((script            JP-Jouyou Ideograph)
     (=>ucs             . #x5351)       ; 卑
     (morohashi-daikanwa        2738 0 1)
     (ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 7)
     (total-strokes      . 9)
+    (<-vulgar-ideograph
+     (:char    ((shinjigen-1        . 830)
+                (ideograph-daikanwa . 02738)   ; �����
+                )
+      :sources (shinjigen-1)))
     (shinjigen-1       . 829)
     (shinjigen-2       . 829)
-    (vulgar-ideograph-of
-     ((sources           shinjigen-1)
-      (char . ((shinjigen-1       . 830)
-              (ideograph-daikanwa . 02738)     ; �����
-              ))
-      ))
     (=jis-x0208                . #x485C)       ; �����
     (chinese-cns11643-6 . #x2F38)      ; �����
     (ucs-jis           . #x5351)       ; �����
@@ -712,11 +722,10 @@
     (ideographic-strokes . 6)
     (total-strokes      . 8)
     (<-vulgar-ideograph
-     (:sources (seiji-tsuu morohashi-daikanwa shinjigen-1)
-      :char    ((shinjigen-1        . 830)
+     (:char    ((shinjigen-1        . 830)
                 (ideograph-daikanwa . 02738)   ; �����
                 )
-      ))
+      :sources (seiji-tsuu morohashi-daikanwa shinjigen-1)))
     (shinjigen-1       . 831)
     (shinjigen-2       . 831)
     (chinese-cns11643-4 . #x2553)      ; �����