From: tomo <tomo>
Date: Wed, 27 Jun 2007 04:08:13 +0000 (+0000)
Subject: (ZOB-00132): Modify `ideographic-structure'.
X-Git-Tag: r21-4-19-chise-0_23-4^20~52
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6ed9e776155675c01602ec8f4801f13f503c3ef6;p=chise%2Fxemacs-chise.git

(ZOB-00132): Modify `ideographic-structure'.
(ZOB-00177): Modify `ideographic-structure'.
(ZOB-00510): Modify `ideographic-structure'.
(ZOB-00596): Add `ideographic-structure'.
(ZOB-00599): Add `ideographic-structure'.
(ZOB-00600): Add `ideographic-structure'.
(ZOB-00601): Add `ideographic-structure'.
(ZOB-{01009 - 01023}): New characters.
(ZOB-01024): Add `shuowen-radical', `sources' and
`zinbun-oracle-page'.
(ZOB-{01025 - 01029}): New characters.
(ZOB-01030): Add `shuowen-radical', `zinbun-oracle-page'; add
`<-Oracle-Bones' for U+807F.
(ZOB-{01031 - 01055}): New characters.
---

diff --git a/lisp/utf-2000/Oracle-Bones.el b/lisp/utf-2000/Oracle-Bones.el
index e8ec14f..704e9d4 100644
--- a/lisp/utf-2000/Oracle-Bones.el
+++ b/lisp/utf-2000/Oracle-Bones.el
@@ -1910,7 +1910,7 @@
       )
      ((=zinbun-oracle	  . 00121)	; &ZOB-0121;
       )
-     ((=ucs		  . #x7236)	; 父
+     ((=zinbun-oracle	  . 00915)	; &ZOB-0915;
       ))
     (sources		zob1968=1817)
     (zinbun-oracle-page . 7)
@@ -2734,9 +2734,9 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs		  . #x2FF1)	; ⿱
       )
-     ((=zinbun-oracle	  . 00176)	; &ZOB-0176;
+     ((=ucs		  . #x73A8)	; 玨
       )
-     ((=ucs		  . #x53E3)	; 口
+     ((=zinbun-oracle	  . 00315)	; &ZOB-0315;
       ))
     (zinbun-oracle-page . 9)
     (=zinbun-oracle	. 00177)	; &ZOB-0177;
@@ -6996,7 +6996,7 @@
        ((=ucs		    . #x4E28)	; 丨
 	))
       )
-     ((=ucs		  . #x53C8)	; 又
+     ((=zinbun-oracle	  . 01019)	; &ZOB-1019;
       ))
     (zinbun-oracle-page . 25)
     (=zinbun-oracle	. 00510)	; &ZOB-0510;
@@ -8306,6 +8306,14 @@
     ))
 (define-char
   '((shuowen-radical	. 34)	; å½³
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5F73)	; å½³
+      )
+     ((=ucs		  . #x5927)	; 大
+      ))
     (sources		zob1968=0624)
     (zinbun-oracle-page . 29)
     (=zinbun-oracle	. 00596)	; &ZOB-0596;
@@ -8349,6 +8357,21 @@
     ))
 (define-char
   '((shuowen-radical	. 34)	; å½³
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5F73)	; å½³
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=ucs		    . #x6C34)	; æ°´
+	)
+       ((=zinbun-oracle	    . 00315)	; &ZOB-0315;
+	))
+      ))
     (sources		zob1968=2047 zob1968=2505)
     (zinbun-oracle-page . 29)
     (=zinbun-oracle	. 00599)	; &ZOB-0599;
@@ -8372,6 +8395,21 @@
     ))
 (define-char
   '((shuowen-radical	. 34)	; å½³
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5F73)	; å½³
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=ucs		    . #x6C38)	; æ°¸
+	)
+       ((=zinbun-oracle	    . 00315)	; &ZOB-0315;
+	))
+      ))
     (sources		zob1968=1984 zob1968=2043 zob1968=2049 zob1968=2110
 			zob1968=2119)
     (zinbun-oracle-page . 29)
@@ -8389,6 +8427,21 @@
     ))
 (define-char
   '((shuowen-radical	. 34)	; å½³
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5F73)	; å½³
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=zinbun-oracle	    . 00161)	; &ZOB-0161;
+	)
+       ((=zinbun-oracle	    . 00886)	; &ZOB-0886;
+	))
+      ))
     (zinbun-oracle-page . 29)
     (=zinbun-oracle	. 00601)	; &ZOB-0601;
     (<-Oracle-Bones
@@ -11721,10 +11774,362 @@
     (=zinbun-oracle	. 01008)	; &ZOB-1008;
     ))
 (define-char
-  '((=zinbun-oracle	. 01024)	; &ZOB-1024;
+  '((shuowen-radical	. 76)	; 又
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01009)	; &ZOB-1009;
+    ))
+(define-char
+  '((shuowen-radical	. 76)	; 又
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01010)	; &ZOB-1010;
+    ))
+(define-char
+  '((shuowen-radical	. 76)	; 又
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01011)	; &ZOB-1011;
+    ))
+(define-char
+  '((shuowen-radical	. 76)	; 又
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01012)	; &ZOB-1012;
+    ))
+(define-char
+  '((shuowen-radical	. 76)	; 又
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01013)	; &ZOB-1013;
+    ))
+(define-char
+  '((shuowen-radical	. 76)	; 又
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01014)	; &ZOB-1014;
+    ))
+(define-char
+  '((shuowen-radical	. 76)	; 又
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01015)	; &ZOB-1015;
+    ))
+(define-char
+  '((shuowen-radical	. 76)	; 又
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01016)	; &ZOB-1016;
+    ))
+(define-char
+  '((shuowen-radical	. 76)	; 又
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01017)	; &ZOB-1017;
+    ))
+(define-char
+  '((shuowen-radical	. 76)	; 又
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01018)	; &ZOB-1018;
+    ))
+(define-char
+  '((shuowen-radical	. 77)	; 𠂇
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01019)	; &ZOB-1019;
+    (<-Oracle-Bones
+     ((=ucs		  . #x20087)	; 𠂇
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 77)	; 𠂇
+    (sources		zob1968=0447)
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01020)	; &ZOB-1020;
+    ))
+(define-char
+  '((shuowen-radical	. 78)	; 㕜
+    (sources		zob1968=0174 zob1968=0213-0221 zob1968=0373
+			zob1968=0562 zob1968=0563 zob1968=0621 zob1968=1158
+			zob1968=1271 zob1968=1272 zob1968=1738 zob1968=1784
+			zob1968=1801 zob1968=2529 zob1968=3124)
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01021)	; &ZOB-1021;
+    (<-Oracle-Bones
+     ((=ucs		  . #x53F2)	; 史
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=zinbun-oracle	  . 01021)	; &ZOB-1021;
+      ))
+    (shuowen-radical	. 78)	; 㕜
+    (sources		zob1968=3016)
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01022)	; &ZOB-1022;
+    ))
+(define-char
+  '((shuowen-radical	. 78)	; 㕜
+    (sources		zob1968=0338 zob1968=0434 zob1968=0923 zob1968=3242
+			zob1968=3243 zob1968=3244 zob1968=3252)
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01023)	; &ZOB-1023;
+    (<-Oracle-Bones
+     ((=ucs		  . #x4E8B)	; 事
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 78)	; 㕜
+    (sources		zob1968=0269)
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01024)	; &ZOB-1024;
+    ))
+(define-char
+  '((shuowen-radical	. 78)	; 㕜
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01025)	; &ZOB-1025;
+    ))
+(define-char
+  '((shuowen-radical	. 78)	; 㕜
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01026)	; &ZOB-1026;
+    ))
+(define-char
+  '((shuowen-radical	. 80)	; 𦘒
+    (sources		zob1968=1831 zob1968=1850 zob1968=2071)
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01027)	; &ZOB-1027;
+    ))
+(define-char
+  '((shuowen-radical	. 80)	; 𦘒
+    (sources		zob1968=2505)
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01028)	; &ZOB-1028;
+    ))
+(define-char
+  '((shuowen-radical	. 80)	; 𦘒
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01029)	; &ZOB-1029;
+    ))
+(define-char
+  '((shuowen-radical	. 81)	; 聿
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01030)	; &ZOB-1030;
+    (<-Oracle-Bones
+     ((=ucs		  . #x807F)	; 聿
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 82)	; 畫
+    (sources		zob1968=0384 zob1968=0414 zob1968=0425 zob1968=0644)
+    (zinbun-oracle-page . 47)
+    (=zinbun-oracle	. 01031)	; &ZOB-1031;
+    (<-Oracle-Bones
+     ((=ucs		  . #x756B)	; 畫
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 82)	; 畫
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01032)	; &ZOB-1032;
+    ))
+(define-char
+  '((shuowen-radical	. 82)	; 畫
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01033)	; &ZOB-1033;
+    ))
+(define-char
+  '((shuowen-radical	. 82)	; 畫
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01034)	; &ZOB-1034;
+    ))
+(define-char
+  '((shuowen-radical	. 82)	; 畫
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01035)	; &ZOB-1035;
+    ))
+(define-char
+  '((shuowen-radical	. 85)	; 臣
+    (sources		zob1968=0155 zob1968=0283 zob1968=0967)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01036)	; &ZOB-1036;
+    (<-Oracle-Bones
+     ((=ucs		  . #x81E3)	; 臣
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=zinbun-oracle	  . 01036)	; &ZOB-1036;
+      ))
+    (shuowen-radical	. 85)	; 臣
+    (sources		zob1968=1940)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01037)	; &ZOB-1037;
+    ))
+(define-char
+  '((shuowen-radical	. 85)	; 臣
+    (sources		zob1968=1097 zob1968=1100)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01038)	; &ZOB-1038;
+    (<-Oracle-Bones
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=ucs		    . #x81E3)	; 臣
+	)
+       ((=ucs		    . #x81E3)	; 臣
+	))
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 85)	; 臣
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01039)	; &ZOB-1039;
+    ))
+(define-char
+  '((shuowen-radical	. 85)	; 臣
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01040)	; &ZOB-1040;
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01041)	; &ZOB-1041;
+    (<-Oracle-Bones
+     ((=ucs		  . #x6BB3)	; 殳
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (sources		zob1968=0015 zob1968=0017 zob1968=0020 zob1968=0039
+			zob1968=0046 zob1968=0063 zob1968=0066 zob1968=0071
+			zob1968=0073 zob1968=0081 zob1968=0095 zob1968=0096
+			zob1968=0106 zob1968=0112 zob1968=0124 zob1968=0165
+			zob1968=0266 zob1968=0330 zob1968=0331 zob1968=0334
+			zob1968=0337 zob1968=0342 zob1968=0364 zob1968=0422
+			zob1968=0438 zob1968=0439 zob1968=0443 zob1968=0453
+			zob1968=0458 zob1968=0462 zob1968=0469 zob1968=0514
+			zob1968=0544-0554 zob1968=0684 zob1968=0811
+			zob1968=0872 zob1968=0879 zob1968=0919 zob1968=0922
+			zob1968=0970 zob1968=0971 zob1968=0973 zob1968=0988
+			zob1968=1065 zob1968=1067 zob1968=1095
+			zob1968=1119-1126 zob1968=1127 zob1968=1128-1132
+			zob1968=1134 zob1968=1135 zob1968=1137 zob1968=1138
+			zob1968=1139 zob1968=3252)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01042)	; &ZOB-1042;
+    (<-Oracle-Bones
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=ucs		    . #x5357)	; 南
+	)
+       ((=ucs		    . #x6BB3)	; 殳
+	))
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01043)	; &ZOB-1043;
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (sources		zob1968=3091 zob1968=3093 zob1968=3096)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01044)	; &ZOB-1044;
+    (<-Oracle-Bones
+     ((=ucs		  . #x23A98)	; 𣪘
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (sources		zob1968=0301 zob1968=0869)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01045)	; &ZOB-1045;
+    (<-Oracle-Bones
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=ucs		    . #x96B9)	; 隹
+	)
+       ((=ucs		    . #x6BB3)	; 殳
+	))
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (sources		zob1968=1678)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01046)	; &ZOB-1046;
+    (<-Oracle-Bones
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=ucs		    . #x5B83)	; 它
+	)
+       ((=ucs		    . #x6BB3)	; 殳
+	))
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (sources		zob1968=2044)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01047)	; &ZOB-1047;
+    (<-Oracle-Bones
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=ucs		    . #x7678)	; 癸
+	)
+       ((=ucs		    . #x6BB3)	; 殳
+	))
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (sources		zob1968=0136 zob1968=1910)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01048)	; &ZOB-1048;
+    (<-Oracle-Bones
+     ((=big5-cdp	  . #x8B7D)	; &CDP-8B7D;
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (sources		zob1968=2522)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01049)	; &ZOB-1049;
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01050)	; &ZOB-1050;
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01051)	; &ZOB-1051;
+    (<-Oracle-Bones
+     ((=ucs		  . #x4F07)	; 伇
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (sources		zob1968=0003)
+    (zinbun-oracle-page . 48)
+    (=zinbun-oracle	. 01052)	; &ZOB-1052;
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (zinbun-oracle-page . 49)
+    (=zinbun-oracle	. 01053)	; &ZOB-1053;
+    ))
+(define-char
+  '((shuowen-radical	. 86)	; 殳
+    (zinbun-oracle-page . 49)
+    (=zinbun-oracle	. 01054)	; &ZOB-1054;
     ))
 (define-char
-  '((=zinbun-oracle	. 01030)	; &ZOB-1030;
+  '((shuowen-radical	. 86)	; 殳
+    (zinbun-oracle-page . 49)
+    (=zinbun-oracle	. 01055)	; &ZOB-1055;
     ))
 (define-char
   '((=zinbun-oracle	. 01129)	; &ZOB-1129;