(A-compU+4E00): New abstract node.

(U+4E00): Add `<-denotational@component' for A-compU+4E00.

diff --git a/lisp/utf-2000/Ideograph-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index 153dd98..3c1f39e 100644 (file)
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -1,6 +1,15 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
-  '((<-denotational@usage
+  '((ideographic-radical . 1)  ; ⼀
+    (ideographic-strokes . 0)
+    (total-strokes      . 1)
+    (=>ucs@component   . #x4E00)       ; &A-compU+4E00;
+    ))
+(define-char
+  '((<-denotational@component
+     ((=>ucs@component   . #x4E00)     ; &A-compU+4E00;
+      ))
+    (<-denotational@usage
      ((==>ucs@bucs       . #x4E00)     ; &BUCS+4E00;
       ))
     (decimal-digit-value . 1)