(U+535D): Unify BC-8BF9.

(U+5364): Unify BC-8A56.
(U-000209EA): Unify BC-8AA6.
- Add some `hanyu-dazidian-vol', `hanyu-dazidian-page' and
  `hanyu-dazidian-char' properties.
- Use char-spec instead of char-ref as operators in
  `ideographic-structure' properties.

diff --git a/lisp/utf-2000/Ideograph-R025-Divination.el b/lisp/utf-2000/Ideograph-R025-Divination.el
index 0875843..8519ae8 100644 (file)
--- a/lisp/utf-2000/Ideograph-R025-Divination.el
+++ b/lisp/utf-2000/Ideograph-R025-Divination.el
@@ -2,6 +2,9 @@
   '((ideographic-radical . 25) ; ⼘
     (ideographic-strokes . 0)
     (total-strokes      . 2)
+    (hanyu-dazidian-vol         . 1)
+    (hanyu-dazidian-page . 91)
+    (hanyu-dazidian-char . 11)
     (shinjigen-1       . 834)
     (shinjigen-2       . 834)
     (japanese-jisx0208-1978    . #x4B4E)       ; �����
@@ -60,6 +63,7 @@
     (chinese-cns11643-3 . #x215A)      ; �����
     (ideograph-daikanwa . 02777)       ; �����
     (ideograph-cbeta   . 01453)        ; �����
+    (chinese-big5-cdp  . #x8BF9)       ; ������
     (ucs               . #x535D)       ; 卝
     ))
 (define-char
@@ -88,12 +92,14 @@
     (ideographic-radical . 25) ; ⼘
     (ideographic-strokes . 2)
     (total-strokes      . 4)
+    (hanyu-dazidian-vol         . 1)
+    (hanyu-dazidian-page . 92)
+    (hanyu-dazidian-char . 3)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (ucs               . #x2FF1)     ; ⿱
       )
-     ((chinese-big5-cdp          . #x8B41)     ; ������
-      (ucs               . #x4E36)     ; 丶
+     ((ucs               . #x4E36)     ; 丶
       )
      ((ucs               . #x4E0B)     ; 下
       ))
@@ -119,14 +125,14 @@
   '((ideographic-radical . 25) ; ⼘
     (ideographic-strokes . 3)
     (total-strokes      . 5)
+    (hanyu-dazidian-vol         . 1)
+    (hanyu-dazidian-page . 92)
+    (hanyu-dazidian-char . 5)
     (ideographic-structure
-     (:cdp-combinator  2
-      :char    ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-                (ucs                . #x2FF1)  ; ⿱
-                )
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (ucs               . #x2FF1)     ; ⿱
       )
      ((name              . "CJK RADICAL DIVINATION")
-      (chinese-big5-cdp          . #x8B78)     ; ������
       (ucs               . #x2E8A)     ; ⺊
       )
      ((ucs               . #x53E3)     ; 口
@@ -148,11 +154,12 @@
   '((ideographic-radical . 25) ; ⼘
     (ideographic-strokes . 3)
     (total-strokes      . 5)
+    (hanyu-dazidian-vol         . 1)
+    (hanyu-dazidian-page . 92)
+    (hanyu-dazidian-char . 4)
     (ideographic-structure
-     (:cdp-combinator  2
-      :char    ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-                (ucs                . #x2FF1)  ; ⿱
-                )
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (ucs               . #x2FF1)     ; ⿱
       )
      ((ucs               . #x4E0A)     ; 上
       )
@@ -262,17 +269,17 @@
   '((ideographic-radical . 25) ; ⼘
     (ideographic-strokes . 5)
     (total-strokes      . 7)
+    (hanyu-dazidian-vol         . 1)
+    (hanyu-dazidian-page . 93)
+    (hanyu-dazidian-char . 15)
     (ideographic-structure
-     (:cdp-combinator  2
-      :char    ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-                (ucs                . #x2FF1)  ; ⿱
-                )
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (ucs               . #x2FF1)     ; ⿱
       )
      ((name              . "CJK RADICAL DIVINATION")
-      (chinese-big5-cdp          . #x8B78)     ; ������
       (ucs               . #x2E8A)     ; ⺊
       )
-     ((chinese-big5-cdp          . #x8DE5)     ; ������
+     ((ucs               . #x56D9)     ; 囙
       ))
     (shinjigen-1       . 839)
     (shinjigen-2       . 839)
@@ -316,6 +323,7 @@
     (chinese-isoir165  . #x4231)       ; �����
     (chinese-cns11643-4 . #x234D)      ; �����
     (ideograph-daikanwa . 02794)       ; �����
+    (chinese-big5-cdp  . #x8A56)       ; ������
     (ucs               . #x5364)       ; 卤
     ))
 (define-char
@@ -345,11 +353,12 @@
   '((ideographic-radical . 25) ; ⼘
     (ideographic-strokes . 6)
     (total-strokes      . 8)
+    (hanyu-dazidian-vol         . 1)
+    (hanyu-dazidian-page . 94)
+    (hanyu-dazidian-char . 5)
     (ideographic-structure
-     (:cdp-combinator  1
-      :char    ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-                (ucs                . #x2FF0)  ; ⿰
-                )
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (ucs               . #x2FF0)     ; ⿰
       )
      ((ucs               . #x572D)     ; 圭
       )
@@ -487,13 +496,16 @@
     (ideographic-strokes . 7)
     (total-strokes      . 9)
     (<-ancient-ideograph
-     (:sources (shinjigen-1)
-              :char ((shinjigen-1 . 839)
-                     (ideograph-daikanwa               . 02791)        ; �����
-                     )))
+     (:sources (shinjigen-1)
+      :char    ((shinjigen-1        . 839)
+                (ideograph-daikanwa . 02791)   ; �����
+                )
+      :denied  (setsumon-tsuukun-teisei morohashi-daikanwa)
+      ))
     (shinjigen-1       . 840)
     (chinese-cns11643-4 . #x2851)      ; �����
     (ideograph-daikanwa . 02810)       ; �����
+    (chinese-big5-cdp  . #x8AA6)       ; ������
     (ucs               . #x209EA)      ; 𠧪
     ))
 (define-char