(A-SW-JIGUGE-00300): Add U-00021B55 as a corresponding modern

character.
(SW-JIGUGE-00300): Ditto; add `<-ancient@shuowen' for SW-JIGUGE-00215.
(CHISE-HDIC-KTB-SEAL-0301): Add U-00021B55 as a target of
`<-Small-Seal@tenrei-bansho-meigi/chise'.

diff --git a/lisp/utf-2000/ShuoWen-SR003.el b/lisp/utf-2000/ShuoWen-SR003.el
index 37a26a2..e8d2c0e 100644 (file)
--- a/lisp/utf-2000/ShuoWen-SR003.el
+++ b/lisp/utf-2000/ShuoWen-SR003.el
@@ -26,6 +26,8 @@
     (=>shuowen-jiguge  . 00300)        ; &A-SW-JIGUGE-00300;
     (<-Small-Seal
      ((=ucs              . #x25605)    ; 𥘅
+      )
+     ((=ucs              . #x21B55)    ; 𡭕
       ))
     ))
 (define-char
@@ -38,6 +40,13 @@
      ((=>gt-k            . 00633)      ; &A-GT-K00633;
       )
      ((=ucs              . #x25605)    ; 𥘅
+      )
+     ((=ucs              . #x21B55)    ; 𡭕
+      ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge   . 00215)      ; &SW-JIGUGE-00215;
+      )
+     ((=ucs              . #x793A)     ; 示
       ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 00300)  ; &SW-JIGUGE30-00300;
@@ -56,6 +65,8 @@
     (===chise-hdic-ktb-seal . #x0301)  ; &R-CHISE-HDIC-KTBS0301;
     (<-Small-Seal@tenrei-bansho-meigi/chise
      ((=ucs              . #x25605)    ; 𥘅
+      )
+     ((=ucs              . #x21B55)    ; 𡭕
       ))
     ))
 (define-char