(U-00020064): Use `->subsumptive'; use

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R013-Down-Box.el

diff --git a/lisp/utf-2000/Ideograph-R013-Down-Box.el b/lisp/utf-2000/Ideograph-R013-Down-Box.el
index aa3994c..c141f85 100644 (file)
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -15,18 +15,6 @@
     (=daikanwa         . 01506)        ; &I-M-01506;
     ))
 (define-char
-  '((=>ucs             . #x5182)       ; 冂
-    (=>daikanwa                . 01506)        ; 冂
-    (ideographic-radical . 13) ; ⼌
-    (ideographic-strokes . 0)
-    (total-strokes      . 2)
-    (<-formed@component
-     ((=ucs              . #x5182)     ; 冂
-      ))
-    (=gt-k             . 00079)        ; &GT-K00079;
-    (=gt-pj-k1         . #x3D6D)       ; &GT-K00079; [29-77]
-    ))
-(define-char
   '((<-denotational
      ((=ucs              . #x5182)     ; 冂
       ))
@@ -41,6 +29,20 @@
     (=ucs              . #x2E86)       ; ⺆
     ))
 (define-char
+  '((<-denotational
+     ((=ucs              . #x5182)     ; 冂
+      ))
+    (ideographic-radical . 13) ; ⼌
+    (ideographic-strokes . 0)
+    (total-strokes      . 2)
+    (<-formed@component
+     ((=ucs              . #x5182)     ; 冂
+      ))
+    (=big5-cdp         . #x8BC0)       ; &CDP-8BC0;
+    (=gt-k             . 00079)        ; &I-GT-K00079;
+    (=gt-pj-k1         . #x3D6D)       ; &CDP-8BC0; [29-77]
+    ))
+(define-char
   '((ideographic-radical . 13) ; ⼌
     (ideographic-strokes . 1)
     (total-strokes      . 3)
@@ -98,6 +100,23 @@
     (=big5-cdp         . #x8A78)       ; &CDP-8A78;
     ))
 (define-char
+  '((<-denotational
+     ((name*             . "ideographic component hood")
+      (=big5-cdp         . #x8A78)     ; &CDP-8A78;
+      ))
+    (name              . "CJK RADICAL SUN")
+    (general-category  symbol other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (<-identical@component/connect-below
+     ((name*             . "ideographic component hood")
+      (=big5-cdp         . #x8A78)     ; &CDP-8A78;
+      ))
+    (=ucs              . #x2E9C)       ; ⺜
+    (=gt-k             . 00565)        ; &I-GT-K00565;
+    (=gt-pj-k1         . #x3229)       ; ⺜ [18-09]
+    ))
+(define-char
   '((ideographic-radical . 13) ; ⼌
     (ideographic-strokes . 2)
     (total-strokes      . 4)