From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 19 Jul 2024 07:25:35 +0000 (+0900)
Subject: Use `shuowen-tongxundingsheng' instead of `shuowen-tongxun-dingsheng'
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=8c4c13f31ec6f9e58daf07e3b47779dea921cae2;p=chise%2Fxemacs-chise.git

Use `shuowen-tongxundingsheng' instead of `shuowen-tongxun-dingsheng'
as a source ID.
(U+5EF7): Add `<-denotational@usage' for BUCS+5EF7.
(uu+5EF7): Unify DJT-03004.
(BUCS+5EF7): New abstract node; unify A2-DJT-03004.
---

diff --git a/lisp/utf-2000/Ideograph-R054-Long-Stride.el b/lisp/utf-2000/Ideograph-R054-Long-Stride.el
index 5c311f7..0a14f04 100644
--- a/lisp/utf-2000/Ideograph-R054-Long-Stride.el
+++ b/lisp/utf-2000/Ideograph-R054-Long-Stride.el
@@ -420,7 +420,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 54)	; â¼µ
+  '((<-denotational@usage
+     ((==>ucs@bucs	  . #x5EF7)	; &BUCS+5EF7;
+      ))
+    (ideographic-radical . 54)	; â¼µ
     (ideographic-strokes . 4)
     (total-strokes	 . 7)
     (ideographic-structure
@@ -459,6 +462,7 @@
     (=cns11643-1	. #x4A2C)	; &I-C1-4A2C; [42-12]
     (=hanyo-denshi/ks	. 108170)	; &MJ011103;
     (=daikanwa		. 09571)	; &I-M-09571;
+    (=daijiten		. 03004)	; &I-DJT-03004;
     (<-interchangeable
      ((=ucs@unicode	  . #x5EAD)	; &GT-11748;
       (=gb2312		  . #x4D25)	; &GT-11748; [45-05]
@@ -466,9 +470,17 @@
       (=daikanwa	  . 09337)	; &I-M-09337;
       ))
     (<-interchangeable$_1*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
+    (<-interchangeable*sources
+     shuowen-tongxundingsheng daikanwa)
     (->subsumptive
      ((==daikanwa	  . 09571)	; &g2-M-09571;
+      (==daijiten	  . 03004)	; &g2-M-09571;
+      (->subsumptive
+       ((===daikanwa	    . 09571)	; &R-M-09571;
+	)
+       ((===daijiten	    . 03004)	; &R-DJT-03004;
+	))
       )
      ((===hng-kar	  . 01130)	; &HNG018-01130;
       )
@@ -880,11 +892,11 @@
       (=daikanwa	  . 15136)	; &I-M-15136;
       ))
     (<-interchangeable$_1*sources
-     shuowen-tongxun-dingsheng liji-zhu daikanwa)
+     shuowen-tongxundingsheng liji-zhu daikanwa)
     (<-interchangeable$_2*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-interchangeable*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-wrong
      ((=ucs		  . #x6377)	; 捷
       (=daikanwa	  . 12216)	; &I-M-12216;
@@ -894,11 +906,11 @@
       (=daikanwa	  . 38931)	; &I-M-38931;
       ))
     (<-wrong$_1*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-wrong$_2*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-wrong*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (->formed
      ((=ucs@unicode	  . #x3A34)	; &C3-467C;
       (=cns11643-3	  . #x467C)	; &C3-467C; [38-92]
@@ -976,6 +988,7 @@
      ((=ucs		  . #x5EF4)	; å»´
       )
      ((=>ucs@iwds-1	  . #x56DE)	; &A-IWDSU+56DE;
+      (=>iwds-1		  .  0317)	; &A-IWDSU+56DE;
       ))
     (=>ucs@iwds-1	. #x5EFB)	; &A-IWDSU+5EFB;
     ))
@@ -1341,6 +1354,11 @@
     ))
 (define-char
   '((ideographic-radical . 54)	; â¼µ
+    (==>ucs@bucs	. #x5EF7)	; &BUCS+5EF7;
+    (==>daijiten	. 03004)	; &BUCS+5EF7;
+    ))
+(define-char
+  '((ideographic-radical . 54)	; â¼µ
     (==>ucs@bucs	. #x5EFA)	; &BUCS+5EFA;
     (==>daijiten	. 03006)	; &BUCS+5EFA;
     ))