(U+6535): Add `<-formed@component/connect-left' for U+6534; add

[chise/xemacs-chise.git.1] / 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 5c7bd82..712384b 100644 (file)
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -67,13 +67,17 @@
     (=daikanwa         . 01508)        ; &I-M-01508;
     ))
 (define-char
-  '((name*             . "ideographic component hood")
-    (=>ucs             . #x5183)       ; 冃
-    (morohashi-daikanwa        1508 0 2)
+  '((<-denotational
+     ((=ucs              . #x5183)     ; 冃
+      ))
+    (name*             . "ideographic component hood")
+    (=>ucs             . #x2E9C)       ; ⺜
     (ideographic-radical . 13) ; ⼌
     (ideographic-strokes . 2)
     (total-strokes      . 4)
-    (ideograph-cdp     . -412)
+    (<-same@component/connect-below
+     ((=ucs              . #x5183)     ; 冃
+      ))
     (=big5-cdp         . #x8A78)       ; &CDP-8A78;
     ))
 (define-char
@@ -471,6 +475,19 @@
   '((ideographic-radical . 13) ; ⼌
     (ideographic-strokes . 3)
     (total-strokes      . 5)
+    (<-formed
+     ((shinjigen-1       . 508)
+      (=ucs              . #x518A)     ; 冊
+      (=jis-x0208        . #x3A7D)     ; &I-J90-3A7D; [26-93]
+      ))
+    (<-formed*sources
+     shinjigen-1)
+    (<-same
+     ((=ucs              . #x518A)     ; 冊
+      (=daikanwa         . 01515)      ; &I-M-01515;
+      ))
+    (<-same*sources
+     daikanwa)
     (hanyu-dazidian    1 99 4)
     (shinjigen-1       . 511)
     (=ucs              . #x20541)      ; 𠕁
@@ -479,13 +496,6 @@
     (=gt               . 01990)        ; &I-GT-01990;
     (=gt-pj-2          . #x3D33)       ; &I-GT-01990; [29-19]
     (=daikanwa         . 48932)        ; &I-M-48932;
-    (->ideographic-variants
-     ((shinjigen-1       . 508)
-      (=ucs              . #x518A)     ; 冊
-      (=daikanwa         . 01515)      ; &I-M-01515;
-      ))
-    (->ideographic-variants*sources
-     shinjigen-1)
     ))
 (define-char
   '((<-denotational