From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 15 Dec 2022 08:01:14 +0000 (+0900)
Subject: (SW-JIGUGE-43118): Add `<-Small-Seal@shuowen' for U-000216AE and
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8fdb552bcd0f8065bc981513447b0b2ee37932a9;p=chise%2Fxemacs-chise.git

(SW-JIGUGE-43118): Add `<-Small-Seal@shuowen' for U-000216AE and
U-000216B0.
(SW-JIGUGE5-43118): Omit `<-Small-Seal@shuowen'.
(SW-JIGUGE4-41818): Omit `<-Small-Seal@shuowen'.
(SW-JIGUGE-43507): Add `<-Small-Seal@shuowen' for U+36CA and U+36C6.
(SW-JIGUGE5-43507): Omit `<-Small-Seal@shuowen'.
(SW-JIGUGE4-42207): Omit `<-Small-Seal@shuowen'.
---

diff --git a/lisp/utf-2000/ShuoWen-SR443.el b/lisp/utf-2000/ShuoWen-SR443.el
index b20d8de..f82213c 100644
--- a/lisp/utf-2000/ShuoWen-SR443.el
+++ b/lisp/utf-2000/ShuoWen-SR443.el
@@ -1137,32 +1137,17 @@
 (define-char
   '((shuowen-radical	. 443)	; 女
     (=shuowen-jiguge	. 43118)	; &SW-JIGUGE-43118;
+    (<-Small-Seal@shuowen
+     ((=ucs		  . #x216AE)	; 𡚮
+      )
+     ((=ucs		  . #x216B0)	; 𡚰
+      ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 43518)	; &SW-JIGUGE30-43518;
       )
      ((===shuowen-jiguge5 . 43118)	; &SW-JIGUGE5-43118;
-      (<-Small-Seal@shuowen
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	  (=ucs		      . #x2FF0)	; â¿°
-	  )
-	 ((=ucs		      . #x4E45)	; 久
-	  )
-	 ((=ucs		      . #x5973)	; 女
-	  ))
-	))
       )
      ((===shuowen-jiguge4 . 41818)	; &SW-JIGUGE4-41818;
-      (<-Small-Seal@shuowen
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	  (=ucs		      . #x2FF0)	; â¿°
-	  )
-	 ((=ucs		      . #x4E45)	; 久
-	  )
-	 ((=ucs		      . #x5973)	; 女
-	  ))
-	))
       ))
     ))
 (define-char
@@ -2656,32 +2641,17 @@
 (define-char
   '((shuowen-radical	. 443)	; 女
     (=shuowen-jiguge	. 43507)	; &SW-JIGUGE-43507;
+    (<-Small-Seal@shuowen
+     ((=ucs		  . #x36CA)	; 㛊
+      )
+     ((=ucs		  . #x36C6)	; 㛆
+      ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 43907)	; &SW-JIGUGE30-43907;
       )
      ((===shuowen-jiguge5 . 43507)	; &SW-JIGUGE5-43507;
-      (<-Small-Seal@shuowen
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	  (=ucs		      . #x2FF0)	; â¿°
-	  )
-	 ((=ucs		      . #x5973)	; 女
-	  )
-	 ((=ucs		      . #x6736)	; 朶
-	  ))
-	))
       )
      ((===shuowen-jiguge4 . 42207)	; &SW-JIGUGE4-42207;
-      (<-Small-Seal@shuowen
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	  (=ucs		      . #x2FF0)	; â¿°
-	  )
-	 ((=ucs		      . #x5973)	; 女
-	  )
-	 ((=ucs		      . #x6736)	; 朶
-	  ))
-	))
       ))
     ))
 (define-char