(U+75EE): Unify S-6516; add `<-formed' for U+8139.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R104-Sickness.el

diff --git a/lisp/utf-2000/Ideograph-R104-Sickness.el b/lisp/utf-2000/Ideograph-R104-Sickness.el
index f57de21..26c564e 100644 (file)
--- a/lisp/utf-2000/Ideograph-R104-Sickness.el
+++ b/lisp/utf-2000/Ideograph-R104-Sickness.el
@@ -4080,12 +4080,21 @@
     (=cns11643-3       . #x427C)       ; &I-C3-427C; [34-92]
     (=jis-x0213-2      . #x7155)       ; &I-JX2-7155; [81-53]
     (=daikanwa         . 22248)        ; &I-M-22248;
+    (=shinjigen                .  6516)        ; 痮
+    (<-formed
+     ((=ucs              . #x8139)     ; 脹
+      (=jis-x0208        . #x4431)     ; &I-J90-4431; [36-17]
+      (=shinjigen        .  6515)      ; 脹
+      ))
+    (<-formed*sources
+     shinjigen)
     (->subsumptive
      ((==ucs@unicode     . #x75EE)     ; &g2-JSP-4D5F;
       (==jis-x0212       . #x4D5F)     ; &g2-JSP-4D5F; [45-63]
       (==cns11643-3      . #x427C)     ; &g2-JSP-4D5F; [34-92]
       (==jis-x0213-2     . #x7155)     ; &g2-JSP-4D5F; [81-53]
       (==daikanwa        . 22248)      ; &g2-JSP-4D5F;
+      (==shinjigen       .  6516)      ; &g2-JSP-4D5F;
       (->subsumptive
        ((===daikanwa       . 22248)    ; &R-M-22248;
        )
@@ -8365,10 +8374,8 @@
       )
      ((=ucs              . #x7592)     ; 疒
       )
-     ((=ucs@unicode      . #x8345)     ; &GT-40184;
-      (=jis-x0208        . #x6829)     ; &GT-40184; [72-09]
-      (=iso-ir165        . #x7E3E)     ; &I-EGB-7E3E; [94-30]
-      (=jis-x0213-1      . #x6829)     ; &I-JX1-6829; [72-09]
+     ((=ucs@unicode      . #x8345)     ; &AJ1-06354;
+      (=adobe-japan1-0   . 06354)      ; &AJ1-06354;
       ))
     (=ucs@unicode      . #x7629)       ; &JSP-4D78;
     (=gb2312           . #x3471)       ; &JSP-4D78; [20-81]