From 4cf5e22eaa4acab03b07c7ffbb431f9347837fa8 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 7 Jun 2021 21:08:33 +0900
Subject: [PATCH] (SW-JIGUGE-08807): Add U-00029C4B as a corresponding modern
 character; add `<-simplified@shuowen' for SW-JIGUGE-08806.
 (SW-JIGUGE-08808): Add `<-formed@shuowen' for
 SW-JIGUGE-08806. (SW-JIGUGE-08809): Add
 `<-simplified@Small-Seal/shuowen' for SW-JIGUGE-08806.
 (SW-JIGUGE-08821): Add U+7151 as a corresponding modern
 character; add `<-formed@shuowen' for SW-JIGUGE-08820.
 (SW-JIGUGE-08822): Add `<-formed@shuowen' for
 SW-JIGUGE-08820.

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

diff --git a/lisp/utf-2000/ShuoWen-SR072.el b/lisp/utf-2000/ShuoWen-SR072.el
index 3ffbab4..7165ab2 100644
--- a/lisp/utf-2000/ShuoWen-SR072.el
+++ b/lisp/utf-2000/ShuoWen-SR072.el
@@ -101,8 +101,15 @@
   '((shuowen-radical	. 72)	; 䰜
     (=shuowen-jiguge	. 08807)	; &SW-JIGUGE-08807;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x29C4B)	; 𩱋
+      )
      ((=ucs		  . #x29C41)	; 𩱁
       ))
+    (<-simplified@shuowen
+     ((=shuowen-jiguge	  . 08806)	; &SW-JIGUGE-08806;
+      )
+     ((=ucs		  . #x29C67)	; 𩱧
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 08807)	; &SW-JIGUGE5-08807;
       )
@@ -115,6 +122,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x2244C)	; 𢑌
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 08806)	; &SW-JIGUGE-08806;
+      )
+     ((=ucs		  . #x29C67)	; 𩱧
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 08808)	; &SW-JIGUGE5-08808;
       )
@@ -129,6 +141,11 @@
       )
      ((=ucs		  . #x7FAE)	; ç¾®
       ))
+    (<-simplified@Small-Seal/shuowen
+     ((=shuowen-jiguge	  . 08806)	; &SW-JIGUGE-08806;
+      )
+     ((=ucs		  . #x29C67)	; 𩱧
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 08809)	; &SW-JIGUGE5-08809;
       )
@@ -271,8 +288,15 @@
   '((shuowen-radical	. 72)	; 䰜
     (=shuowen-jiguge	. 08821)	; &SW-JIGUGE-08821;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x7151)	; 煑
+      )
      ((=ucs		  . #x716E)	; 煮
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 08820)	; &SW-JIGUGE-08820;
+      )
+     ((=ucs		  . #x4C1E)	; 䰞
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 08821)	; &SW-JIGUGE5-08821;
       )
@@ -285,6 +309,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x29C70)	; 𩱰
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 08820)	; &SW-JIGUGE-08820;
+      )
+     ((=ucs		  . #x4C1E)	; 䰞
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 08822)	; &SW-JIGUGE5-08822;
       )
-- 
1.7.10.4