(U+5E2C): Unify S1-7388 and S2-7387; add `<-formed' for U+88D9.

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R140-Grass.el

diff --git a/lisp/utf-2000/Ideograph-R140-Grass.el b/lisp/utf-2000/Ideograph-R140-Grass.el
index 6ab62b2..2b0e510 100644 (file)
--- a/lisp/utf-2000/Ideograph-R140-Grass.el
+++ b/lisp/utf-2000/Ideograph-R140-Grass.el
@@ -4891,6 +4891,15 @@
     (ideographic-radical . 140)        ; ⾋
     (ideographic-strokes . 5)
     (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((name              . "CJK RADICAL GRASS TWO")
+      (=ucs              . #x2EBF)     ; ⺿
+      )
+     ((=ucs              . #x53E5)     ; 句
+      ))
     (=cns11643-1       . #x5348)       ; &HD-KS-344660; [51-40]
     (=hanyo-denshi/ks  . 344660)       ; &HD-KS-344660;
     (=hanyo-denshi/ks/mf . #x86A2)     ; &I-KSMF-34466;
@@ -4906,6 +4915,15 @@
     (ideographic-radical . 140)        ; ⾋
     (ideographic-strokes . 5)
     (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((name              . "CJK RADICAL GRASS ONE")
+      (=ucs              . #x2EBE)     ; ⺾
+      )
+     ((=ucs              . #x53E5)     ; 句
+      ))
     (=ucs@unicode      . #x82DF)       ; &GT-39889;
     (=jis-x0208                . #x6771)       ; &GT-39889; [71-81]
     (=gb2312           . #x3936)       ; &I-G0-3936; [25-22]
@@ -4922,13 +4940,24 @@
     (ideographic-radical . 140)        ; ⾋
     (ideographic-strokes . 5)
     (total-strokes      . 8)
-    (=decomposition@hanyo-denshi
-     ((=ucs              . #x82DF)     ; 苟
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=ucs              . #xE0102)    ; 󠄂
+     ((=ucs              . #x4491)     ; 䒑
+      )
+     ((=ucs              . #x53E5)     ; 句
       ))
     (=hanyo-denshi/ks  . 344440)       ; &HD-KS-344440;
-    (=hanyo-denshi/ks/mf . #x868C)     ; &HD-KS-344440;
+    (->subsumptive
+     ((=decomposition@hanyo-denshi
+       ((=ucs              . #x82DF)   ; 苟
+       )
+       ((=ucs              . #xE0102)  ; 󠄂
+       ))
+      (==hanyo-denshi/ks  . 344440)    ; &g2-HD-KS-344440;
+      (=hanyo-denshi/ks/mf . #x868C)   ; &g2-HD-KS-344440;
+      ))
     ))
 (define-char
   '((=>ucs             . #x82E0)       ; 苠
@@ -10043,9 +10072,15 @@
      ((name              . "CJK COMPATIBILITY IDEOGRAPH-FA5E")
       (=ucs              . #xFA5E)     ; 艹
       )
-     ((=cns11643-1       . #x4779)     ; &C1-4779; [39-89]
+     ((=ucs@cns                  . #x5BFA)     ; &C1-4779;
+      (=cns11643-1       . #x4779)     ; &C1-4779; [39-89]
       ))
+    (=ucs@cns          . #x44C1)       ; &C3-3360;
     (=cns11643-3       . #x3360)       ; &C3-3360; [19-64]
+    (->subsumptive
+     ((==ucs@cns         . #x44C1)     ; &g2-CU+44C1;
+      (==cns11643-3      . #x3360)     ; &g2-CU+44C1; [19-64]
+      ))
     ))
 (define-char
   '((ideographic-radical . 140)        ; ⾋
@@ -44144,20 +44179,21 @@
 (define-char
   '((ideographic-radical . 140)        ; ⾋
     (ideographic-strokes . 14)
-    (=>ucs@hanyo-denshi . #x85CD)      ; &A-HDU+85CD;
+    (=ucs              . #x85CD)       ; 藍
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@hanyo-denshi . #x85CD)    ; &A-HDU+85CD;
+     ((=ucs              . #x85CD)     ; 藍
       ))
     (ideographic-radical . 140)        ; ⾋
     (ideographic-strokes . 14)
-    (=ucs              . #x85CD)       ; 藍
-    (=big5             . #xC2C5)       ; &I-B-C2C5;
+    (=>ucs@iwds-1      . #x85CD)       ; &A-IWDSU+85CD;
+    (=big5             . #xC2C5)       ; &A-IWDSU+85CD;
     ))
 (define-char
   '((<-denotational
-     ((=ucs              . #x85CD)     ; 藍
+     ((=>ucs@iwds-1      . #x85CD)     ; &A-IWDSU+85CD;
+      (=big5             . #xC2C5)     ; &A-IWDSU+85CD;
       ))
     (ideographic-radical . 140)        ; ⾋
     (ideographic-strokes . 14)
@@ -44239,7 +44275,8 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs              . #x85CD)     ; 藍
+     ((=>ucs@iwds-1      . #x85CD)     ; &A-IWDSU+85CD;
+      (=big5             . #xC2C5)     ; &A-IWDSU+85CD;
       ))
     (ideographic-radical . 140)        ; ⾋
     (ideographic-strokes . 14)
@@ -44255,7 +44292,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@hanyo-denshi . #x85CD)    ; &A-HDU+85CD;
+     ((=ucs              . #x85CD)     ; 藍
       ))
     (ideographic-radical . 140)        ; ⾋
     (ideographic-strokes . 14)