From f0084db745ad311f4afb10c20f24f663b7160cca Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 22 May 2022 18:54:28 +0900
Subject: [PATCH] (SW-JIGUGE-05506): Add U-000285B8 as a corresponding modern
 character; add `<-ancient@shuowen' for SW-JIGUGE-05505.
 (SW-JIGUGE-05514): Add U-00028581 and U-00028565 as
 corresponding modern characters. (SW-JIGUGE-05515): Add
 `<-ancient@shuowen' for SW-JIGUGE-05514.

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

diff --git a/lisp/utf-2000/ShuoWen-SR033.el b/lisp/utf-2000/ShuoWen-SR033.el
index bf9e059..39d9a5b 100644
--- a/lisp/utf-2000/ShuoWen-SR033.el
+++ b/lisp/utf-2000/ShuoWen-SR033.el
@@ -1659,6 +1659,13 @@
     (=shuowen-jiguge	. 05506)	; &SW-JIGUGE-05506;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x22571)	; 𢕱
+      )
+     ((=ucs		  . #x285B8)	; 𨖸
+      ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 05505)	; &SW-JIGUGE-05505;
+      )
+     ((=ucs		  . #x9060)	; 遠
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 05506)	; &SW-JIGUGE5-05506;
@@ -1754,6 +1761,10 @@
   '((shuowen-radical	. 33)	; è¾µ
     (=shuowen-jiguge	. 05514)	; &SW-JIGUGE-05514;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x28581)	; 𨖁
+      )
+     ((=ucs		  . #x28565)	; 𨕥
+      )
      ((=ucs		  . #x9053)	; 道
       ))
     (->subsumptive
@@ -1768,6 +1779,15 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x21B39)	; 𡬹
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 05514)	; &SW-JIGUGE-05514;
+      )
+     ((=ucs		  . #x28581)	; 𨖁
+      )
+     ((=ucs		  . #x28565)	; 𨕥
+      )
+     ((=ucs		  . #x9053)	; 道
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 05515)	; &SW-JIGUGE5-05515;
       )
-- 
1.7.10.4