(U+65C1): Unify HD-KS153270.

(G-UU+65C1): New node; use `<-subsumptive' for U+65C1.
(g2-UU+65C1): Use G-UU+65C1 instead of U+65C1 as its mother.
(MJ057637): New character; use `<-subsumptive' for U+65C1; unify
G-HD-KS153270.
(g2-S-3247): Use MJ057637 instead of U+65C1 as its mother; unify
g2-MJ057637 and g2-HD-KS153270.

diff --git a/lisp/utf-2000/Ideograph-R070-Square.el b/lisp/utf-2000/Ideograph-R070-Square.el
index d3f0e46..a4e2ee9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R070-Square.el
+++ b/lisp/utf-2000/Ideograph-R070-Square.el
@@ -729,42 +729,65 @@
     (=cns11643-1       . #x5569)       ; &I-C1-5569; [53-73]
     (=jis-x0213-1      . #x5A55)       ; &I-JX1-5A55; [58-53]
     (=big5             . #xAEC7)       ; &I-B-AEC7;
+    (=hanyo-denshi/ks  . 153270)       ; 旁
     (=gt               . 17242)        ; &I-GT-17242;
     (=gt-k             . 06597)        ; &I-GT-K06597;
     (=gt-pj-1          . #x5A55)       ; &I-GT-17242; [58-53]
     (=daikanwa         . 13637)        ; &I-M-13637;
     (=shinjigen                .  3247)        ; 旁
     (->subsumptive
-     ((==ucs@unicode     . #x65C1)     ; &g2-AJ1-05082;
-      (==adobe-japan1-0          . 05082)      ; &g2-AJ1-05082;
-      (==gb2312                  . #x4554)     ; &g2-AJ1-05082; [37-52]
-      (==ks-x1001        . #x5B31)     ; &g2-AJ1-05082; [59-17]
-      (==jis-x0208       . #x5A55)     ; &g2-AJ1-05082; [58-53]
-      (==cns11643-1      . #x5569)     ; &g2-AJ1-05082; [53-73]
-      (==jis-x0213-1     . #x5A55)     ; &g2-AJ1-05082; [58-53]
-      (==gt              . 17242)      ; &g2-AJ1-05082;
-      (==gt-k            . 06597)      ; &g2-AJ1-05082;
-      (==daikanwa        . 13637)      ; &g2-AJ1-05082;
+     ((=>>ucs@unicode    . #x65C1)     ; &G-AJ1-05082;
+      (=>>adobe-japan1-0  . 05082)     ; &G-AJ1-05082;
+      (=>>jis-x0208      . #x5A55)     ; &G-AJ1-05082; [58-53]
+      (=>>cns11643-1     . #x5569)     ; &G-AJ1-05082; [53-73]
+      (=>>jis-x0213-1    . #x5A55)     ; &G-AJ1-05082; [58-53]
+      (=>>gt             . 17242)      ; &G-AJ1-05082;
+      (=>>gt-k           . 06597)      ; &G-AJ1-05082;
+      (=>>daikanwa       . 13637)      ; &G-AJ1-05082;
       (->subsumptive
-       ((===daikanwa       . 13637)    ; &R-M-13637;
-       )
-       ((===jis-x0208      . #x5A55)   ; &R-J0-5A55; [58-53]
-       (===jis-x0213-1     . #x5A55)   ; &R-J0-5A55; [58-53]
-       )
-       ((===adobe-japan1-0  . 05082)   ; &R-AJ1-05082;
-       )
-       ((===ucs@ks         . #x65C1)   ; &R-K0-5B31;
-       (===ks-x1001        . #x5B31)   ; &R-K0-5B31; [59-17]
-       )
-       ((===gt             . 17242)    ; &R-GT-17242;
-       (===gt-k            . 06597)    ; &R-GT-17242;
-       )
-       ((===ucs@unicode            . #x65C1)   ; &R-UU+65C1;
-       )
-       ((===cns11643-1     . #x5569)   ; &R-C1-5569; [53-73]
+       ((==ucs@unicode     . #x65C1)   ; &g2-AJ1-05082;
+       (==adobe-japan1-0   . 05082)    ; &g2-AJ1-05082;
+       (==gb2312           . #x4554)   ; &g2-AJ1-05082; [37-52]
+       (==ks-x1001         . #x5B31)   ; &g2-AJ1-05082; [59-17]
+       (==jis-x0208        . #x5A55)   ; &g2-AJ1-05082; [58-53]
+       (==cns11643-1       . #x5569)   ; &g2-AJ1-05082; [53-73]
+       (==jis-x0213-1      . #x5A55)   ; &g2-AJ1-05082; [58-53]
+       (==gt               . 17242)    ; &g2-AJ1-05082;
+       (==gt-k             . 06597)    ; &g2-AJ1-05082;
+       (==daikanwa         . 13637)    ; &g2-AJ1-05082;
+       (->subsumptive
+        ((===daikanwa        . 13637)  ; &R-M-13637;
+         )
+        ((===jis-x0208       . #x5A55) ; &R-J0-5A55; [58-53]
+         (===jis-x0213-1     . #x5A55) ; &R-J0-5A55; [58-53]
+         )
+        ((===adobe-japan1-0  . 05082)  ; &R-AJ1-05082;
+         )
+        ((===ucs@ks          . #x65C1) ; &R-K0-5B31;
+         (===ks-x1001        . #x5B31) ; &R-K0-5B31; [59-17]
+         )
+        ((===gt              . 17242)  ; &R-GT-17242;
+         (===gt-k            . 06597)  ; &R-GT-17242;
+         )
+        ((===ucs@unicode     . #x65C1) ; &R-UU+65C1;
+         )
+        ((===cns11643-1      . #x5569) ; &R-C1-5569; [53-73]
+         ))
        ))
       )
-     ((==shinjigen       .  3247)      ; &g2-SJG2-3247;
+     ((=mj               . 057637)     ; &MJ057637;
+      (=>>hanyo-denshi/ks . 153270)    ; &MJ057637;
+      (->subsumptive
+       ((==mj              . 057637)   ; &g2-MJ057637;
+       (==hanyo-denshi/ks  . 153270)   ; &g2-MJ057637;
+       (==shinjigen        .  3247)    ; &g2-MJ057637;
+       (->subsumptive
+        ((===hanyo-denshi/ks . 153270) ; &R-HD-KS-153270;
+         (=hanyo-denshi/ks/mf . #x3BDF)        ; &R-HD-KS-153270;
+         )
+        ((===mj              . 057637) ; &R-MJ057637;
+         ))
+       ))
       ))
     ))
 (define-char