From 3733239ab84957f74b2c9bf053dce75ff75e9abd Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 9 Dec 2021 08:26:13 +0900
Subject: [PATCH] (SW-JIGUGE-32409): Add U-00027C48 as a corresponding modern
 character; add `<-Zhouwen@shuowen' for SW-JIGUGE-32408.
 (SW-JIGUGE-32410): Add `<-Small-Seal@shuowen' for
 U-0002F896 and U+38C7-itaiji-006; add `<-ancient@shuowen'
 for SW-JIGUGE-32408. (SW-JIGUGE-32417): Add
 `<-ancient@shuowen' for SW-JIGUGE-32416.

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

diff --git a/lisp/utf-2000/ShuoWen-SR363.el b/lisp/utf-2000/ShuoWen-SR363.el
index 0c5cafe..b14e9da 100644
--- a/lisp/utf-2000/ShuoWen-SR363.el
+++ b/lisp/utf-2000/ShuoWen-SR363.el
@@ -16,6 +16,13 @@
     (=shuowen-jiguge	. 32409)	; &SW-JIGUGE-32409;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x2245E)	; 𢑞
+      )
+     ((=ucs		  . #x27C48)	; 𧱈
+      ))
+    (<-Zhouwen@shuowen
+     ((=shuowen-jiguge	  . 32408)	; &SW-JIGUGE-32408;
+      )
+     ((=ucs		  . #x38C7)	; 㣇
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 32409)	; &SW-JIGUGE5-32409;
@@ -27,6 +34,13 @@
   '((shuowen-radical	. 363)	; 㣇
     (=shuowen-jiguge	. 32410)	; &SW-JIGUGE-32410;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x2F896)	; 㣇
+      )
+     ((=ucs-itaiji-006	  . #x38C7)	; &U-i006+38C7;
+      ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 32408)	; &SW-JIGUGE-32408;
+      )
      ((=ucs		  . #x38C7)	; 㣇
       ))
     (->subsumptive
@@ -113,6 +127,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x20B7E)	; ð ­¾
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 32416)	; &SW-JIGUGE-32416;
+      )
+     ((=ucs		  . #x38C8)	; 㣈
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 32417)	; &SW-JIGUGE5-32417;
       )
-- 
1.7.10.4