From 37e96d5307adb58241cfb72669655293fb86e7a2 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 18 Dec 2022 14:46:37 +0900
Subject: [PATCH] (SW-JIGUGE-31106): Add U-00026C83 as a corresponding modern
 character. (SW-JIGUGE-31107): Add `<-formed@shuowen' for
 SW-JIGUGE-31106. (SW-JIGUGE-31108): Add `<-formed@shuowen'
 for SW-JIGUGE-31106. (SW-JIGUGE-31109): Add U-00026B96,
 U+7F90 and U+8A98 as corresponding modern characters; add
 `<-ancient@shuowen' for SW-JIGUGE-31106.

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

diff --git a/lisp/utf-2000/ShuoWen-SR348.el b/lisp/utf-2000/ShuoWen-SR348.el
index c6d45c5..34ae15a 100644
--- a/lisp/utf-2000/ShuoWen-SR348.el
+++ b/lisp/utf-2000/ShuoWen-SR348.el
@@ -31,6 +31,8 @@
   '((shuowen-radical	. 348)	; 厶
     (=shuowen-jiguge	. 31106)	; &SW-JIGUGE-31106;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x26C83)	; 𦲃
+      )
      ((=ucs		  . #x3557)	; 㕗
       ))
     (->subsumptive
@@ -47,6 +49,13 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x8A98)	; 誘
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 31106)	; &SW-JIGUGE-31106;
+      )
+     ((=ucs		  . #x26C83)	; 𦲃
+      )
+     ((=ucs		  . #x3557)	; 㕗
+      ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 32107)	; &SW-JIGUGE30-32107;
       )
@@ -61,6 +70,15 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x46FB)	; 䛻
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 31106)	; &SW-JIGUGE-31106;
+      )
+     ((=ucs		  . #x26C83)	; 𦲃
+      )
+     ((=ucs		  . #x3557)	; 㕗
+      )
+     ((=ucs		  . #x8A98)	; 誘
+      ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 32108)	; &SW-JIGUGE30-32108;
       )
@@ -74,6 +92,19 @@
     (=shuowen-jiguge	. 31109)	; &SW-JIGUGE-31109;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x7F91)	; 羑
+      )
+     ((=ucs		  . #x26B96)	; 𦮖
+      )
+     ((=ucs		  . #x7F90)	; 羐
+      )
+     ((=ucs		  . #x8A98)	; 誘
+      ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 31106)	; &SW-JIGUGE-31106;
+      )
+     ((=ucs		  . #x26C83)	; 𦲃
+      )
+     ((=ucs		  . #x3557)	; 㕗
       ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 32109)	; &SW-JIGUGE30-32109;
-- 
1.7.10.4