From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 3 May 2023 09:10:37 +0000 (+0900)
Subject: (A-GT-K09373): Unify A-U+22029-itaiji-004.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f6f881f3151e841221aed65aad302d70b49c5aeb;p=chise%2Fxemacs-chise.git

(A-GT-K09373): Unify A-U+22029-itaiji-004.
(U+22029-itaiji-004): New character; use `<-denotational' for
A-GT-K09373.
---

diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el
index eb7773a..55c6f5c 100644
--- a/lisp/utf-2000/Ideograph-R004-Slash.el
+++ b/lisp/utf-2000/Ideograph-R004-Slash.el
@@ -6721,6 +6721,7 @@
       (=>iwds-1		  .  0150)	; &A-IWDSU+4E06;
       ))
     (=>gt-k		. 09373)	; &A-GT-K09373;
+    (=>ucs-itaiji-004	. #x22029)	; &A-GT-K09373;
     (<-simplified@component
      ((=ucs		  . #x22029)	; 𢀩
       ))
@@ -6736,7 +6737,28 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs		  . #x2FF1)	; ⿱
       )
-     ((=ucs		  . #x200B9)	; 𠂹
+     ((=ucs@iso		  . #x200B9)	; &HD-KS-001860;
+      (=cns11643-5	  . #x2B67)	; &HD-KS-001860; [11-71]
+      (=daikanwa	  . 00155)	; &I-M-00155;
+      )
+     ((=ucs		  . #x5382)	; 厂
+      ))
+    (=ucs-itaiji-004	. #x22029)	; &U-i004+22029;
+    ))
+(define-char
+  '((<-denotational
+     ((=>gt-k		  . 09373)	; &A-GT-K09373;
+      ))
+    (ideographic-radical . 4)	; ⼃
+    (ideographic-strokes . 11)
+    (total-strokes	 . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs@iso		  . #x200B9)	; &HD-KS-001860;
+      (=cns11643-5	  . #x2B67)	; &HD-KS-001860; [11-71]
+      (=daikanwa	  . 00155)	; &I-M-00155;
       )
      ((=ucs		  . #x4E06)	; 丆
       ))