Add `===shuowen-jiguge-A30' characters.

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R025-Divination.el

diff --git a/lisp/utf-2000/Ideograph-R025-Divination.el b/lisp/utf-2000/Ideograph-R025-Divination.el
index 8c98eeb..423e0b0 100644 (file)
--- a/lisp/utf-2000/Ideograph-R025-Divination.el
+++ b/lisp/utf-2000/Ideograph-R025-Divination.el
@@ -1625,6 +1625,21 @@
   '((ideographic-radical . 25) ; ⼘
     (ideographic-strokes . 6)
     (total-strokes      . 8)
+    (=ucs              . #x209E6)      ; 𠧦
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x209E6)    ; 𠧦
+      ))
+    (ideographic-radical . 25) ; ⼘
+    (ideographic-strokes . 6)
+    (total-strokes      . 8)
+    (=ucs@iso          . #x209E6)      ; &U-000209E6;
+    ))
+(define-char
+  '((ideographic-radical . 25) ; ⼘
+    (ideographic-strokes . 6)
+    (total-strokes      . 8)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
@@ -2823,6 +2838,9 @@
 (define-char
   '((<-denotational@component
      ((=>ucs@component   . #x209E2)    ; &A-compU+209E2;
+      )
+     ((=>ucs@iwds-1      . #x7680)     ; &A-IWDSU+7680;
+      (=>iwds-1                  .  35699)     ; &A-IWDSU+7680;
       ))
     (ideographic-radical . 25) ; ⼘
     (=>ucs@iwds-1      . #x209E2)      ; &A-IWDSU+209E2;