From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 8 Jul 2017 10:36:03 +0000 (+0900)
Subject: (U+5E03): Add `sound@ja/on/{kan|go}'; add `<-interchangeable' for
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=48d3c900ddefb1d2b3f808ef0275c5b344f6e013;p=chise%2Fxemacs-chise.git.1

(U+5E03): Add `sound@ja/on/{kan|go}'; add `<-interchangeable' for
UU+6577; add `->ancient' for U+3C5B.
(U-0002AA72): New character; unify BC-88E0.
(CU+5E17): Add representative nodes.
(UU+3840): Unify BC-8CAA.
---

diff --git a/lisp/utf-2000/Ideograph-R050-Turban.el b/lisp/utf-2000/Ideograph-R050-Turban.el
index 153dc6a..28dbdd5 100644
--- a/lisp/utf-2000/Ideograph-R050-Turban.el
+++ b/lisp/utf-2000/Ideograph-R050-Turban.el
@@ -271,6 +271,8 @@
       )
      ((=ucs		  . #x5DFE)	; å·¾
       ))
+    (sound@ja/on/go	"hu")
+    (sound@ja/on/kan	"ho")
     (=ucs		. #x5E03)	; 布
     (=adobe-japan1-0	. 03533)	; &I-AJ1-03533;
     (=jis-x0208		. #x495B)	; &I-J90-495B; [41-59]
@@ -284,6 +286,19 @@
     (=gt-pj-1		. #x495B)	; &I-GT-11071; [41-59]
     (=daikanwa		. 08778)	; &I-M-08778;
     (=shinjigen		.  2083)	; 布
+    (<-interchangeable
+     ((=ucs@unicode	  . #x6577)	; &MJ013021;
+      (=mj		  . 013021)	; &MJ013021;
+      (=daikanwa	  . 13359)	; &I-M-13359;
+      ))
+    (<-interchangeable*sources
+     shuowen-tongxun-dingsheng daikanwa)
+    (->ancient
+     ((=ucs		  . #x3C5B)	; 㱛
+      (=daikanwa	  . 16397)	; &I-M-16397;
+      ))
+    (->ancient*sources
+     xu-zihui-bu daikanwa)
     (->subsumptive
      ((==ucs@unicode	  . #x5E03)	; &g2-AJ1-03533;
       (==adobe-japan1-0	  . 03533)	; &g2-AJ1-03533;
@@ -363,6 +378,20 @@
     (=hanziku-2		. #xE848)	; &I-HZK02-E848;
     ))
 (define-char
+  '((ideographic-radical . 50)	; â¼±
+    (ideographic-strokes . 2)
+    (total-strokes	 . 5)
+    (=ucs		. #x2AA72)	; 𪩲
+    (=big5-cdp		. #x88E0)	; &I-CDP-88E0;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x2AA72)	; &g2-CDP-88E0;
+      (==big5-cdp	  . #x88E0)	; &g2-CDP-88E0;
+      (->subsumptive
+       ((===big5-cdp	    . #x88E0)	; &R-CDP-88E0;
+	))
+      ))
+    ))
+(define-char
   '((=>ucs		. #x3834)	; ã ´
     (ideographic-radical . 50)	; â¼±
     (ideographic-strokes . 3)
@@ -1623,6 +1652,16 @@
     (=cns11643-2	. #x264E)	; &C2-264E; [06-46]
     (=big5		. #xCC6D)	; &I-B-CC6D;
     (=daikanwa		. 08850)	; &I-M-08850;
+    (->subsumptive
+     ((==ucs@cns	  . #x5E17)	; &g2-M-08850;
+      (==cns11643-2	  . #x264E)	; &g2-M-08850; [06-46]
+      (==daikanwa	  . 08850)	; &g2-M-08850;
+      (->subsumptive
+       ((===daikanwa	    . 08850)	; &R-M-08850;
+	)
+       ((===cns11643-2	    . #x264E)	; &R-C2-264E; [06-46]
+	))
+      ))
     ))
 (define-char
   '((<-denotational
@@ -1637,7 +1676,8 @@
       )
      ((=ucs		  . #x5DFE)	; å·¾
       )
-     ((=ucs@unicode	  . #x72AE)	; &UU+72AE;
+     ((=ucs@unicode	  . #x72AE)	; &CDP-8A66;
+      (=big5-cdp	  . #x8A66)	; &CDP-8A66;
       ))
     (=ucs@unicode	. #x5E17)	; &EGB-7A6A;
     (=ucs@JP/hanazono	. nil)
@@ -1799,14 +1839,18 @@
     (=ucs@unicode	. #x3840)	; &C4-2425;
     (=ucs@JP/hanazono	. nil)
     (=cns11643-4	. #x2425)	; &C4-2425; [04-05]
+    (=big5-cdp		. #x8CAA)	; &I-CDP-8CAA;
     (->subsumptive
-     ((==ucs@unicode	  . #x3840)	; &g2-UU+3840;
+     ((==ucs@unicode	  . #x3840)	; &g2-CDP-8CAA;
       (==ucs@JP/hanazono  . nil)
-      (==cns11643-4	  . #x2425)	; &g2-UU+3840; [04-05]
+      (==cns11643-4	  . #x2425)	; &g2-CDP-8CAA; [04-05]
+      (==big5-cdp	  . #x8CAA)	; &g2-CDP-8CAA;
       (->subsumptive
        ((===cns11643-4	    . #x2425)	; &R-C4-2425; [04-05]
 	)
        ((===ucs@unicode	    . #x3840)	; &R-UU+3840;
+	)
+       ((===big5-cdp	    . #x8CAA)	; &R-CDP-8CAA;
 	))
       ))
     ))