(A-compU+51F5): New abstract node.

(U+51F5): Add `<-denotational@component' for A-compU+51F5.
(GT-K00386): New character; use `<-denotational@component' for
A-compU+51F5.

diff --git a/lisp/utf-2000/Ideograph-R017-Open-Box.el b/lisp/utf-2000/Ideograph-R017-Open-Box.el
index 352389e..571ad5d 100644 (file)
--- a/lisp/utf-2000/Ideograph-R017-Open-Box.el
+++ b/lisp/utf-2000/Ideograph-R017-Open-Box.el
@@ -3,6 +3,15 @@
   '((ideographic-radical . 17) ; ⼐
     (ideographic-strokes . 0)
     (total-strokes      . 2)
+    (=>ucs@component   . #x51F5)       ; &A-compU+51F5;
+    ))
+(define-char
+  '((<-denotational@component
+     ((=>ucs@component   . #x51F5)     ; &A-compU+51F5;
+      ))
+    (ideographic-radical . 17) ; ⼐
+    (ideographic-strokes . 0)
+    (total-strokes      . 2)
     (=ucs              . #x51F5)       ; 凵
     ))
 (define-char
@@ -71,6 +80,20 @@
       ))
     ))
 (define-char
+  '((<-denotational@component
+     ((=>ucs@component   . #x51F5)     ; &A-compU+51F5;
+      ))
+    (ideographic-radical . 17) ; ⼐
+    (ideographic-strokes . 0)
+    (total-strokes      . 2)
+    (=gt-k             . 00386)        ; &GT-K00386;
+    (=gt-pj-k1         . #x4921)       ; &GT-K00386; [41-01]
+    (->subsumptive
+     ((==gt-k            . 00386)      ; &g2-GT-K00386;
+      (==gt-pj-k1        . #x4921)     ; &g2-GT-K00386; [41-01]
+      ))
+    ))
+(define-char
   '((ideographic-radical . 17) ; ⼐
     (ideographic-strokes . 0)
     (total-strokes      . 2)