Add some missing `ideographic-structure' properties.

(U+5346): Use `<-vulgar-ideograph' instead of
`vulgar-char-of-shinjigen-1'; add `<-wrong-ideograph' and
`ideographic-structure'.
(U+5348): Use U-00020089 instead of BC-8B4A in the
`ideographic-structure'.
(U+5358): Use `script' and `<-simplified-ideograph' instead of
`comment'; add `ideographic-structure'.

diff --git a/lisp/utf-2000/Ideograph-R024-Ten.el b/lisp/utf-2000/Ideograph-R024-Ten.el
index 0ea57ff..8f16436 100644 (file)
--- a/lisp/utf-2000/Ideograph-R024-Ten.el
+++ b/lisp/utf-2000/Ideograph-R024-Ten.el
@@ -119,9 +119,27 @@
   '((ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 2)
     (total-strokes      . 4)
+    (<-vulgar-ideograph
+     (:sources (shinjigen-1)
+      :char    ((shinjigen-1        . 823)
+                (ideograph-daikanwa . 02740)   ; �����
+                )
+      ))
+    (<-wrong-ideograph
+     (:sources (henkai morohashi-daikanwa)
+      :char    ((ideograph-daikanwa . 02740)   ; �����
+                )
+      ))
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (ucs               . #x2FF1)     ; ⿱
+      )
+     ((ucs               . #x4E5D)     ; 九
+      )
+     ((ucs               . #x5341)     ; 十
+      ))
     (shinjigen-1       . 825)
     (shinjigen-2       . 825)
-    (vulgar-char-of-shinjigen-1 . 823)
     (japanese-jisx0208-1978    . #x5240)       ; �����
     (japanese-jisx0208         . #x5240)       ; �����
     (chinese-cns11643-3                . #x2159)       ; �����
@@ -168,8 +186,7 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (ucs               . #x2FF1)     ; ⿱
       )
-     ((name              . "cjk radical person for top")
-      (chinese-big5-cdp          . #x8B4A)     ; ������
+     ((ucs               . #x20089)    ; 𠂉
       )
      ((ucs               . #x5341)     ; 十
       ))
@@ -336,6 +353,14 @@
     (kangxi-radical     . 1)   ; ⼀
     (kangxi-strokes     . 5)
     (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (ucs               . #x2FF1)     ; ⿱
+      )
+     ((ucs               . #x5341)     ; 十
+      )
+     ((ucs               . #x5EFF)     ; 廿
+      ))
     (japanese-jisx0212 . #x3438)       ; �����
     (chinese-cns11643-3 . #x232A)      ; �����
     (ideograph-daikanwa . 02714)       ; �����
@@ -516,6 +541,14 @@
   '((ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 4)
     (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (ucs               . #x2FF1)     ; ⿱
+      )
+     ((ucs               . #x5316)     ; 化
+      )
+     ((ucs               . #x5341)     ; 十
+      ))
     (chinese-gb2312    . #x3B2A)       ; �����
     (chinese-isoir165  . #x3B2A)       ; �����
     (ucs               . #x534E)       ; 华
@@ -524,6 +557,14 @@
   '((ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 4)
     (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (ucs               . #x2FF0)     ; ⿰
+      )
+     ((ucs               . #x5341)     ; 十
+      )
+     ((ucs               . #x529E)     ; 办
+      ))
     (chinese-gb2312    . #x502D)       ; �����
     (chinese-isoir165  . #x502D)       ; �����
     (chinese-cns11643-3 . #x232B)      ; �����
@@ -900,8 +941,15 @@
 (define-char
   '((ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 6)
-    (kangxi-radical     . 12)  ; ⼋
     (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (ucs               . #x2FF1)     ; ⿱
+      )
+     ((ucs               . #x4E37)     ; 丷
+      )
+     ((chinese-big5-cdp          . #x8BD9)     ; ������
+      ))
     (chinese-gb2312    . #x3525)       ; �����
     (chinese-isoir165  . #x3525)       ; �����
     (chinese-cns11643-3 . #x2763)      ; �����
@@ -912,6 +960,16 @@
   '((ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 6)
     (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (ucs               . #x2FF3)     ; ⿳
+      )
+     ((ucs               . #x5341)     ; 十
+      )
+     ((chinese-big5-cdp          . #x8D54)     ; ������
+      )
+     ((ucs               . #x5934)     ; 头
+      ))
     (chinese-gb2312    . #x4274)       ; �����
     (chinese-isoir165  . #x4274)       ; �����
     (china3-jef                . #x81EE)       ; �����
@@ -968,12 +1026,24 @@
     (ideograph-daikanwa . 02751)       ; �����
     ))
 (define-char
-  '((ideographic-radical . 24) ; ⼗
+  '((script            JP-Jouyou Ideograph)
+    (ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 7)
-    (japanese-radical   . 42)  ; ⼩
-    (japanese-strokes   . 6)
     (total-strokes      . 9)
-    (comment           . "[JP:Jouyou-Kanji] <simplified character> of R030:S1-1170")
+    (<-simplified-ideograph
+     (:sources (morohashi-daikanwa shinjigen-1)
+      :char    ((shinjigen-1        . 1170)
+                (ideograph-daikanwa . 03993)   ; �����
+                )
+      ))
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (ucs               . #x2FF1)     ; ⿱
+      )
+     ((chinese-big5-cdp          . #x89B2)     ; ������
+      )
+     ((chinese-big5-cdp          . #x8BD9)     ; ������
+      ))
     (shinjigen-1       . 1169)
     (shinjigen-2       . 1169)
     (japanese-jisx0208-1978    . #x4331)       ; �����
@@ -1021,23 +1091,57 @@
     (ucs               . #x209A4)      ; 𠦤
     ))
 (define-char
-  '((ideographic-radical . 24) ; ⼗
+  '((=>ucs             . #x5359)       ; 卙
+    (ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 9)
     (total-strokes      . 11)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (ucs               . #x2FF0)     ; ⿰
+      )
+     ((japanese-jisx0208-1978    . #x3F53)     ; �����
+      (japanese-jisx0208         . #x3F53)     ; �����
+      (korean-ksc5601            . #x6424)     ; �����
+      (ideograph-daikanwa        . 21648)      ; �����
+      )
+     ((ucs               . #x5341)     ; 十
+      ))
     (japanese-jisx0212 . #x3439)       ; �����
     (ideograph-daikanwa . 02757)       ; �����
     (china3-jef                . #x45C5)       ; �����
-    (ucs               . #x5359)       ; 卙
     ))
 (define-char
   '((=>ucs             . #x5359)       ; 卙
-    (morohashi-daikanwa        2757 0 1)
+    (morohashi-daikanwa        2757 0 0)
     (ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 9)
     (total-strokes      . 11)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (ucs               . #x2FF0)     ; ⿰
+      )
+     ((chinese-cns11643-1 . #x5249)    ; �����
+      )
+     ((ucs               . #x5341)     ; 十
+      ))
     (chinese-cns11643-4 . #x3060)      ; �����
     ))
 (define-char
+  '((morohashi-daikanwa        2757 0 1)
+    (ideographic-radical . 24) ; ⼗
+    (ideographic-strokes . 9)
+    (total-strokes      . 11)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (ucs               . #x2FF0)     ; ⿰
+      )
+     ((ucs               . #x751A)     ; 甚
+      )
+     ((ucs               . #x5341)     ; 十
+      ))
+    (ucs               . #x5359)       ; 卙
+    ))
+(define-char
   '((ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 9)
     (total-strokes      . 11)
@@ -1242,22 +1346,22 @@
     (ucs               . #x209CF)      ; 𠧏
     ))
 (define-char
-  '((ideographic-radical . 24) ; ⼗
+  '((=>ucs             . #x535B)       ; 卛
+    (ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 19)
     (total-strokes      . 21)
     (japanese-jisx0212 . #x343A)       ; �����
     (ideograph-daikanwa . 02772)       ; �����
     (china3-jef                . #x45C4)       ; �����
     (ideograph-cbeta   . 01465)        ; �����
-    (ucs               . #x535B)       ; 卛
     ))
 (define-char
-  '((=>ucs             . #x535B)       ; 卛
-    (morohashi-daikanwa        2772 0 1)
+  '((morohashi-daikanwa        2772 0 1)
     (ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 19)
     (total-strokes      . 21)
     (chinese-cns11643-4 . #x6630)      ; �����
+    (ucs               . #x535B)       ; 卛
     ))
 (define-char
   '((ideographic-radical . 24) ; ⼗