From 55fe6dd1136352cde9fb41fba7a0d1d0c32d343c Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 3 Mar 2023 21:41:30 +0900
Subject: [PATCH] (U-00024C06): Add `<-ancient' for U-000200A6, U-00024C03 and
 U+7528.

---
 lisp/utf-2000/Ideograph-R101-Use.el |   13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/lisp/utf-2000/Ideograph-R101-Use.el b/lisp/utf-2000/Ideograph-R101-Use.el
index f762d20..727f571 100644
--- a/lisp/utf-2000/Ideograph-R101-Use.el
+++ b/lisp/utf-2000/Ideograph-R101-Use.el
@@ -542,6 +542,19 @@
 	))
       ))
     (=ucs		. #x24C06)	; 𤰆
+    (<-ancient
+     ((=ucs		  . #x200A6)	; 𠂦
+      )
+     ((=ucs		  . #x24C03)	; 𤰃
+      )
+     ((=ucs		  . #x7528)	; 用
+      ))
+    (<-ancient$_1*sources
+     shuowen)
+    (<-ancient$_2*sources
+     shuowen)
+    (<-ancient$_3*sources
+     shuowen)
     ))
 (define-char
   '((<-denotational
-- 
1.7.10.4