From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 17 Jun 2022 16:23:01 +0000 (+0900)
Subject: (U+623A): Add `<-denotational@usage' for A2-DJT-03642; add `<-ancient'
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=032b2457b7b8f21884f77ded0a40f85fdf2e34b9;p=chise%2Fxemacs-chise.git

(U+623A): Add `<-denotational@usage' for A2-DJT-03642; add `<-ancient'
for U+5DF8.
(A2-DJT-03642): New abstract node.
---

diff --git a/lisp/utf-2000/Ideograph-R063-Door.el b/lisp/utf-2000/Ideograph-R063-Door.el
index 8987804..5ebbfac 100644
--- a/lisp/utf-2000/Ideograph-R063-Door.el
+++ b/lisp/utf-2000/Ideograph-R063-Door.el
@@ -527,7 +527,10 @@
     (=ucs@iso		. #x22A28)	; &U-00022A28;
     ))
 (define-char
-  '((ideographic-radical . 63)	; â¼¾
+  '((<-denotational@usage
+     ((==>daijiten	  . 03642)	; &A2-DJT-03642;
+      ))
+    (ideographic-radical . 63)	; â¼¾
     (ideographic-strokes . 3)
     (total-strokes	 . 7)
     (ideographic-structure
@@ -544,6 +547,11 @@
     (sound@ja/on/kan	"si" "i")
     (=ucs		. #x623A)	; 戺
     (=big5		. #xCAE6)	; &I-B-CAE6;
+    (<-ancient
+     ((=ucs		  . #x5DF8)	; å·¸
+      ))
+    (<-ancient*sources
+     shuowen)
     ))
 (define-char
   '((<-denotational
@@ -3662,3 +3670,7 @@
     (==>ucs@bucs	. #x6240)	; &BUCS+6240;
     (==>daijiten	. 03647)	; &BUCS+6240;
     ))
+(define-char
+  '((ideographic-radical . 63)	; â¼¾
+    (==>daijiten	. 03642)	; &A2-DJT-03642;
+    ))