From 5510b0ecdc2f67b8031209ce1e52d7a806e7dd0d Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 30 Aug 2021 15:52:36 +0900
Subject: [PATCH] (SW-JIGUGE-29004): Add U-00022359 and U-00022358 as
 corresponding modern characters; add `<-Zhouwen@shuowen'
 for SW-JIGUGE-29003. (SW-JIGUGE-29005): Add U+5F01 as a
 corresponding modern character; add `<-formed@shuowen' for
 SW-JIGUGE-29003.

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

diff --git a/lisp/utf-2000/ShuoWen-SR314.el b/lisp/utf-2000/ShuoWen-SR314.el
index 3529f5c..8cc0b50 100644
--- a/lisp/utf-2000/ShuoWen-SR314.el
+++ b/lisp/utf-2000/ShuoWen-SR314.el
@@ -51,9 +51,20 @@
   '((shuowen-radical	. 314)	; 皃
     (=shuowen-jiguge	. 29004)	; &SW-JIGUGE-29004;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x22359)	; 𢍙
+      )
      ((=ucs		  . #x20B5B)	; 𠭛
       )
      ((=ucs		  . #x2234D)	; 𢍍
+      )
+     ((=ucs		  . #x22358)	; 𢍘
+      ))
+    (<-Zhouwen@shuowen
+     ((=shuowen-jiguge	  . 29003)	; &SW-JIGUGE-29003;
+      )
+     ((=ucs		  . #x3778)	; 㝸
+      )
+     ((=ucs		  . #x5F01)	; 弁
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 29004)	; &SW-JIGUGE5-29004;
@@ -66,6 +77,13 @@
     (=shuowen-jiguge	. 29005)	; &SW-JIGUGE-29005;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x2232E)	; 𢌮
+      )
+     ((=ucs		  . #x5F01)	; 弁
+      ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 29003)	; &SW-JIGUGE-29003;
+      )
+     ((=ucs		  . #x3778)	; 㝸
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 29005)	; &SW-JIGUGE5-29005;
-- 
1.7.10.4