From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 2 Aug 2021 03:20:04 +0000 (+0900)
Subject: (SW-JIGUGE-22403): Add `<-ancient@shuowen' for SW-JIGUGE-22402.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ae4486ebb67011060ed38acaef55b82cd66d1ea6;p=chise%2Fxemacs-chise.git

(SW-JIGUGE-22403): Add `<-ancient@shuowen' for SW-JIGUGE-22402.
(SW-JIGUGE-22415): Add U+3B1C as a corresponding modern character.
(SW-JIGUGE-22502): Add U-00023166 as a corresponding modern character.
(SW-JIGUGE-22503): Add A-IWDSU+665A and U+665A as corresponding modern
characters.
---

diff --git a/lisp/utf-2000/ShuoWen-SR231.el b/lisp/utf-2000/ShuoWen-SR231.el
index ff69567..aace72a 100644
--- a/lisp/utf-2000/ShuoWen-SR231.el
+++ b/lisp/utf-2000/ShuoWen-SR231.el
@@ -53,6 +53,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x65F9)	; 旹
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 22402)	; &SW-JIGUGE-22402;
+      )
+     ((=ucs		  . #x6642)	; 時
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 22403)	; &SW-JIGUGE5-22403;
       )
@@ -199,6 +204,8 @@
   '((shuowen-radical	. 231)	; 日
     (=shuowen-jiguge	. 22415)	; &SW-JIGUGE-22415;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x3B1C)	; 㬜
+      )
      ((=ucs		  . #x6649)	; 晉
       )
      ((=ucs		  . #x664B)	; 晋
@@ -397,6 +404,8 @@
   '((shuowen-radical	. 231)	; 日
     (=shuowen-jiguge	. 22502)	; &SW-JIGUGE-22502;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x23166)	; 𣅦
+      )
      ((=ucs		  . #x6603)	; 昃
       ))
     (->subsumptive
@@ -409,6 +418,11 @@
   '((shuowen-radical	. 231)	; 日
     (=shuowen-jiguge	. 22503)	; &SW-JIGUGE-22503;
     (<-Small-Seal@shuowen
+     ((=>ucs@iwds-1	  . #x665A)	; &J97-4855;
+      (=>jis-x0208@1997	  . #x4855)	; &J97-4855; [40-53]
+      )
+     ((=ucs		  . #x665A)	; 晚
+      )
      ((=ucs		  . #x6669)	; 晩
       ))
     (->subsumptive