(U-0002125A): Add `<-denotational@component' for A-compU+37B7.

[chise/xemacs-chise.git.1] / 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 ce2d43e..b0360c9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R032-Earth.el
+++ b/lisp/utf-2000/Ideograph-R032-Earth.el
@@ -100,12 +100,36 @@
     (ideographic-radical . 32) ; ⼟
     (ideographic-strokes . 1)
     (total-strokes      . 4)
+    (=>ucs@component   . #x2123C)      ; &A-compU+2123C;
+    ))
+(define-char
+  '((<-denotational@component
+     ((=>ucs@component   . #x2123C)    ; &A-compU+2123C;
+      ))
+    (ideographic-radical . 32) ; ⼟
+    (ideographic-strokes . 1)
+    (total-strokes      . 4)
     (sound@ja/on/go    "tyAu")
     (sound@ja/on/kan   "tei")
     (=ucs              . #x2123C)      ; 𡈼
     (=cns11643-4       . #x2148)       ; &I-C4-2148; [01-40]
     (=big5-cdp         . #x8BBC)       ; &I-CDP-8BBC;
     (=daikanwa         . 04869)        ; &I-M-04869;
+    (->subsumptive
+     ((==ucs@iso         . #x2123C)    ; &g2-CDP-8BBC;
+      (==cns11643-4      . #x2148)     ; &g2-CDP-8BBC; [01-40]
+      (==big5-cdp        . #x8BBC)     ; &g2-CDP-8BBC;
+      (==daikanwa        . 04869)      ; &g2-CDP-8BBC;
+      (->subsumptive
+       ((===daikanwa       . 04869)    ; &R-M-04869;
+       )
+       ((===big5-cdp       . #x8BBC)   ; &R-CDP-8BBC;
+       )
+       ((===cns11643-4     . #x2148)   ; &R-C4-2148; [01-40]
+       )
+       ((===ucs@iso        . #x2123C)  ; &R-U-0002123C;
+       ))
+      ))
     ))
 (define-char
   '((ideographic-radical . 32) ; ⼟
@@ -1186,6 +1210,40 @@
       )
      ((=ucs              . #x571F)     ; 土
       )
+     ((=ucs              . #x206A3)    ; 𠚣
+      ))
+    (=ucs              . #x2124D)      ; 𡉍
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x2124D)    ; 𡉍
+      ))
+    (ideographic-radical . 32) ; ⼟
+    (ideographic-strokes . 3)
+    (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x571F)     ; 土
+      )
+     ((=big5-cdp         . #x8DC9)     ; &CDP-8DC9;
+      ))
+    (=ucs@iso          . #x2124D)      ; &U-0002124D;
+    (->subsumptive
+     ((==ucs@iso         . #x2124D)    ; &g2-IU-0002124D;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 32) ; ⼟
+    (ideographic-strokes . 3)
+    (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x571F)     ; 土
+      )
      ((=ucs              . #x5DF2)     ; 已
       ))
     (=ucs              . #x2124F)      ; 𡉏
@@ -2197,7 +2255,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 32) ; ⼟
+  '((<-denotational@component
+     ((=>ucs@component   . #x37B7)     ; &A-compU+37B7;
+      ))
+    (ideographic-radical . 32) ; ⼟
     (ideographic-strokes . 4)
     (total-strokes      . 7)
     (ideographic-structure
@@ -2806,6 +2867,57 @@
        ((name              . "CJK RADICAL SECOND TWO")
        (=ucs               . #x2E83)   ; ⺃
        )
+       ((=>ucs@component    . #x4E03)  ; &A-compU+4E03;
+       (=>iwds-1           .  0141)    ; &A-compU+4E03;
+       ))
+      ))
+    (=>mj              . 057209)       ; &A-MJ057209;
+    ))
+(define-char
+  '((<-denotational
+     ((=>mj              . 057209)     ; &A-MJ057209;
+      ))
+    (ideographic-radical . 32) ; ⼟
+    (ideographic-strokes . 3)
+    (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x571F)     ; 土
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
+       (=ucs               . #x2FFA)   ; ⿺
+       )
+       ((name              . "CJK RADICAL SECOND TWO")
+       (=ucs               . #x2E83)   ; ⺃
+       )
+       ((=ucs              . #x4E03)   ; 七
+       ))
+      ))
+    (=ucs-itaiji-001   . #x21275)      ; &U-i001+21275;
+    ))
+(define-char
+  '((<-denotational
+     ((=>mj              . 057209)     ; &A-MJ057209;
+      ))
+    (ideographic-radical . 32) ; ⼟
+    (ideographic-strokes . 3)
+    (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x571F)     ; 土
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
+       (=ucs               . #x2FFA)   ; ⿺
+       )
+       ((name              . "CJK RADICAL SECOND TWO")
+       (=ucs               . #x2E83)   ; ⺃
+       )
        ((=ucs              . #x5315)   ; 匕
        ))
       ))
@@ -8383,9 +8495,31 @@
   '((ideographic-radical . 32) ; ⼟
     (ideographic-strokes . 7)
     (total-strokes      . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs              . #x2FF3)     ; ⿳
+      )
+     ((=ucs              . #x4E00)     ; 一
+      )
+     ((=ucs              . #x221B6)    ; 𢆶
+      )
+     ((=ucs              . #x571F)     ; 土
+      ))
     (=ucs              . #x21325)      ; 𡌥
     (=cns11643-5       . #x2C62)       ; &I-C5-2C62; [12-66]
     (=daikanwa         . 05137)        ; &I-M-05137;
+    (->subsumptive
+     ((==ucs@cns         . #x21325)    ; &g2-M-05137;
+      (==cns11643-5      . #x2C62)     ; &g2-M-05137; [12-66]
+      (==daikanwa        . 05137)      ; &g2-M-05137;
+      (->subsumptive
+       ((===daikanwa       . 05137)    ; &R-M-05137;
+       )
+       ((===cns11643-5     . #x2C62)   ; &R-C5-2C62; [12-66]
+       ))
+      )
+     ((==ucs@iso         . #x21325)    ; &g2-IU-00021325;
+      ))
     ))
 (define-char
   '((ideographic-radical . 32) ; ⼟