From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 27 Mar 2023 01:26:29 +0000 (+0900)
Subject: (U+5070): Add `sound@ja/on/{kan|go}'.
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=10be20d7d5d9d4fd3507de4935e7e175fd0d4f71;p=chise%2Fxemacs-chise.git

(U+5070): Add `sound@ja/on/{kan|go}'.
(JU+5070): Add some relations for other characters.
---

diff --git a/lisp/utf-2000/Ideograph-R009-Man.el b/lisp/utf-2000/Ideograph-R009-Man.el
index 8af764a..d08a4ce 100644
--- a/lisp/utf-2000/Ideograph-R009-Man.el
+++ b/lisp/utf-2000/Ideograph-R009-Man.el
@@ -48752,6 +48752,8 @@
       )
      ((=ucs		  . #x5951)	; 契
       ))
+    (sound@ja/on/go	"seti")
+    (sound@ja/on/kan	"setu")
     (=ucs		. #x5070)	; 偰
     ))
 (define-char
@@ -48790,6 +48792,49 @@
     (=hanyo-denshi/jb	. #x3174)	; &I-HD-JB-3174; [17-84]
     (=daikanwa		. 00893)	; &I-M-00893;
     (=jef-china3	. #x42F5)	; &I-JC3-42F5;
+    (<-formed
+     ((=ucs@unicode	  . #x79BC)	; &MJ018987;
+      (=mj		  . 018987)	; &MJ018987;
+      ))
+    (->ancient
+     ((=ucs@unicode	  . #x79BC)	; &MJ018987;
+      (=mj		  . 018987)	; &MJ018987;
+      (=daikanwa	  . 24891)	; &I-M-24891;
+      )
+     ((=ucs@iso		  . #x2573F)	; &C6-4C40;
+      (=cns11643-6	  . #x4C40)	; &C6-4C40; [44-32]
+      (=daikanwa	  . 24890)	; &I-M-24890;
+      ))
+    (->ancient$_1*sources
+     shuowen-zhu daikanwa)
+    (->ancient$_2*sources
+     shuowen-zhu daikanwa)
+    (->ancient*sources
+     shuowen-zhu daikanwa)
+    (->formed
+     ((=mj		  . 009490)	; &MJ009490;
+      (=daikanwa	  . 05917)	; &I-M-05917;
+      ))
+    (->formed$_1*sources
+     shuowen-zhu jiyun daikanwa)
+    (->formed*sources
+     shuowen-zhu jiyun daikanwa)
+    (->interchangeable
+     ((=ucs@unicode	  . #x79BC)	; &MJ018987;
+      (=mj		  . 018987)	; &MJ018987;
+      )
+     ((=ucs@iso		  . #x2573F)	; &C6-4C40;
+      (=cns11643-6	  . #x4C40)	; &C6-4C40; [44-32]
+      (=daikanwa	  . 24890)	; &I-M-24890;
+      )
+     ((=mj		  . 009490)	; &MJ009490;
+      ))
+    (->interchangeable$_1*sources
+     jiyun)
+    (->interchangeable$_2*sources
+     jiyun)
+    (->interchangeable*sources
+     jiyun)
     (->subsumptive
      ((=decomposition@cid
        ((=ucs		    . #x5070)	; 偰