From 33bf316a4dd70a5ea9ecdad679033176d1b21128 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 24 Jun 2021 12:00:18 +0900
Subject: [PATCH] (SW-JIGUGE-16107): Add `<-ancient@shuowen' for
 SW-JIGUGE-16106. (SW-JIGUGE-16110): Add `<-formed@shuowen'
 for SW-JIGUGE-16109. (SW-JIGUGE-16111): Add U+8661 as a
 corresponding modern character; add
 `<-simplified@Small-Seal/shuowen' for SW-JIGUGE-16109.

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

diff --git a/lisp/utf-2000/ShuoWen-SR167.el b/lisp/utf-2000/ShuoWen-SR167.el
index 3d97b02..052fe9b 100644
--- a/lisp/utf-2000/ShuoWen-SR167.el
+++ b/lisp/utf-2000/ShuoWen-SR167.el
@@ -89,6 +89,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x271B1)	; 𧆱
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 16106)	; &SW-JIGUGE-16106;
+      )
+     ((=ucs		  . #x8650)	; 虐
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 16107)	; &SW-JIGUGE5-16107;
       )
@@ -125,6 +130,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x943B)	; 鐻
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 16109)	; &SW-JIGUGE-16109;
+      )
+     ((=ucs		  . #x271FD)	; 𧇽
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 16110)	; &SW-JIGUGE5-16110;
       )
@@ -136,6 +146,13 @@
     (=shuowen-jiguge	. 16111)	; &SW-JIGUGE-16111;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x271BE)	; 𧆾
+      )
+     ((=ucs		  . #x8661)	; 虡
+      ))
+    (<-simplified@Small-Seal/shuowen
+     ((=shuowen-jiguge	  . 16109)	; &SW-JIGUGE-16109;
+      )
+     ((=ucs		  . #x271FD)	; 𧇽
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 16111)	; &SW-JIGUGE5-16111;
-- 
1.7.10.4