(BC-885E-var-003): New character; use `<-denotational@component' for

U-00021B54.
(BC-885E): Likewise.

diff --git a/lisp/utf-2000/Ideograph-R042-Small.el b/lisp/utf-2000/Ideograph-R042-Small.el
index 8a1ec59..6b2a257 100644 (file)
--- a/lisp/utf-2000/Ideograph-R042-Small.el
+++ b/lisp/utf-2000/Ideograph-R042-Small.el
@@ -114,6 +114,27 @@
       ))
     ))
 (define-char
+  '((<-denotational@component
+     ((=ucs              . #x21B54)    ; 𡭔
+      ))
+    (ideographic-radical . 42) ; ⼩
+    (ideographic-strokes . 0)
+    (total-strokes      . 3)
+    (=big5-cdp-var-003 . #x885E)       ; &CDP-v003-885E;
+    ))
+(define-char
+  '((<-denotational@component
+     ((=ucs              . #x21B54)    ; 𡭔
+      ))
+    (ideographic-radical . 42) ; ⼩
+    (ideographic-strokes . 0)
+    (total-strokes      . 3)
+    (=big5-cdp         . #x885E)       ; &CDP-885E;
+    (->subsumptive
+     ((==big5-cdp        . #x885E)     ; &g2-CDP-885E;
+      ))
+    ))
+(define-char
   '((<-denotational
      ((=>ucs@iwds-1      . #x5C0F)     ; &A-IWDSU+5C0F;
       (=>iwds-1                  .  0028)      ; &A-IWDSU+5C0F;