From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 29 Dec 2015 10:59:34 +0000 (+0900)
Subject: (MJ057348): Add `<-denotational' for BUCS+8FB1; add HNG-KHI0582-0.
X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git;a=commitdiff_plain;h=81cb5092e1c95f98f146e3c67c93e6a0d6c70703

(MJ057348): Add `<-denotational' for BUCS+8FB1; add HNG-KHI0582-0.
(UU+5C08): Add `<-formed' for U+5718; add `<-interchangeable' for
UU+5AE5, UU+8F49 and U+5718; add `->ancient' for U-000209E1; add
`->formed' for U+53C0.
---

diff --git a/lisp/utf-2000/Ideograph-R041-Inch.el b/lisp/utf-2000/Ideograph-R041-Inch.el
index 2d05fbd..b534af2 100644
--- a/lisp/utf-2000/Ideograph-R041-Inch.el
+++ b/lisp/utf-2000/Ideograph-R041-Inch.el
@@ -650,7 +650,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 41)	; ⼨
+  '((<-denotational
+     ((==>ucs@bucs	  . #x8FB1)	; &BUCS+8FB1;
+      ))
+    (ideographic-radical . 41)	; ⼨
     (ideographic-strokes . 7)
     (total-strokes	 . 10)
     (=mj		. 057348)	; &MJ057348;
@@ -678,6 +681,12 @@
        ((=ucs		    . #x5BF8)	; 寸
 	))
       (=ucs-itaiji-004	  . #x8FB1)	; &U-i004+8FB1;
+      (->subsumptive
+       ((===hng-khi	    . 05820)	; &HNG010-05820;
+	(<-formed
+	 ((=ucs		      . #x8FB1)	; è¾±
+	  ))
+	))
       ))
     ))
 (define-char
@@ -804,12 +813,52 @@
     (=gt-pj-1		. #x5573)	; &I-GT-09367; [53-83]
     (=daikanwa		. 07439)	; &I-M-07439;
     (=shinjigen		.  1885)	; &AJ1-04642;
+    (<-formed
+     ((=ucs		  . #x5718)	; 團
+      ))
+    (<-formed*sources
+     jiyun zhouli-zhu)
+    (<-interchangeable
+     ((=ucs@unicode	  . #x5AE5)	; &AJ1-17512;
+      (=adobe-japan1-5	  . 17512)	; &AJ1-17512;
+      (=daikanwa	  . 06662)	; &I-M-06662;
+      )
+     ((=ucs@unicode	  . #x8F49)	; &GT-51399;
+      (=jis-x0208	  . #x6D5B)	; &GT-51399; [77-59]
+      (=ks-x1001	  . #x6F2E)	; &I-K0-6F2E; [79-14]
+      (=cns11643-1	  . #x774B)	; &I-C1-774B; [87-43]
+      (=jis-x0213-1	  . #x6D5B)	; &I-JX1-6D5B; [77-59]
+      (=daikanwa	  . 38507)	; &I-M-38507;
+      )
+     ((=ucs		  . #x5718)	; 團
+      (=daikanwa	  . 04834)	; &I-M-04834;
+      ))
+    (<-interchangeable$_1*sources
+     shuowen-zhu daikanwa)
+    (<-interchangeable$_2*sources
+     shuowen-tongxun-dingsheng guangya daikanwa)
+    (<-interchangeable$_3*sources
+     shuowen-tongxun-dingsheng jiyun zhouli-zhu daikanwa)
+    (<-interchangeable*sources
+     daikanwa)
     (<-vulgar
      ((=mj		  . 010273)	; &MJ010273;
       (=shinjigen	  .  1884)	; &MJ010273;
       ))
     (<-vulgar*sources
      shinjigen)
+    (->ancient
+     ((=ucs		  . #x209E1)	; 𠧡
+      (=daikanwa	  . 02801)	; &I-M-02801;
+      ))
+    (->ancient*sources
+     pianhai daikanwa)
+    (->formed
+     ((=ucs		  . #x53C0)	; 叀
+      (=daikanwa	  . 03083)	; &I-M-03083;
+      ))
+    (->formed*sources
+     yupian daikanwa)
     ))
 (define-char
   '((<-denotational