(IWDS1-0062): New abstract component; unify A-IWDSU+4EA0.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R008-Lid.el

diff --git a/lisp/utf-2000/Ideograph-R008-Lid.el b/lisp/utf-2000/Ideograph-R008-Lid.el
index 07809f4..018fa80 100644 (file)
--- a/lisp/utf-2000/Ideograph-R008-Lid.el
+++ b/lisp/utf-2000/Ideograph-R008-Lid.el
@@ -3,6 +3,17 @@
   '((ideographic-radical . 8)  ; ⼇
     (ideographic-strokes . 0)
     (total-strokes      . 2)
+    (=>ucs@component   . #x4EA0)       ; &IWDS1-062;
+    (=>iwds-1          .  0062)        ; &IWDS1-062;
+    ))
+(define-char
+  '((<-denotational@component
+     ((=>ucs@component   . #x4EA0)     ; &IWDS1-062;
+      (=>iwds-1                  .  0062)      ; &IWDS1-062;
+      ))
+    (ideographic-radical . 8)  ; ⼇
+    (ideographic-strokes . 0)
+    (total-strokes      . 2)
     (sound@ja/on/kan   "tou")
     (=ucs              . #x4EA0)       ; 亠
     (=+>jis-x0208      . #x5035)       ; 亠 [48-21]