From 307d1669d070576d1d450d546f7b0cc242ab56b1 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 2 Jun 2022 04:43:19 +0900
Subject: [PATCH] (SW-JIGUGE-34820): Add U-000243EF as a corresponding modern
 character. (SW-JIGUGE-34821): Add `<-formed@shuowen' for
 SW-JIGUGE-34820. (SW-JIGUGE-34822): Add U-0002059C as a
 corresponding modern character; add `<-ancient@shuowen' for
 SW-JIGUGE-34820. (SW-JIGUGE-34823): Add `<-Zhouwen@shuowen'
 for SW-JIGUGE-34820. (SW-JIGUGE-34931): Add U-00024307,
 U+7155, U+7188 and U-000242EE as corresponding modern
 characters.

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

diff --git a/lisp/utf-2000/ShuoWen-SR382.el b/lisp/utf-2000/ShuoWen-SR382.el
index b582bc6..79c9233 100644
--- a/lisp/utf-2000/ShuoWen-SR382.el
+++ b/lisp/utf-2000/ShuoWen-SR382.el
@@ -991,6 +991,8 @@
   '((shuowen-radical	. 382)	; 火
     (=shuowen-jiguge	. 34820)	; &SW-JIGUGE-34820;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x243EF)	; 𤏯
+      )
      ((=ucs		  . #x7159)	; 煙
       ))
     (->subsumptive
@@ -1005,6 +1007,13 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x70DF)	; 烟
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 34820)	; &SW-JIGUGE-34820;
+      )
+     ((=ucs		  . #x243EF)	; 𤏯
+      )
+     ((=ucs		  . #x7159)	; 煙
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 34821)	; &SW-JIGUGE5-34821;
       )
@@ -1015,8 +1024,17 @@
   '((shuowen-radical	. 382)	; 火
     (=shuowen-jiguge	. 34822)	; &SW-JIGUGE-34822;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x2059C)	; 𠖜
+      )
      ((=ucs		  . #x21A3E)	; 𡨾
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 34820)	; &SW-JIGUGE-34820;
+      )
+     ((=ucs		  . #x243EF)	; 𤏯
+      )
+     ((=ucs		  . #x7159)	; 煙
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 34822)	; &SW-JIGUGE5-34822;
       )
@@ -1029,6 +1047,13 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x2439F)	; 𤎟
       ))
+    (<-Zhouwen@shuowen
+     ((=shuowen-jiguge	  . 34820)	; &SW-JIGUGE-34820;
+      )
+     ((=ucs		  . #x243EF)	; 𤏯
+      )
+     ((=ucs		  . #x7159)	; 煙
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 34823)	; &SW-JIGUGE5-34823;
       )
@@ -1524,7 +1549,15 @@
   '((shuowen-radical	. 382)	; 火
     (=shuowen-jiguge	. 34931)	; &SW-JIGUGE-34931;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x24307)	; 𤌇
+      )
      ((=ucs		  . #x7199)	; 熙
+      )
+     ((=ucs		  . #x7155)	; 煕
+      )
+     ((=ucs		  . #x7188)	; 熈
+      )
+     ((=ucs		  . #x242EE)	; 𤋮
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 34931)	; &SW-JIGUGE5-34931;
-- 
1.7.10.4