From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 18 Jan 2018 02:52:09 +0000 (+0900)
Subject: (U+65C1): Unify HD-KS153270.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f66e6b10ed706636a221c2a255dac70e61e987a3;p=chise%2Fxemacs-chise.git-

(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
--- 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