From 0d31a7029e528b2d69cfc6ed7290fd6beba063dd Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 22 Jun 2022 05:47:59 +0900
Subject: [PATCH] (SW-JIGUGE-44201): Add U-00024A1D as a corresponding modern
 character. (SW-JIGUGE-44202): Add U+3ECE as a corresponding
 modern character; add `<-ancient@shuowen' for
 SW-JIGUGE-44201.

---
 lisp/utf-2000/ShuoWen-SR455.el |   11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/lisp/utf-2000/ShuoWen-SR455.el b/lisp/utf-2000/ShuoWen-SR455.el
index 9ce76bb..1d71670 100644
--- a/lisp/utf-2000/ShuoWen-SR455.el
+++ b/lisp/utf-2000/ShuoWen-SR455.el
@@ -27,6 +27,8 @@
   '((shuowen-radical	. 455)	; 琴
     (=shuowen-jiguge	. 44201)	; &SW-JIGUGE-44201;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x24A1D)	; 𤨝
+      )
      ((=ucs		  . #x745F)	; 瑟
       ))
     (->subsumptive
@@ -40,6 +42,15 @@
     (=shuowen-jiguge	. 44202)	; &SW-JIGUGE-44202;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x2163C)	; 𡘼
+      )
+     ((=ucs		  . #x3ECE)	; 㻎
+      ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 44201)	; &SW-JIGUGE-44201;
+      )
+     ((=ucs		  . #x24A1D)	; 𤨝
+      )
+     ((=ucs		  . #x745F)	; 瑟
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 44202)	; &SW-JIGUGE5-44202;
-- 
1.7.10.4