From 57c2de888283e2e4350edb6435e7987295ebc8ea Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Tue, 1 Jun 2010 14:41:02 +0000
Subject: [PATCH] (ZOB-0350): Add `ideographic-structure'. (ZOB-2267): Add
 `<-Oracle-Bones'. (ZOB-{2269 - 2275}): New characters.

---
 lisp/utf-2000/Oracle-Bones.el |  115 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 115 insertions(+)

diff --git a/lisp/utf-2000/Oracle-Bones.el b/lisp/utf-2000/Oracle-Bones.el
index 35b52bc..9f55198 100644
--- a/lisp/utf-2000/Oracle-Bones.el
+++ b/lisp/utf-2000/Oracle-Bones.el
@@ -5807,6 +5807,14 @@
     ))
 (define-char
   '((shuowen-radical	. 22)	; 口
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs		  . #x2FF9)	; ⿹
+      )
+     ((=zinbun-oracle	  . 00760)	; &ZOB-0760;
+      )
+     ((=zinbun-oracle	  . 00315)	; &ZOB-0315;
+      ))
     (sources		zob1968=0700 zob1968=2141)
     (zinbun-oracle-page . 18)
     (=zinbun-oracle	. 00350)	; &ZOB-0350;
@@ -23847,6 +23855,13 @@
       ))
     (zinbun-oracle-page . 107)
     (=zinbun-oracle	. 02267)	; &ZOB-2267;
+    (<-Oracle-Bones
+     ((ideographic-combination
+       ((=ucs		    . #x767D)	; 白
+	)
+       ((=ucs		    . #x2472A)	; 𤜪
+	))
+      ))
     ))
 (define-char
   '((shuowen-radical	. 284)	; 白
@@ -23868,3 +23883,103 @@
 	))
       ))
     ))
+(define-char
+  '((shuowen-radical	. 284)	; 白
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=zinbun-oracle	  . 02258)	; &ZOB-2258;
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=ucs		    . #x4E19)	; 丙
+	)
+       ((=ucs		    . #x4E19)	; 丙
+	))
+      ))
+    (zinbun-oracle-page . 107)
+    (=zinbun-oracle	. 02269)	; &ZOB-2269;
+    (<-Oracle-Bones
+     ((ideographic-combination
+       ((=ucs		    . #x767D)	; 白
+	)
+       ((ideographic-structure
+	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	  (=ucs		      . #x2FF1)	; ⿱
+	  )
+	 ((=ucs		      . #x4E19)	; 丙
+	  )
+	 ((=ucs		      . #x4E19)	; 丙
+	  ))
+	))
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 284)	; 白
+    (zinbun-oracle-page . 107)
+    (=zinbun-oracle	. 02270)	; &ZOB-2270;
+    ))
+(define-char
+  '((shuowen-radical	. 285)	; 㡀
+    (zinbun-oracle-page . 107)
+    (=zinbun-oracle	. 02271)	; &ZOB-2271;
+    (<-Oracle-Bones
+     ((=ucs		  . #x655D)	; 敝
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 286)	; 黹
+    (zinbun-oracle-page . 107)
+    (=zinbun-oracle	. 02272)	; &ZOB-2272;
+    (<-Oracle-Bones
+     ((=ucs		  . #x9EF9)	; 黹
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 286)	; 黹
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND")
+	(=ucs		    . #x2FF4)	; â¿´
+	)
+       ((=zinbun-oracle	    . 00504)	; &ZOB-0504;
+	)
+       ((=ucs		    . #x6B62)	; æ­¢
+	))
+      )
+     ((=ucs		  . #x5C6E)	; å±®
+      ))
+    (sources		zob1968=2269)
+    (zinbun-oracle-page . 107)
+    (=zinbun-oracle	. 02273)	; &ZOB-2273;
+    ))
+(define-char
+  '((shuowen-radical	. 286)	; 黹
+    (zinbun-oracle-page . 107)
+    (=zinbun-oracle	. 02274)	; &ZOB-2274;
+    (<-Oracle-Bones
+     ((=ucs		  . #x9EFC)	; 黼
+      ))
+    ))
+(define-char
+  '((shuowen-radical	. 286)	; 黹
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x7236)	; 父
+      )
+     ((=zinbun-oracle	  . 00915)	; &ZOB-0915;
+      ))
+    (zinbun-oracle-page . 107)
+    (=zinbun-oracle	. 02275)	; &ZOB-2275;
+    (<-Oracle-Bones
+     ((=ucs		  . #x9EFB)	; é»»
+      ))
+    ))
-- 
1.7.10.4