X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FShuoWen-SR443.el;h=5afc067b5f0baba7bc9e951d9621dff8ed1494e6;hb=e7ddc5e3051207b5315023c2182c680158fbebb0;hp=ae8a16706320a1849658aca2b06ba3863380406f;hpb=6e8ff8fb936a8494645a203999a72174b70b093d;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/ShuoWen-SR443.el b/lisp/utf-2000/ShuoWen-SR443.el
index ae8a167..5afc067 100644
--- a/lisp/utf-2000/ShuoWen-SR443.el
+++ b/lisp/utf-2000/ShuoWen-SR443.el
@@ -242,92 +242,31 @@
 (define-char
   '((shuowen-radical	. 443)	; 女
     (=shuowen-jiguge	. 42916)	; &SW-JIGUGE-42916;
+    (<-Small-Seal@shuowen
+     ((=ucs		  . #x2157D)	; 𡕽
+      )
+     ((=ucs		  . #x2453F)	; 𤔿
+      )
+     ((=ucs		  . #x21580)	; 𡖀
+      )
+     ((=ucs		  . #x2157C)	; 𡕼
+      ))
+    (<-Zhouwen@shuowen
+     ((=shuowen-jiguge	  . 42915)	; &SW-JIGUGE-42915;
+      )
+     ((=ucs		  . #x5A5A)	; 婚
+      ))
+    (<-ancient
+     ((=shuowen-jiguge	  . 22504)	; &SW-JIGUGE-22504;
+      )
+     ((=ucs		  . #x660F)	; 昏
+      ))
+    (<-ancient*sources
+     shuowen-jiguge=49912)
     (->subsumptive
      ((===shuowen-jiguge5 . 42916)	; &SW-JIGUGE5-42916;
-      (<-Small-Seal@shuowen
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	  (=ucs		      . #x2FF1)	; ⿱
-	  )
-	 ((name		      . "CJK RADICAL PAW ONE")
-	  (=ucs		      . #x2EA4)	; ⺤
-	  )
-	 ((ideographic-structure
-	   ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
-	    (=ucs		. #x2FF8)	; ⿸
-	    )
-	   ((=ucs		. #x5C38)	; å°¸
-	    )
-	   ((ideographic-structure
-	     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	      (=ucs		  . #x2FF1)	; ⿱
-	      )
-	     ((ideographic-structure
-	       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO MIDDLE AND RIGHT")
-		(=ucs		    . #x2FF2)	; ⿲
-		)
-	       ((=ucs		    . #x6B62)	; æ­¢
-		)
-	       ((ideographic-structure
-		 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-		  (=ucs		      . #x2FF0)	; â¿°
-		  )
-		 ((=ucs		      . #x4E28)	; 丨
-		  )
-		 ((=ucs		      . #x4E28)	; 丨
-		  ))
-		)
-	       ((=ucs		    . #x5DF3)	; å·³
-		))
-	      )
-	     ((=ucs		  . #x5902)	; 夂
-	      ))
-	    ))
-	  ))
-	))
       )
      ((===shuowen-jiguge4 . 41616)	; &SW-JIGUGE4-41616;
-      (<-Small-Seal@shuowen
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	  (=ucs		      . #x2FF1)	; ⿱
-	  )
-	 ((name		      . "CJK RADICAL PAW ONE")
-	  (=ucs		      . #x2EA4)	; ⺤
-	  )
-	 ((ideographic-structure
-	   ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
-	    (=ucs		. #x2FF8)	; ⿸
-	    )
-	   ((=ucs		. #x5C38)	; å°¸
-	    )
-	   ((ideographic-structure
-	     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	      (=ucs		  . #x2FF1)	; ⿱
-	      )
-	     ((ideographic-structure
-	       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO MIDDLE AND RIGHT")
-		(=ucs		    . #x2FF2)	; ⿲
-		)
-	       ((=ucs		    . #x6B62)	; æ­¢
-		)
-	       ((ideographic-structure
-		 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-		  (=ucs		      . #x2FF0)	; â¿°
-		  )
-		 ((=ucs		      . #x4E28)	; 丨
-		  )
-		 ((=ucs		      . #x4E28)	; 丨
-		  ))
-		)
-	       ((=ucs		    . #x5DF3)	; å·³
-		))
-	      )
-	     ((=ucs		  . #x5902)	; 夂
-	      ))
-	    ))
-	  ))
-	))
       ))
     ))
 (define-char
@@ -371,6 +310,15 @@
     (=shuowen-jiguge	. 42920)	; &SW-JIGUGE-42920;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x21708)	; 𡜈
+      )
+     ((=ucs-itaiji-001	  . #x21708)	; &U-i001+21708;
+      )
+     ((=ucs		  . #x2170C)	; 𡜌
+      ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 42919)	; &SW-JIGUGE-42919;
+      )
+     ((=ucs		  . #x59BB)	; 妻
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 42920)	; &SW-JIGUGE5-42920;
@@ -646,6 +594,8 @@
   '((shuowen-radical	. 443)	; 女
     (=shuowen-jiguge	. 43015)	; &SW-JIGUGE-43015;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x36EE)	; 㛮
+      )
      ((=ucs		  . #x5AC2)	; 嫂
       ))
     (->subsumptive
@@ -1864,6 +1814,10 @@
     (=shuowen-jiguge	. 43328)	; &SW-JIGUGE-43328;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x21817)	; 𡠗
+      )
+     ((=ucs		  . #x218FC)	; ð¡£¼
+      )
+     ((=ucs		  . #x21826)	; ð¡ ¦
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 43328)	; &SW-JIGUGE5-43328;
@@ -3106,6 +3060,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x22676)	; 𢙶
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 43712)	; &SW-JIGUGE-43712;
+      )
+     ((=ucs		  . #x59E6)	; 姦
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 43713)	; &SW-JIGUGE5-43713;
       )