(SW-JIGUGE-24803): Add U+5BE2 and U+5BDD as corresponding modern

characters.
(SW-JIGUGE-24804): Add U-00020597 as a corresponding modern character;
add `<-Zhouwen@shuowen' for SW-JIGUGE-24803.
(SW-JIGUGE-24820): Add `<-formed@shuowen' for SW-JIGUGE-24819.

diff --git a/lisp/utf-2000/ShuoWen-SR269.el b/lisp/utf-2000/ShuoWen-SR269.el
index 0e87013..f6e6fb0 100644 (file)
--- a/lisp/utf-2000/ShuoWen-SR269.el
+++ b/lisp/utf-2000/ShuoWen-SR269.el
@@ -728,6 +728,10 @@
     (=shuowen-jiguge   . 24803)        ; &SW-JIGUGE-24803;
     (<-Small-Seal@shuowen
      ((=ucs              . #x5BD1)     ; 寑
+      )
+     ((=ucs              . #x5BE2)     ; 寢
+      )
+     ((=ucs              . #x5BDD)     ; 寝
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 24803)     ; &SW-JIGUGE5-24803;
@@ -739,8 +743,19 @@
   '((shuowen-radical   . 269)  ; 宀
     (=shuowen-jiguge   . 24804)        ; &SW-JIGUGE-24804;
     (<-Small-Seal@shuowen
+     ((=ucs              . #x20597)    ; 𠖗
+      )
      ((=ucs              . #x21A60)    ; 𡩠
       ))
+    (<-Zhouwen@shuowen
+     ((=shuowen-jiguge   . 24803)      ; &SW-JIGUGE-24803;
+      )
+     ((=ucs              . #x5BD1)     ; 寑
+      )
+     ((=ucs              . #x5BE2)     ; 寢
+      )
+     ((=ucs              . #x5BDD)     ; 寝
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 24804)     ; &SW-JIGUGE5-24804;
       )
@@ -937,6 +952,11 @@
     (<-Small-Seal@shuowen
      ((=ucs              . #x25A41)    ; 𥩁
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge   . 24819)      ; &SW-JIGUGE-24819;
+      )
+     ((=ucs              . #x21AEC)    ; 𡫬
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 24820)     ; &SW-JIGUGE5-24820;
       )