From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 20 Feb 2019 08:48:26 +0000 (+0900)
Subject: (UU+5321): Add `<-interchangeable@ancient' for UU+6047; add
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=73b75592cc7d78d46c5fd2ac93001165da6ea53d;p=chise%2Fxemacs-chise.git

(UU+5321): Add `<-interchangeable@ancient' for UU+6047; add
`<-original' for UU+7736.
(U+9FA8): New character.
---

diff --git a/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el b/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
index d5f5956..c3ef2c6 100644
--- a/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
+++ b/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
@@ -531,6 +531,18 @@
      shuowen-tongxun-dingsheng daikanwa)
     (<-interchangeable*sources
      daikanwa)
+    (<-interchangeable@ancient
+     ((=ucs@unicode	  . #x6047)	; &AJ1-16864;
+      (=adobe-japan1-5	  . 16864)	; &AJ1-16864;
+      ))
+    (<-original
+     ((=ucs@unicode	  . #x7736)	; &JX1-7871;
+      (=gb2312		  . #x3F74)	; &JX1-7871; [31-84]
+      (=jis-x0212	  . #x4E6C)	; &I-JSP-4E6C; [46-76]
+      (=cns11643-1	  . #x5C3A)	; &I-C1-5C3A; [60-26]
+      (=jis-x0213-1	  . #x7871)	; &I-JX1-7871; [88-81]
+      (=daikanwa	  . 23310)	; &I-M-23310;
+      ))
     (->formed
      ((=ucs@unicode	  . #x7B50)	; &AJ1-05969;
       (=adobe-japan1-0	  . 05969)	; &AJ1-05969;
@@ -1642,6 +1654,41 @@
     (=daikanwa		. 02635)	; &I-M-02635;
     ))
 (define-char
+  '((ideographic-radical . 22)	; ⼕
+    (ideographic-strokes . 8)
+    (total-strokes	 . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LEFT")
+      (=ucs		  . #x2FF7)	; â¿·
+      )
+     ((=>ucs@component	  . #x531A)	; &A-compU+531A;
+      (=>iwds-1		  .  0209)	; &A-compU+531A;
+      )
+     ((=ucs		  . #x96B9)	; 隹
+      ))
+    (=ucs		. #x9FA8)	; 龨
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x9FA8)	; 龨
+      ))
+    (ideographic-radical . 22)	; ⼕
+    (ideographic-strokes . 8)
+    (total-strokes	 . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LEFT")
+      (=ucs		  . #x2FF7)	; â¿·
+      )
+     ((=ucs		  . #x531A)	; 匚
+      )
+     ((=ucs		  . #x96B9)	; 隹
+      ))
+    (=ucs@JP/hanazono	. #x9FA8)	; &hanaJU+9FA8;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x9FA8)	; &g2-hanaJU+9FA8;
+      ))
+    ))
+(define-char
   '((=>ucs		. #x3531)	; 㔱
     (ideographic-radical . 22)	; ⼕
     (ideographic-strokes . 9)