(U+2053C-var-004): New character; use `<-subsumptive' for U-0002053C.

diff --git a/lisp/utf-2000/Ideograph-R013-Down-Box.el b/lisp/utf-2000/Ideograph-R013-Down-Box.el
index c28ed06..98fe5e9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -216,6 +216,16 @@
        ((=ucs              . #x4E00)   ; 一
        ))
       (=ucs-var-003      . #x2053C)    ; &U-v003+2053C;
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
+       (=ucs               . #x2FF5)   ; ⿵
+       )
+       ((=big5-cdp         . #x8BF2)   ; &CDP-8BF2;
+       )
+       ((=ucs              . #x4E00)   ; 一
+       ))
+      (=ucs-var-004      . #x2053C)    ; &U-v004+2053C;
       ))
     ))
 (define-char