From 3eb571638d65bf967a5d6d7bec4d8bbd5c0d30fa Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 11 Dec 2023 06:20:29 +0900
Subject: [PATCH] =?utf8?q?(ZOB-00350):=20Use=20U+25A6E-itaiji-001=20instead=20?=
 =?utf8?q?of=20"=E2=BF=B9=E2=BF=B1=E7=AB=8B&CDP-88CD;=E5=8F=A3"=20as=20the=20?=
 =?utf8?q?corresponding=20modern=20character.=20(ZOB-00363):=20Use=20"=F0=B0?=
 =?utf8?q?=87=A9"=20instead=20of=20"=E2=BF=B1=E8=B2=9D=E5=8F=A3"=20as=20the=20?=
 =?utf8?q?corresponding=20modern=20character.=20(ZOB-00366):=20Use=20A-U+2BB?=
 =?utf8?q?2B-itaiji-001=20instead=20of=20"=E2=BF=B1=E5=85=93=E5=8F=A3"=20as=20?=
 =?utf8?q?a=20corresponding=20modern=20character;=20add=20"=F0=AB=AC=AB"=20a?=
 =?utf8?q?nd=20"=E6=9C=81"=20as=20corresponding=20modern=20characters.=20(ZO?=
 =?utf8?q?B-00561):=20Use=20"=F0=AE=B7=A7"=20instead=20of=20"=E2=BF=BA=E8=BE?=
 =?utf8?q?=B6=E5=95=86"=20as=20the=20corresponding=20modern=20character.=20(?=
 =?utf8?q?ZOB-00777):=20Use=20"=F0=AA=AA=B6"=20instead=20of=20"=E2=BF=B1=E5=B8?=
 =?utf8?q?=9D=E5=BB=BE"=20as=20the=20corresponding=20modern=20character.=20(?=
 =?utf8?q?ZOB-00780):=20Use=20"=F0=AB=B8=A6"=20instead=20of=20"=E2=BF=B1=E5=BC?=
 =?utf8?q?=93=E5=BB=BE"=20as=20the=20corresponding=20modern=20character.=20(?=
 =?utf8?q?ZOB-00879):=20Use=20"=F0=AD=B6=AF"=20instead=20of=20"=E2=BF=B1=E2=BA?=
 =?utf8?q?=A4=E2=BF=B0=E5=B9=BA=E5=B9=BA"=20as=20the=20corresponding=20moder?=
 =?utf8?q?n=20character.=20(ZOB-01686):=20Use=20"=F0=A7=B4=BF"=20instead=20o?=
 =?utf8?q?f=20"=E2=BF=B1=E6=9C=A8=E8=B2=9D"=20as=20the=20corresponding=20mod?=
 =?utf8?q?ern=20character.=20(ZOB-02072):=20Use=20U+31687-itaiji-001=20inste?=
 =?utf8?q?ad=20of=20"=E2=BF=B1=E5=AE=80=E8=A6=8B"=20as=20the=20corresponding?=
 =?utf8?q?=20modern=20character.=20(ZOB-02766):=20Modify=20component=20of=20?=
 =?utf8?q?structure;=20use=20"=F0=A4=8F=B9"=20instead=20of=20"=E2=BF=B1=E5=83?=
 =?utf8?q?=83=E7=81=AB"=20as=20the=20corresponding=20modern=20character.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 lisp/utf-2000/Oracle-Bones.el |  111 ++++++-----------------------------------
 1 file changed, 15 insertions(+), 96 deletions(-)

diff --git a/lisp/utf-2000/Oracle-Bones.el b/lisp/utf-2000/Oracle-Bones.el
index 3e955ea..e62d667 100644
--- a/lisp/utf-2000/Oracle-Bones.el
+++ b/lisp/utf-2000/Oracle-Bones.el
@@ -5773,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
@@ -6054,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
@@ -6116,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
@@ -8167,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
@@ -10548,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
@@ -10593,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
@@ -11205,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
@@ -18562,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
@@ -22154,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
@@ -28382,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
-- 
1.7.10.4