(U+20541-itaiji-001): New character.

(BC-89E0): New character.

diff --git a/lisp/utf-2000/Ideograph-R013-Down-Box.el b/lisp/utf-2000/Ideograph-R013-Down-Box.el
index c7f743f..b394612 100644 (file)
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -1977,6 +1977,20 @@
       ))
     ))
 (define-char
+  '((ideographic-radical . 13) ; ⼌
+    (ideographic-strokes . 3)
+    (total-strokes      . 5)
+    (=ucs-itaiji-001   . #x20541)      ; &U-i001+20541;
+    (<-formed@component
+     ((=ucs              . #x20541)    ; 𠕁
+      )
+     ((=ucs              . #x518A)     ; 冊
+      ))
+    (->subsumptive
+     ((==ucs-itaiji-001          . #x20541)    ; &g2-U-i001+20541;
+      ))
+    ))
+(define-char
   '((<-denotational@component
      ((=>ucs@component   . #x20B26)    ; &A-compU+20B26;
       (=>ucs-itaiji-001          . #x56DF)     ; &A-compU+20B26;
@@ -2769,6 +2783,23 @@
       ))
     ))
 (define-char
+  '((ideographic-radical . 13) ; ⼌
+    (ideographic-strokes . 4)
+    (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs-itaiji-001   . #x20541)    ; &U-i001+20541;
+      )
+     ((=ucs              . #x4E00)     ; 一
+      ))
+    (=big5-cdp         . #x89E0)       ; &CDP-89E0;
+    (->subsumptive
+     ((==big5-cdp        . #x89E0)     ; &g2-CDP-89E0;
+      ))
+    ))
+(define-char
   '((<-denotational@usage
      ((==>ucs@bucs       . #x518F)     ; &BUCS+518F;
       ))