From ea0d0517940d74c7dcd1774b0251792740788c95 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 21 Aug 2022 02:55:53 +0900
Subject: [PATCH] (SW-JIGUGE-09609): Add U-00021C3B as a corresponding modern
 character. (SW-JIGUGE-09610): Add U-00024FE4 as a
 corresponding modern character; add `<-ancient@shuowen' for
 SW-JIGUGE-09609. (SW-JIGUGE-09611): Add U-00024FCC as a
 corresponding modern character; add `<-Zhouwen@shuowen' for
 SW-JIGUGE-09609.

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

diff --git a/lisp/utf-2000/ShuoWen-SR090.el b/lisp/utf-2000/ShuoWen-SR090.el
index a989d48..97147ab 100644
--- a/lisp/utf-2000/ShuoWen-SR090.el
+++ b/lisp/utf-2000/ShuoWen-SR090.el
@@ -3,6 +3,8 @@
   '((shuowen-radical	. 90)	; 皮
     (=shuowen-jiguge	. 09609)	; &SW-JIGUGE-09609;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x21C3B)	; ð¡°»
+      )
      ((=ucs		  . #x76AE)	; 皮
       ))
     (->subsumptive
@@ -16,6 +18,15 @@
     (=shuowen-jiguge	. 09610)	; &SW-JIGUGE-09610;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x25B16)	; 𥬖
+      )
+     ((=ucs		  . #x24FE4)	; 𤿤
+      ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 09609)	; &SW-JIGUGE-09609;
+      )
+     ((=ucs		  . #x21C3B)	; ð¡°»
+      )
+     ((=ucs		  . #x76AE)	; 皮
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 09610)	; &SW-JIGUGE5-09610;
@@ -28,6 +39,15 @@
     (=shuowen-jiguge	. 09611)	; &SW-JIGUGE-09611;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x20C0E)	; 𠰎
+      )
+     ((=ucs		  . #x24FCC)	; 𤿌
+      ))
+    (<-Zhouwen@shuowen
+     ((=shuowen-jiguge	  . 09609)	; &SW-JIGUGE-09609;
+      )
+     ((=ucs		  . #x21C3B)	; ð¡°»
+      )
+     ((=ucs		  . #x76AE)	; 皮
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 09611)	; &SW-JIGUGE5-09611;
-- 
1.7.10.4