(g2-MJ020327): Add `ideographic-structure'.

[chise/xemacs-chise.git-] / lisp / utf-2000 / Ideograph-R008-Lid.el

diff --git a/lisp/utf-2000/Ideograph-R008-Lid.el b/lisp/utf-2000/Ideograph-R008-Lid.el
index 4ab364a..5675f65 100644 (file)
--- a/lisp/utf-2000/Ideograph-R008-Lid.el
+++ b/lisp/utf-2000/Ideograph-R008-Lid.el
@@ -1350,7 +1350,20 @@
       )
      ((=ucs              . #x5B50)     ; 子
       ))
-    (===hng-kak                . 02720)        ; &HNG017-02720;
+    (=mj               . 056895)       ; &MJ056895;
+    (=hanyo-denshi/ks  . 003860)       ; &MJ056895;
+    (->subsumptive
+     ((==mj              . 056895)     ; &g2-MJ056895;
+      (==hanyo-denshi/ks  . 003860)    ; &g2-MJ056895;
+      (->subsumptive
+       ((===hanyo-denshi/ks . 003860)  ; &R-HD-KS-003860;
+       (=hanyo-denshi/ks/mf . #x0182)  ; &R-HD-KS-003860;
+       )
+       ((===mj             . 056895)   ; &R-MJ056895;
+       )
+       ((===hng-kak        . 02720)    ; &HNG017-02720;
+       ))
+      ))
     ))
 (define-char
   '((ideographic-radical . 8)  ; ⼇