X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git;a=blobdiff_plain;f=lisp%2Futf-2000%2FOracle-Bones.el;h=12c0e27866d13318c68d9d75bb451b3073b36f7e;hp=6305abb8f1bcbe091918e8d9ca36599334830832;hb=HEAD;hpb=8d3f2dde5a4a07bd0bf724dbe2b7506ba4fe7009

diff --git a/lisp/utf-2000/Oracle-Bones.el b/lisp/utf-2000/Oracle-Bones.el
index 6305abb..e62d667 100644
--- a/lisp/utf-2000/Oracle-Bones.el
+++ b/lisp/utf-2000/Oracle-Bones.el
@@ -1980,8 +1980,7 @@
       )
      ((=zinbun-oracle	  . 00121)	; &ZOB-0121;
       )
-     ((=ucs@jis		  . #x7940)	; &AJ1-05886;
-      (=adobe-japan1-0	  . 05886)	; &AJ1-05886;
+     ((=shuowen-jiguge	  . 00325)	; &SW-JIGUGE-00325;
       ))
     (zinbun-oracle-page . 7)
     (=zinbun-oracle	. 00123)	; &ZOB-0123;
@@ -2302,14 +2301,7 @@
       )
      ((=zinbun-oracle	  . 00121)	; &ZOB-0121;
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	(=ucs		    . #x2FF0)	; â¿°
-	)
-       ((=ucs		    . #x571F)	; 土
-	)
-       ((=zinbun-oracle	    . 01244)	; &ZOB-1244;
-	))
+     ((=zinbun-oracle	  . 01261)	; &ZOB-1261;
       ))
     (sources		zob1959=2300)
     (zinbun-oracle-page . 8)
@@ -5781,21 +5773,7 @@
     (zinbun-oracle-page . 18)
     (=zinbun-oracle	. 00350)	; &ZOB-0350;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
-	(=ucs		    . #x2FF9)	; ⿹
-	)
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	  (=ucs		      . #x2FF1)	; ⿱
-	  )
-	 ((=ucs		      . #x7ACB)	; 立
-	  )
-	 ((=big5-cdp	      . #x88CD)	; &CDP-88CD;
-	  ))
-	)
-       ((=ucs		    . #x53E3)	; 口
-	))
+     ((=ucs-itaiji-001	  . #x25A6E)	; &U-i001+25A6E;
       ))
     ))
 (define-char
@@ -6062,14 +6040,7 @@
     (zinbun-oracle-page . 19)
     (=zinbun-oracle	. 00363)	; &ZOB-0363;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((=ucs		    . #x8C9D)	; 貝
-	)
-       ((=ucs		    . #x53E3)	; 口
-	))
+     ((=ucs		  . #x301E9)	; 𰇩
       ))
     ))
 (define-char
@@ -6124,14 +6095,11 @@
     (zinbun-oracle-page . 19)
     (=zinbun-oracle	. 00366)	; &ZOB-0366;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((=ucs		    . #x5153)	; 兓
-	)
-       ((=ucs		    . #x53E3)	; 口
-	))
+     ((=>ucs-itaiji-001	  . #x2BB2B)	; &A-U-i001+2BB2B;
+      )
+     ((=ucs		  . #x2BB2B)	; 𫬫
+      )
+     ((=ucs		  . #x6701)	; 朁
       ))
     ))
 (define-char
@@ -8175,14 +8143,7 @@
     (zinbun-oracle-page . 27)
     (=zinbun-oracle	. 00561)	; &ZOB-0561;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
-	(=ucs		    . #x2FFA)	; ⿺
-	)
-       ((=ucs		    . #x8FB6)	; 辶
-	)
-       ((=ucs		    . #x5546)	; 商
-	))
+     ((=ucs		  . #x2EDE7)	; ð®·§
       ))
     ))
 (define-char
@@ -9306,21 +9267,7 @@
     (zinbun-oracle-page . 31)
     (=zinbun-oracle	. 00646)	; &ZOB-0646;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND")
-	(=ucs		    . #x2FF4)	; â¿´
-	)
-       ((=ucs		    . #x884C)	; 行
-	)
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	  (=ucs		      . #x2FF1)	; ⿱
-	  )
-	 ((=ucs		      . #x65B9)	; 方
-	  )
-	 ((=ucs		      . #x6B62)	; æ­¢
-	  ))
-	))
+     ((=ucs		  . #x30CEE)	; ð°³®
       ))
     ))
 (define-char
@@ -10570,14 +10517,7 @@
     (zinbun-oracle-page . 36)
     (=zinbun-oracle	. 00777)	; &ZOB-0777;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((=ucs		    . #x5E1D)	; 帝
-	)
-       ((=ucs		    . #x5EFE)	; 廾
-	))
+     ((=ucs		  . #x2AAB6)	; 𪪶
       ))
     ))
 (define-char
@@ -10615,14 +10555,7 @@
     (zinbun-oracle-page . 37)
     (=zinbun-oracle	. 00780)	; &ZOB-0780;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((=ucs		    . #x5F13)	; 弓
-	)
-       ((=ucs		    . #x5EFE)	; 廾
-	))
+     ((=ucs		  . #x2BE26)	; 𫸦
       ))
     ))
 (define-char
@@ -11227,22 +11160,7 @@
     (zinbun-oracle-page . 41)
     (=zinbun-oracle	. 00879)	; &ZOB-0879;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((name		    . "CJK RADICAL PAW ONE")
-	(=ucs		    . #x2EA4)	; ⺤
-	)
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	  (=ucs		      . #x2FF0)	; â¿°
-	  )
-	 ((=ucs		      . #x5E7A)	; 幺
-	  )
-	 ((=ucs		      . #x5E7A)	; 幺
-	  ))
-	))
+     ((=ucs		  . #x2DDAF)	; 𭶯
       ))
     ))
 (define-char
@@ -11571,6 +11489,8 @@
     (=zinbun-oracle	. 00914)	; &ZOB-0914;
     (<-Oracle-Bones
      ((=ucs		  . #x355A)	; 㕚
+      )
+     ((=ucs		  . #x53C9)	; 叉
       ))
     ))
 (define-char
@@ -11997,14 +11917,7 @@
     (zinbun-oracle-page . 44)
     (=zinbun-oracle	. 00949)	; &ZOB-0949;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((=ucs		    . #x73A8)	; 玨
-	)
-       ((=adobe-japan1-4    . 15391)	; &AJ1-15391;
-	))
+     ((=ucs-itaiji-003	  . #x5F57)	; &U-i003+5F57;
       ))
     ))
 (define-char
@@ -13037,7 +12950,7 @@
     (zinbun-oracle-page . 50)
     (=zinbun-oracle	. 01084)	; &ZOB-1084;
     (<-Oracle-Bones
-     ((=cbeta		  . 12039)	; &CB12039;
+     ((=ucs		  . #x2ABCE)	; 𪯎
       ))
     ))
 (define-char
@@ -14620,6 +14533,14 @@
     ))
 (define-char
   '((shuowen-radical	. 114)	; 羊
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x571F)	; 土
+      )
+     ((=zinbun-oracle	  . 01244)	; &ZOB-1244;
+      ))
     (sources		zob1959=0092 zob1959=1353 zob1959=2300)
     (zinbun-oracle-page . 58)
     (=zinbun-oracle	. 01261)	; &ZOB-1261;
@@ -18490,9 +18411,19 @@
     ))
 (define-char
   '((shuowen-radical	. 206)	; 木
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=zinbun-oracle	  . 01303)	; &ZOB-1303;
+      )
+     ((=zinbun-oracle	  . 01656)	; &ZOB-1656;
+      ))
     (zinbun-oracle-page . 79)
     (=zinbun-oracle	. 01677)	; &ZOB-1677;
     (<-Oracle-Bones
+     ((=>ucs-itaiji-003	  . #x6A02)	; &A-U-i003+6A02;
+      )
      ((=ucs		  . #x6A02)	; 樂
       ))
     ))
@@ -18571,14 +18502,7 @@
     (zinbun-oracle-page . 80)
     (=zinbun-oracle	. 01686)	; &ZOB-1686;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((=ucs		    . #x6728)	; 木
-	)
-       ((=ucs		    . #x8C9D)	; 貝
-	))
+     ((=ucs		  . #x27D3F)	; 𧴿
       ))
     ))
 (define-char
@@ -20120,6 +20044,9 @@
     (<-Oracle-Bones
      ((=ucs		  . #x65E5)	; 日
       ))
+    (<-Small-Seal@component
+     ((=ucs		  . #x65E5)	; 日
+      ))
     ))
 (define-char
   '((shuowen-radical	. 231)	; 日
@@ -21259,14 +21186,7 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
 	(=ucs		    . #x2FF1)	; ⿱
 	)
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	  (=ucs		      . #x2FF0)	; â¿°
-	  )
-	 ((=ucs		      . #x723F)	; 爿
-	  )
-	 ((=big5-cdp	      . #x8B5E)	; &CDP-8B5E;
-	  ))
+       ((=gt-k		    . 04534)	; &GT-K04534;
 	)
        ((=ucs		    . #x9F0E)	; 鼎
 	))
@@ -21509,25 +21429,19 @@
     ))
 (define-char
   '((shuowen-radical	. 253)	; 禾
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=zinbun-oracle	  . 01990)	; &ZOB-1990;
+      )
+     ((=zinbun-oracle	  . 00760)	; &ZOB-0760;
+      ))
     (sources		zob1959=0143)
     (zinbun-oracle-page . 96)
     (=zinbun-oracle	. 02001)	; &ZOB-2001;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	(=ucs		    . #x2FF0)	; â¿°
-	)
-       ((=ucs		    . #x79BE)	; 禾
-	)
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	  (=ucs		      . #x2FF1)	; ⿱
-	  )
-	 ((=big5-cdp	      . #x8BAE)	; &CDP-8BAE;
-	  )
-	 ((=ucs		      . #x4E02)	; 丂
-	  ))
-	))
+     ((=ucs		  . #x2C4E8)	; 𬓨
       ))
     ))
 (define-char
@@ -21550,15 +21464,12 @@
 	)
        ((=ucs		    . #x79BE)	; 禾
 	)
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	  (=ucs		      . #x2FF1)	; ⿱
-	  )
-	 ((=ucs		      . #x518A)	; 冊
-	  )
-	 ((=ucs		      . #x53E3)	; 口
-	  ))
+       ((=ucs		    . #x301D1)	; 𰇑
 	))
+      )
+     ((=ucs		  . #x25909)	; 𥤉
+      )
+     ((=ucs		  . #x9FA2)	; é¾¢
       ))
     ))
 (define-char
@@ -22176,14 +22087,7 @@
     (zinbun-oracle-page . 99)
     (=zinbun-oracle	. 02072)	; &ZOB-2072;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((=ucs		    . #x5B80)	; 宀
-	)
-       ((=ucs		    . #x898B)	; 見
-	))
+     ((=ucs-itaiji-001	  . #x31687)	; &U-i001+31687;
       ))
     ))
 (define-char
@@ -23928,14 +23832,7 @@
       )
      ((=zinbun-oracle	  . 02258)	; &ZOB-2258;
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((=ucs		    . #x4E19)	; 丙
-	)
-       ((=ucs		    . #x4E19)	; 丙
-	))
+     ((=ucs		  . #x30012)	; 𰀒
       ))
     (zinbun-oracle-page . 107)
     (=zinbun-oracle	. 02269)	; &ZOB-2269;
@@ -23943,14 +23840,7 @@
      ((ideographic-combination
        ((=ucs		    . #x767D)	; 白
 	)
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	  (=ucs		      . #x2FF1)	; ⿱
-	  )
-	 ((=ucs		      . #x4E19)	; 丙
-	  )
-	 ((=ucs		      . #x4E19)	; 丙
-	  ))
+       ((=ucs		    . #x30012)	; 𰀒
 	))
       ))
     ))
@@ -26962,7 +26852,7 @@
     (zinbun-oracle-page . 123)
     (=zinbun-oracle	. 02611)	; &ZOB-2611;
     (<-Oracle-Bones
-     ((=ruimoku-v6	  . #xE079)	; &RUI6-E079;
+     ((=ucs		  . #x30DA4)	; 𰶤
       ))
     ))
 (define-char
@@ -28418,21 +28308,14 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs		  . #x2FF1)	; ⿱
       )
-     ((=ucs		  . #x50C3)	; 僃
+     ((=zinbun-oracle	  . 01153)	; &ZOB-1153;
       )
      ((=zinbun-oracle	  . 02746)	; &ZOB-2746;
       ))
     (zinbun-oracle-page . 130)
     (=zinbun-oracle	. 02766)	; &ZOB-2766;
     (<-Oracle-Bones
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(=ucs		    . #x2FF1)	; ⿱
-	)
-       ((=ucs		    . #x50C3)	; 僃
-	)
-       ((=ucs		    . #x706B)	; 火
-	))
+     ((=ucs		  . #x243F9)	; 𤏹
       ))
     ))
 (define-char