Add some MJ code points.

[chise/xemacs-chise.git-] / lisp / utf-2000 / Ideograph-R032-Earth.el

diff --git a/lisp/utf-2000/Ideograph-R032-Earth.el b/lisp/utf-2000/Ideograph-R032-Earth.el
index caa38f6..85a64bd 100644 (file)
--- a/lisp/utf-2000/Ideograph-R032-Earth.el
+++ b/lisp/utf-2000/Ideograph-R032-Earth.el
@@ -1096,8 +1096,8 @@
       )
      ((=gt-k             . 00199)      ; &GT-K00199;
       )
-     ((=ucs@unicode      . #x5197)     ; &AJ1-02513;
-      (=adobe-japan1-0   . 02513)      ; &AJ1-02513;
+     ((=ucs@unicode      . #x5197)     ; &MJ007329;
+      (=mj               . 007329)     ; &MJ007329;
       ))
     (=ucs@unicode      . #x5748)       ; &CB04985;
     (=cbeta            . 04985)        ; &CB04985;
@@ -5705,8 +5705,10 @@
       )
      ((=ucs              . #x571F)     ; 土
       )
-     ((=>>ucs@jis        . #x864E)     ; &G-JU+864E;
-      (=>>ucs@cns        . #x864E)     ; &G-JU+864E;
+     ((=>>ucs@jis        . #x864E)     ; &G-J0-3857;
+      (=>>ucs@ks         . #x864E)     ; &G-J0-3857;
+      (=>>ucs@cns        . #x864E)     ; &G-J0-3857;
+      (=>>jis-x0208      . #x3857)     ; &G-J0-3857; [24-55]
       ))
     (=>>ucs@cns                . #x3648)       ; &G-CB00692;
     (=>>daikanwa       . 05163)        ; &G-CB00692;
@@ -11293,25 +11295,26 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
        (=ucs               . #x2FF1)   ; ⿱
        )
-       ((=ucs@jis          . #x516B)   ; &AJ1-03392;
-       (=adobe-japan1-0    . 03392)    ; &AJ1-03392;
+       ((=ucs              . #x516B)   ; 八
        )
        ((ideographic-structure
         ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
          (=ucs               . #x2FF1) ; ⿱
          )
-        ((=ks-x1001          . #x6951) ; &M-03115; [73-49]
-         (=daikanwa          . 03115)  ; &I-M-03115;
+        ((=ucs               . #x53C8) ; 又
          )
         ((=ucs               . #x76BF) ; 皿
          ))
        ))
       ))
-    (=cbeta            . 05673)        ; &CB05673;
+    (=>>cbeta          . 05673)        ; &G-CB05673;
     (<-unknown
      ((=ucs@jis                  . #x5867)     ; &AJ1-17452;
       (=adobe-japan1-5   . 17452)      ; &AJ1-17452;
       ))
+    (->subsumptive
+     ((=cbeta            . 05673)      ; &CB05673;
+      ))
     ))
 (define-char
   '((ideographic-radical . 32) ; ⼟