From 032b2457b7b8f21884f77ded0a40f85fdf2e34b9 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 18 Jun 2022 01:23:01 +0900
Subject: [PATCH] (U+623A): Add `<-denotational@usage' for A2-DJT-03642; add
 `<-ancient' for U+5DF8. (A2-DJT-03642): New abstract node.

---
 lisp/utf-2000/Ideograph-R063-Door.el |   14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

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;
+    ))
-- 
1.7.10.4