(g2-M-08652): Add `ideographic-structure'.

[chise/xemacs-chise.git-] / lisp / utf-2000 / Ideograph-R046-Mountain.el

diff --git a/lisp/utf-2000/Ideograph-R046-Mountain.el b/lisp/utf-2000/Ideograph-R046-Mountain.el
index 968add8..d79b000 100644 (file)
--- a/lisp/utf-2000/Ideograph-R046-Mountain.el
+++ b/lisp/utf-2000/Ideograph-R046-Mountain.el
@@ -17885,16 +17885,24 @@
       )
      ((=ucs              . #x5C71)     ; 山
       )
-     ((=ucs@jis                  . #x737B)     ; &GT-26617;
-      (=jis-x0208        . #x605B)     ; &GT-26617; [64-59]
-      (=ks-x1001         . #x7A4C)     ; &I-K0-7A4C; [90-44]
-      (=jis-x0213-1      . #x605B)     ; &I-JX1-605B; [64-59]
-      (=daikanwa         . 20783)      ; &I-M-20783;
+     ((=ucs@jis                  . #x737B)     ; &AJ1-05652;
+      (=adobe-japan1-0   . 05652)      ; &AJ1-05652;
       ))
     (=daikanwa         . 08652)        ; &M-08652;
     (=cbeta            . 05004)        ; &I-CB05004;
     (->subsumptive
-     ((==daikanwa        . 08652)      ; &g2-M-08652;
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+       (=ucs               . #x2FF1)   ; ⿱
+       )
+       ((==ucs@unicode     . #x5C71)   ; &g2-AJ1-02177;
+       (==adobe-japan1-0   . 02177)    ; &g2-AJ1-02177;
+       )
+       ((==ucs@jis         . #x737B)   ; &g2-AJ1-05652;
+       (==ucs@ks           . #x737B)   ; &g2-AJ1-05652;
+       (==adobe-japan1-0   . 05652)    ; &g2-AJ1-05652;
+       ))
+      (==daikanwa        . 08652)      ; &g2-M-08652;
       (==cbeta           . 05004)      ; &g2-M-08652;
       (->subsumptive
        ((===daikanwa       . 08652)    ; &R-M-08652;
@@ -17920,6 +17928,7 @@
       (=cns11643-1       . #x7978)     ; &C1-7978; [89-88]
       ))
     (=ucs@unicode      . #x5DDA)       ; &C4-6A46;
+    (=ucs@JP/hanazono  . nil)
     (=cns11643-4       . #x6A46)       ; &C4-6A46; [74-38]
     (->subsumptive
      ((ideographic-structure
@@ -17932,6 +17941,7 @@
        ((==ucs@unicode     . #x737B)   ; &g2-UU+737B;
        ))
       (==ucs@unicode     . #x5DDA)     ; &g2-UU+5DDA;
+      (==ucs@JP/hanazono  . nil)
       )
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")